REPORT  z18_002_d                                                     .

DATA: g_docking     TYPE REF TO cl_gui_docking_container,

g_grid        TYPE REF TO cl_gui_alv_grid.

MODULE init_con OUTPUT.

             CHECK g_docking IS INITIAL.

*-Create Docking Container

             CREATE OBJECT g_docking

                          EXPORTING

                                       repid     = sy-repid

                                       dynnr     = sy-dynnr

                                       extension = 2000.

             CREATE OBJECT g_grid

                          EXPORTING

                                       i_parent       = g_docking.

             CALL METHOD g_grid->set_table_for_first_display

                          EXPORTING

                                       i_structure_name = 'SFLIGHT'

                          CHANGING

                                       it_outtab        = gt_sflight.