La PROCEDURE DIVISION : là où tout commence

Tout ce qui précède la PROCEDURE DIVISION dans un programme COBOL est une préparation. C’est ici que le programme passe à l’action. Cette division contient toutes les instructions à exécuter, sous forme de verbes COBOL organisés dans des paragraphes.

1. Le rôle de la PROCEDURE DIVISION

C’est le moteur du programme. On y écrit les actions à exécuter, comme afficher un message, lire un fichier, effectuer un calcul ou vérifier une condition. Chaque instruction commence par un verbe COBOL : DISPLAY, READ, PERFORM, STOP, etc.

2. Structure de base

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

3. Décomposition du code

Instruction Explication
PERFORM Initialiser Appelle le paragraphe Initialiser, puis revient à la suite.
PERFORM ... UNTIL Exécute le paragraphe BouclePrincipale en boucle jusqu’à ce qu’une condition soit vraie.
STOP RUN Met fin au programme proprement.

4. Organisation en paragraphes

Un paragraphe en COBOL est un bloc d’instructions identifié par un nom. Le programme commence toujours par le premier paragraphe défini dans la PROCEDURE DIVISION.
Initialiser.
    DISPLAY "Bienvenue dans l'application".
    MOVE ZERO TO Compteur.

BouclePrincipale.
    PERFORM LireSaisie
    PERFORM TraiterCommande.

LireSaisie.
    ACCEPT ChoixUtilisateur.

TraiterCommande.
    IF ChoixUtilisateur = "X"
        SET FinDemandee TO TRUE
    END-IF.

5. Comparaison PERFORM simple et PERFORM conditionnel

Type Exemple Fonctionnement
PERFORM simple PERFORM Init Exécute une fois le paragraphe Init.
PERFORM UNTIL PERFORM Boucle UNTIL Fin Répète l’exécution tant que la condition n’est pas vraie.

6. Le verbe STOP

L’instruction STOP RUN termine l’exécution du programme. Elle est généralement placée à la fin du paragraphe principal. Contrairement à d’autres instructions qui peuvent échouer ou être ignorées, STOP RUN agit toujours de façon immédiate.

7. Bonnes pratiques

  • 📌 Utilisez des noms clairs pour vos paragraphes (ex : AfficherMenu, GererFichier).
  • 🔁 Regroupez vos instructions répétées dans un paragraphe appelé avec PERFORM.
  • 🎯 Évitez les longs paragraphes sans découpage, cela nuit à la lisibilité.

8. À retenir

  • 💬 La PROCEDURE DIVISION contient les actions à exécuter.
  • 📋 Chaque action commence par un verbe COBOL.
  • 🧱 Les instructions sont regroupées dans des paragraphes exécutés avec PERFORM.
  • STOP RUN marque la fin du programme.

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