*&---------------------------------------------------------------------*
*& Report ZADA_PROG_UNIT_02
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZADA_PROG_UNIT_02.

WRITE:/ '01 - REPORT...',
      / '     WARNING: Ne jamais implémenter de code ici !',
      / '-------------------------------------------------'.

INCLUDE ZADA_PROG_UNIT_02_TOP.
INCLUDE ZADA_PROG_UNIT_02_SCR.
INCLUDE ZADA_PROG_UNIT_02_F01.

INITIALIZATION.
  WRITE:/ '00 - INITIALIZATION du programme...',
        / '     TYPE: Bloc d''événement',
        / '     WARNING: Activation unique au lancement',
        / '-------------------------------------------------'.
  PERFORM report_initialization.

START-OF-SELECTION.
  WRITE:/ '05 - START-OF-SELECTION du programme...',
        / '     TYPE: Bloc d''événement',
        / '     INFO: Traitement principal du REPORT',
        / '-------------------------------------------------'.

  PERFORM report_subprocess_01.
  PERFORM report_subprocess_02.

END-OF-SELECTION.
  WRITE:/ '99 - END-OF-SELECTION du programme...',
        / '     TYPE: Bloc d''événement',
        / '     INFO: Traitement de fin du REPORT',
        / '-------------------------------------------------'.