Ce code fonctionne, mais tout est imbriqué, difficile à relire ou à modifier.
La modularisation consiste à découper un programme en blocs fonctionnels indépendants, généralement organisés sous forme de paragraphes, de sections ou de sous-programmes. En COBOL , cela passe par une bonne structuration de la PROCEDURE DIVISION , l'utilisation de PERFORM , et parfois l'appel à d'autres programmes via CALL .
PROCEDURE DIVISION.
DISPLAY "Entrez votre nom :".
ACCEPT NOM.
DISPLAY "Entrez votre âge :".
ACCEPT AGE.
IF AGE >= 18
DISPLAY "Majeur"
ELSE
DISPLAY "Mineur".
Ce code fonctionne, mais tout est imbriqué, difficile à relire ou à modifier.
PERFORM
PROCEDURE DIVISION.
PERFORM LIRE-INFOS.
PERFORM TEST-MAJEUR.
STOP RUN.
LIRE-INFOS.
DISPLAY "Entrez votre nom :".
ACCEPT NOM.
DISPLAY "Entrez votre âge :".
ACCEPT AGE.
TEST-MAJEUR.
IF AGE >= 18
DISPLAY "Majeur"
ELSE
DISPLAY "Mineur".
Chaque bloc a une responsabilité claire. On peut les relire, tester ou remplacer séparément.
Une routine comme CALCUL-MOYENNE ou AFFICHER-RESULTAT peut être réutilisée dans plusieurs traitements, ou même externalisée dans un sous-programme .COB et appelée via CALL .
Modulariser son code COBOL, c’est :