MODULE INIT_CON OUTPUT.
* SET PF-STATUS 'xxxxxxxx'.
* SET TITLEBAR 'xxx'.

  IF CON1_REF  IS INITIAL. " 구문 안의 내용은 컨테이너 오브젝트가 한번 생성되었으면 다시 생성하지 않는다는 의미.
    CREATE OBJECT CON1_REF
  EXPORTING
    CONTAINER_NAME = 'CON1'.

    CREATE OBJECT G_GRID
      EXPORTING
        I_PARENT = CON1_REF.

    CALL METHOD G_GRID->SET_TABLE_FOR_FIRST_DISPLAY
      EXPORTING
        I_STRUCTURE_NAME = 'SFLIGHT'
        I_SAVE = 'A'
        IS_VARIANT = GS_VARIANT
        I_DEFAULT = ' '

      CHANGING
        IT_OUTTAB = GT_SFLIGHT.
  ENDIF.
ENDMODULE.

MODULE status_0100 OUTPUT.
 SET PF-STATUS '100_STATUS'.
 SET TITLEBAR '100_TITLE'.
ENDMODULE.