Variables et PICTURE

En COBOL, toutes les variables utilisées doivent être déclarées au sein de la DATA DIVISION. Plus précisément, les variables temporaires en mémoire destinées à la logique du programme résident dans la WORKING-STORAGE SECTION.

Numéros de niveau (Level Numbers)

La déclaration des variables en COBOL utilise des numéros de niveau pour organiser les données de manière hiérarchique :

• 01 : Définit une variable principale ou un enregistrement (le niveau le plus élevé).
• 05, 10, 15 : Définissent des champs subordonnés au sein d’un enregistrement de niveau 01.
• 77 : Historiquement, indiquait des variables élémentaires indépendantes qui ne pouvaient pas être divisées davantage.

Dans la pratique moderne, on utilise couramment le niveau 01 pour déclarer des variables élémentaires indépendantes.

La clause PICTURE (ou PIC)

La clause PICTURE (abrégée en PIC) spécifie le type de données et la taille en caractères de la variable. Les trois caractères de format fondamentaux sont :

1. X (Alphanumérique) : Peut contenir des lettres, des chiffres et des caractères spéciaux.
   • PIC X(10) déclare une chaîne de caractères d’exactement 10 caractères.
2. 9 (Numérique) : Peut contenir uniquement des chiffres.
   • PIC 9(3) déclare un entier composé de 3 chiffres (jusqu’à 999).
3. V (Point décimal implicite) : Utilisé pour les nombres à virgule afin d’indiquer où positionner les décimales (le point décimal n’est pas stocké physiquement).
   • PIC 9(3)V99 déclare un nombre composé de 3 chiffres entiers et de 2 décimales.

La clause VALUE

Pour attribuer une valeur initiale à une variable lors de sa déclaration, on utilise la clause VALUE.

01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE     PIC 9(3)  VALUE 25.

Toutes les définitions de variables doivent se terminer par un point ...

À vous de jouer