Variabili e PICTURE

In COBOL, tutte le variabili utilizzate devono essere dichiarate all'interno della DATA DIVISION. Nello specifico, le variabili temporanee in memoria destinate alla logica del programma risiedono nella WORKING-STORAGE SECTION.

Numeri di Livello (Level Numbers)

La dichiarazione delle variabili in COBOL fa uso dei numeri di livello per organizzare i dati gerarchicamente:

• 01: Definisce una variabile principale o un record (il livello più alto).
• 05, 10, 15: Definiscono campi subordinati all'interno di un record di livello 01.
• 77: Storicamente indicava variabili elementari indipendenti che non potevano essere suddivise ulteriormente.

Nella pratica moderna, si usa comunemente il livello 01 per dichiarare variabili elementari indipendenti.

La Clausola PICTURE (o PIC)

La clausola PICTURE (abbreviata in PIC) specifica il tipo di dato e la dimensione in caratteri della variabile. I tre caratteri di formato fondamentali sono:

1. X (Alfanumerico): Può contenere lettere, numeri e caratteri speciali.
   • PIC X(10) dichiara una stringa di esattamente 10 caratteri.
2. 9 (Numerico): Può contenere solo cifre numeriche.
   • PIC 9(3) dichiara un intero composto da 3 cifre (fino a 999).
3. V (Punto decimale implicito): Usato nei numeri con virgola per indicare dove posizionare i decimali (il punto decimale non viene memorizzato fisicamente).
   • PIC 9(3)V99 dichiara un numero con 3 cifre intere e 2 decimali.

La Clausola VALUE

Per assegnare un valore iniziale a una variabile al momento della dichiarazione, si utilizza la clausola VALUE.

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

Tutte le definizioni di variabile devono terminare con un punto ..

Prova tu