🏗️ Appréhender la structure d’un programme COBOL
COBOL est un langage très structuré. Contrairement à d'autres langages modernes où le code peut parfois être écrit de façon plus libre, un programme COBOL est toujours organisé selon des blocs bien définis appelés divisions. Cette organisation stricte a un objectif clair : garantir la lisibilité, la maintenance, et la compatibilité avec les environnements professionnels. Vous pourrez aussi ajouter des commentaires.
📦 Les 4 grandes divisions d’un programme COBOL
Un programme COBOL est généralement divisé en 4 parties principales :
- IDENTIFICATION DIVISION : donne le nom et les infos de base du programme
- ENVIRONMENT DIVISION : définit le contexte d'exécution (fichiers, système, etc.)
- DATA DIVISION : déclare toutes les variables et structures de données
- PROCEDURE DIVISION : contient le code exécutable (les instructions métier)
Ces noms de divisions ne changent jamais, ils sont écrits en majuscules et suivis d’un point, comme le veut la syntaxe COBOL.
🔍 Exemple simple avec explication ligne par ligne
Voici un exemple basique, que nous allons ensuite décortiquer :
IDENTIFICATION DIVISION. PROGRAM-ID. StructureDemo. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. 01 MESSAGE PIC X(30) VALUE "Structure de base COBOL". PROCEDURE DIVISION. DISPLAY MESSAGE. STOP RUN.
🧩 Explications :
- IDENTIFICATION DIVISION : Elle contient PROGRAM-ID, qui est l'identifiant du programme.
- ENVIRONMENT DIVISION : Ici, elle est vide mais peut être utilisée pour définir des fichiers ou des configurations.
- DATA DIVISION : On y déclare une variable nommée
MESSAGEavec une taille de 30 caractères. - PROCEDURE DIVISION : C’est ici que le programme s’exécute : il affiche le contenu de
MESSAGE, puis s’arrête.
📘 Focus sur la WORKING-STORAGE SECTION
La WORKING-STORAGE SECTION fait partie de la DATA DIVISION. C’est là que vous déclarez vos variables globales, celles qui sont utilisées pendant toute l’exécution du programme.
Exemple :
01 NOM-UTILISATEUR PIC X(20). 01 AGE PIC 99.
Ici, NOM-UTILISATEUR est une chaîne de 20 caractères, et AGE est un entier sur 2 chiffres. Le mot-clé PIC (Picture) sert à définir le format de la donnée.
🧠 Pourquoi cette structure ?
La structure d’un programme COBOL peut paraître rigide au début, mais elle présente plusieurs avantages :
- Une séparation claire entre les données et le traitement
- Une meilleure lisibilité pour les équipes de maintenance
- Un format standardisé, compris partout dans le monde
Grâce à cette architecture, de nombreux programmes COBOL écrits dans les années 70 fonctionnent encore aujourd’hui, sans modifications majeures.
🧪 Exercice pour vous entraîner
Essayez de modifier le programme précédent pour qu’il affiche un autre message, ou qu’il demande un nom à l’utilisateur (dans une version interactive plus avancée). Pour l’instant, retenez bien la structure de base : chaque programme COBOL commence par une déclaration d’identification et se termine par une instruction STOP RUN.
👉 Pour continuer votre apprentissage
Vous pouvez consulter la page suivante pour approfondir l'introduction au langage et découvrir comment écrire vos premiers programmes : Introduction à COBOL