L’objectif est de remplacer les instructions de saut inconditionnel comme GO TO par des appels structurés à des blocs de code bien identifiés, via PERFORM et des conditions IF ou EVALUATE .
La programmation structurée est une manière d’écrire du code de façon lisible, organisée et modulaire. Le langage COBOL a été adapté progressivement à ce paradigme, en particulier avec les normes COBOL 74 et COBOL 85.
L’objectif est de remplacer les instructions de saut inconditionnel comme GO TO par des appels structurés à des blocs de code bien identifiés, via PERFORM et des conditions IF ou EVALUATE .
PROCEDURE DIVISION.
GO TO ETAPE2.
ETAPE1.
DISPLAY "Étape 1".
STOP RUN.
ETAPE2.
DISPLAY "Étape 2".
GO TO ETAPE1.
Ce code est difficile à suivre, et peut provoquer des boucles infinies ou des erreurs logiques. Il n’est plus recommandé de coder de cette manière.
PERFORM
PROCEDURE DIVISION.
PERFORM ETAPE-1.
PERFORM ETAPE-2.
STOP RUN.
ETAPE-1.
DISPLAY "Étape 1".
ETAPE-2.
DISPLAY "Étape 2".
Ici, chaque paragraphe est exécuté dans un ordre clair. Le programme est plus facile à lire et à corriger.
INITIALISATION , CALCUL-TOTAL , etc.) GO TO que dans des cas très particuliers (gestion d’erreurs, fin de programme)
La programmation structurée en COBOL améliore la qualité de votre code, sa lisibilité et sa maintenabilité. Vous verrez dans les prochaines sections comment utiliser efficacement les instructions PERFORM , IF , et EVALUATE pour structurer vos traitements métier.