|
Como puedo manejarlo aparte, si lo declaro asė :
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
it_sort = t_sort[]
i_interface_check = 'X'
i_callback_program = sy-repid
i_callback_user_command = 'USER_COMMAND'
i_callback_pf_status_set = 'PF_STATUS_SET'
i_structure_name = 'TI_ALV'
i_save = w_save
is_layout = t_layout
it_fieldcat = t_fieldcat[]
i_grid_settings = w_s_grid_settings
i_default = ' '
it_events = t_events[]
* it_event_exit = 'X'
is_print = w_impresion
* it_special_groups = 'VTEXT'
TABLES
t_outtab = ti_alv
EXCEPTIONS
program_error = 1
OTHERS = 2.
y lo manejo asi :
FORM user_command USING u_ucomm TYPE syucomm
us_selfield TYPE slis_selfield."#EC CALLED
*BREAK-POINT.
CASE u_ucomm.
WHEN '&F03'.
BREAK-POINT.
LEAVE TO SCREEN 1000.
WHEN '&VIPE'.
IF p_conso = ' ' . " DETALLE POR CANAL DE VENTAS
PERFORM llena_alv_pesos.
PERFORM layout_alv.
PERFORM sort_alv.
PERFORM ejecucion_alv.
ELSE.
PERFORM llena_alv_pesos_con.
PERFORM layout_alv.
PERFORM sort_alv_con.
PERFORM ejecucion_alv.
ENDIF.
WHEN '&VICA'.
IF p_conso = ' ' . " DETALLE POR CANAL DE VENTAS
PERFORM llena_alv_cajas.
PERFORM layout_alv.
PERFORM sort_alv.
PERFORM ejecucion_alv.
ELSE.
PERFORM llena_alv_cajas_con. " DETALLE CONSOLIDADO
PERFORM layout_alv.
PERFORM sort_alv_con.
PERFORM ejecucion_alv.
ENDIF.
ENDCASE.
ENDFORM.
|