PERFORM

Syntaxe

Paramètres

Description

Cette instruction permet de transférer le contrôle explicite d'une ou plusieurs procédures et retourne le contrôle implicite à chaque fois qu'une procédure est complété.

Remarques

• Contrôle de flux avec PERFORM : L'instruction PERFORM en COBOL permet de contrôler le flux d'exécution d'un programme en appelant des procédures ou en exécutant des boucles. Elle transfère explicitement le contrôle à une procédure ou à une série de procédures, puis récupère le contrôle lorsque la procédure est terminée. Cette fonctionnalité est cruciale pour structurer et organiser les programmes complexes.
• Exécution d'une seule procédure : La syntaxe de base de PERFORM (par exemple, PERFORM procedurename1) permet d'exécuter une seule procédure à la fois. C'est une méthode simple et directe pour exécuter une routine ou une série d'opérations définie sous un nom de procédure dans le programme COBOL.
• Exécution de plusieurs procédures (avec THROUGH ou THRU) : Lorsque l'on utilise la syntaxe PERFORM procedurename1 THROUGH procedurename2, COBOL exécute toutes les procédures spécifiées dans la plage entre procedurename1 et procedurename2. Cette fonctionnalité permet de structurer des blocs de traitement devant être exécutés dans un ordre particulier sans avoir besoin de les appeler séparément.
• Répétition d'une procédure un nombre spécifique de fois : Avec la forme PERFORM procedurename TIMES, il est possible d'exécuter une procédure un nombre défini de fois. Cela est très utile lorsque l'on souhaite répéter une série d'opérations (par exemple, dans des boucles de traitement ou d'initialisation) sans avoir à écrire des appels répétitifs manuellement.
• Boucles avec condition d'arrêt (UNTIL) : PERFORM peut aussi être utilisé pour créer des boucles conditionnelles avec UNTIL. Par exemple, PERFORM procedurename UNTIL condition1 permet d'exécuter la procédure tant qu'une condition n'est pas remplie. Cela permet de créer des boucles dynamiques et conditionnelles dans le code, un élément fondamental de la programmation structurée.
• Itérations avec un compteur dynamique (VARYING) : L'utilisation de VARYING dans une instruction PERFORM, comme PERFORM procedurename VARYING identifier2 FROM identifier3 BY identifier4 UNTIL condition1, permet de modifier l'état d'un compteur à chaque itération de la boucle. Cela permet de créer des boucles qui évoluent en fonction de variables dynamiques, offrant ainsi une grande flexibilité.
• Boucles imbriquées avec des conditions supplémentaires : La syntaxe étendue de PERFORM permet d'ajouter des itérations imbriquées avec des conditions supplémentaires, comme AFTER identifier5 FROM identifier6 BY identifier7 UNTIL condition2. Cela permet de définir des boucles plus complexes, avec plusieurs niveaux d'itération et des conditions de contrôle supplémentaires.
• Facilité d'organisation du code : PERFORM aide à organiser le code COBOL en le décomposant en petites procédures ou blocs de traitement, facilitant ainsi la lisibilité et la maintenance du programme. Elle permet de centraliser le code répétitif et d'éviter les redondances, rendant le programme plus modulaire et compréhensible.