Code: Alles auswählen.
module input_1100 input.
if sy-ucomm eq 'BUTTON'.
if gr_alv is not bound.
create object gr_cc "<-- CL_GUI_CUSTOM_CONTAINER
exporting container_name = 'CONTAINER'.
create object gr_alv "<-- CL_GUI_ALV_GRID
exporting i_parent = gr_cc.
* Sonstige Instanzierungen
endif.
endif.
endmodule
Code: Alles auswählen.
DATA:
.
.
.
g_custom_container TYPE REF TO cl_gui_custom_container,
g_alv_grid TYPE REF TO cl_gui_alv_grid,
.
.
MODULE DISPLAY_ALV.
PERFORM show_table. "Überschriften und Struktur der ALV
name_container = 'CUSTOM_TR'.
if sy-ucomm eq 'SHOW'.
if g_alv_grid is not bound.
CREATE OBJECT g_custom_container
EXPORTING
container_name = name_container.
CREATE OBJECT g_alv_grid
EXPORTING
i_parent = g_custom_container.
ENDIF.
ENDIF.
ENDMODULE.
Code: Alles auswählen.
DATA:
g_custom_container TYPE REF TO cl_gui_custom_container,
g_alv_grid TYPE REF TO cl_gui_alv_grid.
MODULE DISPLAY_ALV.
if sy-ucomm eq 'SHOW'.
PERFORM show_table. "Überschriften und Struktur der ALV
endif.
ENDMODULE.
form show_table.
if g_alv_grid is not bound.
CREATE OBJECT g_custom_container
EXPORTING
container_name = name_container.
CREATE OBJECT g_alv_grid
EXPORTING
i_parent = 'CUSTOM_TR'.
ENDIF.
* Hier der Rest aus show_table
ENDform.
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag:
holderda