Analyse complète du programme FluxProgramme

Voir le cours
Ce programme démontre les bases du contrôle de flux en COBOL : initialisation, boucle conditionnelle, affichage de messages, gestion d’un compteur et arrêt du programme. Il illustre comment organiser son code avec des paragraphes et des tests logiques simples.

1. Structure générale du programme

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 "Execution de la boucle. Compteur: " COMPTEUR-BOUCLE.
    IF COMPTEUR-BOUCLE = 3
        MOVE 'O' TO FIN-DEMANDEE-FLAG
    END-IF.

2. Étape par étape

Étape Action Explication
1 PERFORM Initialiser Appelle le paragraphe d’initialisation qui affiche un message et remet les variables à zéro.
2 PERFORM BouclePrincipale UNTIL FinDemandee Exécute la boucle principale tant que la condition FinDemandee n’est pas vraie.
3 STOP RUN Termine le programme proprement une fois la condition atteinte.

3. Variables utilisées

Nom Type Rôle
COMPTEUR-BOUCLE PIC 9 Incrémente à chaque tour de boucle. Sert de compteur de contrôle.
FIN-DEMANDEE-FLAG PIC X Drapeau logique indiquant si la boucle doit s’arrêter.
88 FinDemandee Condition symbolique Vaut vrai si FIN-DEMANDEE-FLAG contient 'O'.

4. Détail des paragraphes

  • Initialiser : remet le compteur à zéro, affiche un message, initialise le drapeau à 'N'.
  • BouclePrincipale : incrémente le compteur, affiche sa valeur, et active le drapeau d'arrêt si le compteur atteint 3.

5. Illustration du flux

🧭 Exécution du programme
  • 🔹 Lancement du programme
  • ➡️ Appel Initialiser
  • ➡️ Entrée dans BouclePrincipale
  • 🔁 Répétition jusqu’à COMPTEUR-BOUCLE = 3
  • ✅ Condition remplie ➜ arrêt
  • 🛑 STOP RUN

6. Résultat attendu

--- Initialisation du programme ---
Execution de la boucle. Compteur: 1
Execution de la boucle. Compteur: 2
Execution de la boucle. Compteur: 3

7. À retenir

  • Un programme COBOL démarre toujours dans la PROCEDURE DIVISION, au premier paragraphe.
  • Les paragraphes sont appelés avec PERFORM.
  • La condition UNTIL permet de créer des boucles contrôlées.
  • Les niveaux 88 rendent les tests logiques plus lisibles.
  • STOP RUN marque la fin du programme.

Téléchargez un code source : 🔍 Voir dans un nouvel onglet | 📥 Télécharger le fichier