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

🔄 6-7 – Boucles avec  PERFORM VARYING  : itérations avec compteur

L’instruction  PERFORM VARYING  permet d’exécuter un paragraphe un certain nombre de fois, avec une variable compteur qui évolue à chaque itération. C’est l’équivalent de la boucle for dans d’autres langages.

📘 Syntaxe de base

 PERFORM PARAGRAPHE
    VARYING INDEX FROM 1 BY 1
    UNTIL INDEX > LIMITE.
  

Cela signifie : répéter le paragraphe tant que  INDEX  est inférieur ou égal à  LIMITE , en l’incrémentant de 1 à chaque tour.

🧪 Exemple pratique

 01 INDEX PIC 9(2).
 01 LIMITE PIC 9(2) VALUE 5.

 PERFORM AFFICHER-INDEX
    VARYING INDEX FROM 1 BY 1
    UNTIL INDEX > LIMITE.

 AFFICHER-INDEX.
    DISPLAY "Index = " INDEX.
  

Ce code affiche :
Index = 1
Index = 2
...
Index = 5

📦 Utilisation typique

 PERFORM VARYING  est souvent utilisé pour :

• 📁 Parcourir un tableau avec  OCCURS 
• 🔢 Répéter un traitement avec un nombre fixe d’itérations
• 🛠️ Construire un affichage ou une boucle de calcul contrôlée

🛑 Attention aux erreurs

• 🚫 Ne pas oublier d’initialiser le compteur si nécessaire
• 🚫 Vérifiez que le  BY  est cohérent (pas 0)
• 🚫 Boucle infinie si  UNTIL  ne devient jamais vrai

📌 Résumé

La boucle  PERFORM VARYING  est :

• 🔁 Une structure propre pour faire des itérations contrôlées
• 🧠 Lisible et modulaire, idéale pour les tableaux
• 📋 Pratique quand le nombre de tours est défini