|
Código fuente -
Ejemplos ALV
|
|
Domingo, 13 de Marzo de 2005 06:08 |
Botones en barra ALV objetos
CLASS lcl_event_listener DEFINITION.
PUBLIC SECTION.
METHODS: toolbar FOR EVENT toolbar OF cl_gui_alv_grid
IMPORTING e_object e_interactive,
print_top_of_page FOR EVENT print_top_of_page OF
cl_gui_alv_grid,
command FOR EVENT user_command OF cl_gui_alv_grid
IMPORTING e_ucomm.
* hotspot_click FOR EVENT hotspot_click OF cl_gui_alv_grid
* IMPORTING e_row_id e_column_id es_row_no.
PRIVATE SECTION.
ENDCLASS. "lcl_event_listener DEFINITION
CLASS lcl_event_listener IMPLEMENTATION.
METHOD toolbar.
* Actualizar Factory Status
CLEAR: ls_toolbar.
ls_toolbar-function = 'FACTSTAT'.
ls_toolbar-icon = '@03@'.
ls_toolbar-quickinfo = 'Factory Status'.
ls_toolbar-text = ' Factory Status'.
APPEND ls_toolbar TO e_object->mt_toolbar.
ENDMETHOD. "toolbar
en el pbo de la dynpro
SET HANDLER event_listener->toolbar FOR alv_list.
* Activamos la barra de Herramientas
CALL METHOD alv_list->set_toolbar_interactive.
|