🔢 Utilisation de la clause PICTURE 9

Comme une boîte numérique, une variable définie avec PIC 9 permet de stocker un chiffre (de 0 à 9). Cette clause est utilisée pour représenter des nombres, généralement dans les traitements comptables ou logiques.

01 CHIFFRE PIC 9 VALUE 7. Cette ligne COBOL déclare une variable appelée CHIFFRE. Le préfixe 01 indique qu’il s’agit d’un niveau principal dans la hiérarchie des données COBOL. Ensuite, CHIFFRE est le nom donné à cette variable. La clause PIC 9 (abréviation de PICTURE) signifie que cette variable est prévue pour stocker un seul chiffre numérique, compris entre 0 et 9. Enfin, la clause VALUE 7 initialise cette variable avec la valeur 7. Cela signifie que dès le démarrage du programme, la “boîte” nommée CHIFFRE contient le chiffre 7, prêt à être utilisé ou affiché.

Voici un exemple simple de programme COBOL qui affiche un chiffre initialisé à 7 :