DATA: I_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = P_I_EVENTCAT
- 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.
clear I_event.
read table p_i_eventcat with key name = slis_ev_user_command into I_event.
if sy-subrc = 0.
move 'USER_COMMAND' to I_event-form.
append I_event to p_i_eventcat.
endif.
FORM Z8_USER_COMMAND USING P_UCOMM TYPE SY-UCOMM
P_SELFIELD TYPE SLIS_SELFIELD.
WHEN '&IC1'.
if p_selfield-name = i_tab-vbeln.(sales order)
write :/p_selfield-value.
elseif p_selfield-name = i_tab-vbeln(invoice)
write :/p_selfield-value.
elseif p_selfield-name = i_tab-vbeln(delivery)
write :/p_selfield-value.
endif.
endcase.
RELATED POST
ALV OOPS WITH OUT CONTAINER REPORT
IMPORTANCE OF BADI IN SAP ABAP
COMPARISON OF ENHANCEMENTS IN ABAP
BADI DEFINITION WITH SCREEN SHOTS
BADI IMPELEMTATION
BADI IMPLEMENTATION PART TWO
No comments:
Post a Comment