Code: Alles auswählen.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = g_h_repid
is_layout = g_w_layo
it_fieldcat = g_t_fcat
i_save = 'A'
is_variant = g_w_vari
i_callback_user_command = 'USER_COMMAND'
Code: Alles auswählen.
FORM user_command USING l_p_ucomm LIKE sy-ucomm
l_p_selfield TYPE slis_selfield.
IF l_p_ucomm EQ '&IC1'.
CHECK NOT l_p_selfield-value IS INITIAL.
CASE l_p_selfield-fieldname.
WHEN 'MATNR'.
mach irgendwas..........
ENDCASE.
ENDIF.
Code: Alles auswählen.
IF r_ucomm EQ '&IC1'.
CHECK NOT rs_selfield-value IS INITIAL.
CASE rs_selfield-fieldname.
WHEN 'DOCNUM'.
SET PARAMETER ID 'DCN' FIELD rs_selfield-value.
CALL TRANSACTION 'WE02'
and skip first screen.
ENDCASE.
ENDIF.