*----------------------------------------------------------------------*
***INCLUDE MZ_TP2O01 .
*----------------------------------------------------------------------*
*
MODULE status_0100 OUTPUT.
  CLEAR fcode.
  SET PF-STATUS 'START'.
  SET TITLEBAR 'T100'.
ENDMODULE.                 " STATUS_0100  OUTPUT
*
MODULE status_0200 OUTPUT.
  CLEAR fcode.
  SET PF-STATUS 'FLIGHTS'.
  SET TITLEBAR 'T200'.
  IF cust_cont IS INITIAL.
    CREATE OBJECT cust_cont
      EXPORTING container_name = cust_name.
    CREATE OBJECT alv_cont
      EXPORTING i_parent = cust_cont.
  ELSE.
    CALL METHOD alv_cont->refresh_table_display.
  ENDIF.

  CALL METHOD alv_cont->set_gridtitle
    EXPORTING
      i_gridtitle = 'Hallo!'.

  CALL METHOD alv_cont->set_table_for_first_display
    EXPORTING
      i_structure_name = 'ZZFLUG'
    CHANGING
      it_outtab        = itab.
ENDMODULE.                 " status_0200  OUTPUT
*
MODULE count_check OUTPUT.
  IF count = 0.
    MESSAGE i011 WITH zflug_input-vondatum zflug_input-bisdatum
      zflug_input-cityfrom zflug_input-cityto.
*   Keine Flüge zwischen & und & für Abflug- & und Ankunftsstadt & gefun
  ELSE.
    MESSAGE s012 WITH count.
*   Es wurden & Flüge gefunden.
  ENDIF.
ENDMODULE.                 " count_check  OUTPUT