⚙️ PROCEDURE DIVISION – Logique du programme

La PROCEDURE DIVISION est le cœur actif d’un programme COBOL. C’est ici que sont écrites les instructions qui décrivent ce que le programme doit faire : affichages, calculs, conditions, boucles, lectures, écritures, appels de sous-programmes, etc.

Toutes les données que vous avez déclarées dans la DATA DIVISION peuvent être manipulées ici.

🏗️ Structure de base

La PROCEDURE DIVISION commence toujours par la ligne :

PROCEDURE DIVISION.

Ensuite, vous écrivez vos instructions COBOL, ligne par ligne, chaque instruction se terminant par un point ..

📘 Exemple minimal

Voici un exemple très simple de programme qui affiche un message :

PROCEDURE DIVISION.
    DISPLAY "Bienvenue dans COBOL".
    STOP RUN.
  • DISPLAY : affiche une chaîne de caractères à l’écran
  • STOP RUN : termine proprement le programme

🧩 Organisation en paragraphes

Pour structurer le code, la PROCEDURE DIVISION peut contenir des paragraphes ou sections. Chaque paragraphe a un nom, suivi d’un point, et contient un ou plusieurs blocs d’instructions.

PROCEDURE DIVISION.
AFFICHAGE.
    DISPLAY "Exécution en cours...".
    STOP RUN.

Cette organisation permet une meilleure lisibilité, surtout dans des programmes de grande taille.

🔁 Exemples d’instructions COBOL courantes

  • MOVE : pour affecter une valeur à une variable
  • ADD / SUBTRACT / MULTIPLY / DIVIDE : opérations arithmétiques
  • IF / EVALUATE : structures conditionnelles
  • PERFORM : exécute un paragraphe ou une boucle
  • DISPLAY / ACCEPT : pour interagir avec l’utilisateur

🔤 Exemple avec logique conditionnelle

PROCEDURE DIVISION.
    IF AGE IS GREATER THAN 60
        DISPLAY "Vous êtes retraité."
    ELSE
        DISPLAY "Vous êtes en activité.".
    STOP RUN.

🔗 Interaction avec les données

Toutes les variables déclarées dans la DATA DIVISION peuvent être utilisées ici. Exemple avec une variable NOM :

MOVE "Dupont" TO NOM.
DISPLAY "Nom du client : " WITH NO ADVANCING.
DISPLAY NOM.

📌 À retenir

  • ⚙️ La PROCEDURE DIVISION contient la logique exécutable du programme
  • 🧱 Elle est structurée en paragraphes pour plus de clarté
  • 🧾 Toutes les instructions COBOL y sont écrites de façon lisible et explicite
  • 🧠 On y manipule les données déclarées dans la DATA DIVISION