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 DIVISIONcontient 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 RUNmarque la fin du programme.
Téléchargez un code source : 🔍 Voir dans un nouvel onglet | 📥 Télécharger le fichier