Skip to Content
0
Former Member
Jan 19, 2007 at 06:45 PM

ALV footer

21 Views

I am trying to display some message at the ALV footer . I am trying with the following code but it doesnt work. I appreciate if anyone can help me with this

start_of_selection

PERFORM EVENTS_GET.

FORM events_get .

CALL FUNCTION 'REUSE_ALV_EVENTS_GET'

EXPORTING

i_list_type = 0

IMPORTING

et_events = e_events.

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 e_events INTO WA_EVENTS

with KEY name = slis_ev_end_of_page.

IF sy-subrc = 0.

wa_events-form = 'END_OF_PAGE'.

APPEND wa_events TO e_events.

ENDIF.

ENDFORM. " events_get

FORM END_OF_PAGE.

WRITE:/ 'footer'.

ENDFORM.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = REPID

IT_FIELDCAT = FIELDCAT

IT_EVENTS = E_EVENTS

TABLES

T_OUTTAB = INT_USERTCD

EXCEPTIONS

OTHERS = 2.