Parte ii - IIS Marconi Latina - Area didattica

Manuale COBOL 915
La parola chiave ‘THROUGH’ o ‘THRU’ si usa per specificare un intervallo di valori (dalla costante
literal-1 a literal-2. Il valore singolo o l’intervallo di valori, può essere seguito da
altri.
Nell’esempio seguente, si vede la dichiarazione della variabile ‘VERNICIATURA’ che può contenere
una stringa di 30 caratteri (alfanumerica). A questa variabile si associano due nomi di
condizione, ‘VERNICE-CHIARA’ e ‘VERNICE-SCURA’, che servono a definire due gruppi di
colori, descritti per nome. Da questo si intuisce che nella parte procedurale del programma
venga attribuito alla variabile ‘VERNICIATURA’ il nome di un colore (scritto con lettere maiuscole);
poi, per verificare il tipo di colore si può usare uno di questi nomi di condizione,
per esprimere il fatto che la variabile contenga uno dei nomi del gruppo a cui quel nome fa
riferimento.
|000000 01 VERNICIATURA PIC X(30).
|000000 88 VERNICE-CHIARA "ARANCIO", "GIALLO", "VERDE",
|000000 "AZZURRO", "GRIGIO", "BIANCO".
|000000 88 VERNICE-SCURA "NERO", "MARRONE", "ROSSO",
|000000 "BLU", "VIOLA".
L’esempio seguente descrive la variabile ‘CODICE’ che può contenere una sola cifra numerica.
A questa variabile si associano dei nomi di condizione, che descrivono raggruppamenti diversi
delle cifre che possono essere contenute nella variabile.
|000000 02 CODICE PIC 9.
|000000 88 PARI 0, 2, 4, 6, 8.
|000000 88 DISPARI 1, 3, 5, 7, 9.
|000000 88 BASSO 0 THRU 4.
|000000 88 ALTO 5 THRU 9.
Nella divisione ‘PROCEDURE DIVISION’ potrebbero apparire righe come quelle successive,
per verificare che la variabile ‘CODICE’ contenga certi valori:
|000000 IF PARI
|000000 THEN
|000000 PERFORM ...;
|000000 ELSE
|000000 ...
In questo modo si evita di scrivere un’espressione condizionale complessa come nell’esempio
seguente:
|000000 IF CODICE IS EQUAL TO 0
|000000 OR CODICE IS EQUAL TO 2
|000000 OR CODICE IS EQUAL TO 4
|000000 OR CODICE IS EQUAL TO 6
|000000 OR CODICE IS EQUAL TO 8
|000000 THEN
|000000 PERFORM ...
|000000 ELSE
|000000 ...
I nomi di condizione si possono associare a variabili che hanno un contenuto alfabetico, alfanumerico
e numerico, ma nell’ultimo caso, deve trattarsi di valori rappresentati in forma di