Accueil Cours

Animation : La PROCEDURE DIVISION et le Flux du Programme

La PROCEDURE DIVISION contient la logique exécutoire de votre programme COBOL. Cette animation illustre comment les instructions PERFORM et STOP RUN contrôlent le flux du programme, y compris les boucles. 


IDENTIFICATION DIVISION.
PROGRAM-ID. FluxProgramme.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 COMPTEUR-BOUCLE     PIC 9 VALUE 0.
01 FIN-DEMANDEE-FLAG   PIC X VALUE 'N'.
   88 FinDemandee      VALUE 'O'.

PROCEDURE DIVISION.
DebutProgramme.
    PERFORM Initialiser
    PERFORM BouclePrincipale UNTIL FinDemandee
    STOP RUN.

Initialiser.
    DISPLAY "--- Initialisation du programme ---".
    MOVE 0 TO COMPTEUR-BOUCLE.
    MOVE 'N' TO FIN-DEMANDEE-FLAG.

BouclePrincipale.
    ADD 1 TO COMPTEUR-BOUCLE.
    DISPLAY "Exécution de la boucle. Compteur: " COMPTEUR-BOUCLE.
    IF COMPTEUR-BOUCLE = 3
        MOVE 'O' TO FIN-DEMANDEE-FLAG
    END-IF.

Animation pas à pas :

Cliquez sur "Démarrer l'animation" pour commencer l'explication du flux du programme.