Skip to Content

Archived discussions are read-only. Learn more about SAP Q&A

ALV

Hi,

In my coding i displayed heading in top of pag in ALV report, but it's not display in ALV report, when i come back from ALV report it's display please any one correct my code

REPORT ZE0232_ALV_TOP1 .

TYPE-POOLS: SLIS.

TABLES: EKPO.

DATA: REPID LIKE SY-REPID.

DATA: IT_EVENTS TYPE SLIS_T_EVENT,

IT_PAGE TYPE SLIS_T_LISTHEADER,

WA_EVENTS TYPE SLIS_ALV_EVENT,

WA_PAGE TYPE SLIS_LISTHEADER.

PERFORM BUILD_EVENTS.

PERFORM BUILD_PAGE_HEADER.

DATA: I_EKPO LIKE EKPO OCCURS 0 WITH HEADER LINE.

SELECT * FROM EKPO INTO CORRESPONDING FIELDS OF TABLE I_EKPO.

call function 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

  • I_INTERFACE_CHECK = ' '

  • I_BYPASSING_BUFFER = ' '

  • I_BUFFER_ACTIVE = ' '

I_CALLBACK_PROGRAM = REPID

  • I_CALLBACK_PF_STATUS_SET = ' '

  • I_CALLBACK_USER_COMMAND = ' '

  • I_CALLBACK_TOP_OF_PAGE = ' '

  • I_CALLBACK_HTML_TOP_OF_PAGE = ' '

  • I_CALLBACK_HTML_END_OF_LIST = ' '

I_STRUCTURE_NAME = 'EKPO'

  • I_BACKGROUND_ID = ' '

I_GRID_TITLE = 'PURCHASING DETAILS'

  • I_GRID_SETTINGS =

  • IS_LAYOUT =

  • IT_FIELDCAT =

  • IT_EXCLUDING =

  • IT_SPECIAL_GROUPS =

  • IT_SORT =

  • IT_FILTER =

  • IS_SEL_HIDE =

  • I_DEFAULT = 'X'

  • I_SAVE = ' '

  • IS_VARIANT =

  • IT_EVENTS =

  • IT_EVENT_EXIT =

  • IS_PRINT =

  • IS_REPREP_ID =

  • I_SCREEN_START_COLUMN = 0

  • I_SCREEN_START_LINE = 0

  • I_SCREEN_END_COLUMN = 0

  • I_SCREEN_END_LINE = 0

  • IT_ALV_GRAPHICS =

  • IT_HYPERLINK =

  • IT_ADD_FIELDCAT =

  • IT_EXCEPT_QINFO =

  • I_HTML_HEIGHT_TOP =

  • I_HTML_HEIGHT_END =

  • IMPORTING

  • E_EXIT_CAUSED_BY_CALLER =

  • ES_EXIT_CAUSED_BY_USER =

tables

t_outtab = I_EKPO.

  • EXCEPTIONS

  • PROGRAM_ERROR = 1

  • OTHERS = 2.

if sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

call function 'REUSE_ALV_COMMENTARY_WRITE'

exporting

it_list_commentary = IT_PAGE

  • I_LOGO =

  • I_END_OF_LIST_GRID =

.

&----


*& Form BUILD_EVENTS

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


form BUILD_EVENTS .

call function 'REUSE_ALV_EVENTS_GET'

EXPORTING

I_LIST_TYPE = 0

IMPORTING

ET_EVENTS = IT_EVENTS

  • EXCEPTIONS

  • LIST_TYPE_WRONG = 1

  • OTHERS = 2

.

if sy-subrc <> 0.

  • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

  • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

READ TABLE IT_EVENTS WITH KEY NAME = slis_ev_top_of_page INTO WA_EVENTS.

IF SY-SUBRC = 0.

MOVE: SLIS_EV_TOP_OF_PAGE TO WA_EVENTS-FORM.

APPEND WA_EVENTS TO IT_EVENTS.

ENDIF.

endform. " BUILD_EVENTS

&----


*& Form BUILD_PAGE_HEADER

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


form BUILD_PAGE_HEADER .

WA_page-typ = 'H'.

WA_page-info = 'Header 1'.

APPEND WA_page TO IT_page.

endform. " BUILD_PAGE_HEADER

Tags:
Former Member

Helpful Answer

by
Not what you were looking for? View more on this topic or Ask a question