Parcours Accueil Tour guidé Initiation 1 h Initiation 24 h Révisions Exercices

🧩 4-3 – L'instruction  PERFORM  : répétitions et appels structurés

L’instruction  PERFORM  est l’une des plus importantes du langage  COBOL . Elle permet d’exécuter des paragraphes ou des sections, une ou plusieurs fois, de manière structurée. Elle remplace avantageusement les instructions de saut comme  GO  TO , en rendant le programme plus lisible, modulaire et maintenable.

🎯 Pourquoi utiliser  PERFORM  ?

• ✅ Pour appeler un paragraphe spécifique
• 🔁 Pour exécuter une boucle avec des conditions d’entrée ou de sortie
• 📦 Pour organiser son programme en blocs indépendants et testables

📌 Appel simple d’un paragraphe

Le cas le plus simple est l’appel direct d’un paragraphe avec  PERFORM  :

 PROCEDURE DIVISION.
    PERFORM AFFICHER-MESSAGE.
    STOP RUN.

 AFFICHER-MESSAGE.
    DISPLAY "Bienvenue dans COBOL".
  

Ici, le programme commence dans la  PROCEDURE  DIVISION , appelle le paragraphe  AFFICHER-MESSAGE , puis s’arrête.

🔁 Répétition avec  PERFORM   UNTIL 

On peut exécuter un paragraphe en boucle jusqu’à ce qu’une condition soit vraie :

 PERFORM TRAITER-LIGNE UNTIL FIN-FICHIER = "OUI".
  

Cela signifie : "exécute  TRAITER-LIGNE  tant que  FIN-FICHIER  est différent de OUI".

🔄 Boucle avec compteur ( VARYING )

Vous pouvez utiliser  PERFORM  avec  VARYING  pour itérer sur une variable numérique :

 PERFORM AFFICHER-LIGNE
    VARYING I FROM 1 BY 1 UNTIL I > 5.
  

Ici,  AFFICHER-LIGNE  sera exécuté cinq fois, avec I allant de 1 à 5.

📦 Exécution d’une section complète

Vous pouvez appeler une  SECTION  entière avec  PERFORM  :

 PERFORM TRAITEMENT SECTION.
  

Tous les paragraphes de la section seront exécutés dans l’ordre.

⚠️ Précautions à prendre

• 📌 Ne pas utiliser  PERFORM  sur un paragraphe qui modifie le même compteur que la boucle
• 📌 Éviter les conditions toujours vraies dans  UNTIL , cela créerait une boucle infinie
• 📌 Vérifier que chaque paragraphe se termine correctement (ex. : par  EXIT  ou  STOP RUN )

🧠 Astuce lisibilité

Donnez à vos paragraphes des noms explicites. Évitez les noms comme  P1  ou  TEST2 . Préférez :  CALCUL-TOTAL ,  INITIALISER-VALEURS , etc.

📌 Résumé

L’instruction  PERFORM  vous permet de :

• 🔁 Répéter un paragraphe jusqu’à une condition
• 🔂 Boucler avec un compteur numérique
• 🔗 Appeler une logique métier séparée de façon claire

C’est l’une des clefs de la programmation structurée en  COBOL . Dans les prochaines sections, vous apprendrez à la combiner avec  IF ,  EVALUATE , et à mieux organiser votre code.