Parte ii - IIS Marconi Latina - Area didattica

Manuale COBOL 953
|002100 CHARACTERS BY "X" AFTER INITIAL "DDD",
|002200 LEADING "BB" BY "YZ" AFTER INITIAL "AAAAAA",
|002300 FIRST "C" BY "W",
|002400 ALL "C" BY "P".
|002500 DISPLAY STRINGA-DI-CARATTERI.
|002600 STOP RUN.
L’esempio appena mostrato sfrutta un’estensione al linguaggio tradizionale, in modo da ottenere
più sostituzioni con una sola passata. L’esempio fatto in questo modo permette di capire
cosa succede in queste situazioni particolari.
Compilando l’esempio e avviando il programma eseguibile che si ottiene, si dovrebbe vedere
il risultato seguente che rappresenta soltanto il contenuto finale della variabile elaborata:
|AAAAAAYZYZYZWPPPPPDDDXXXXXXXXX
82.12.12 Istruzione «MOVE»
L’istruzione ‘MOVE’ copia o assegna un valore in una o più variabili di destinazione. Sono
disponibili due modi di usare questa istruzione:
«
Oppure:
Nel primo caso, ciò che appare dopo la parola chiave ‘MOVE’ può essere il nome di una variabile,
oppure una costante. Il valore contenuto nella variabile o rappresentato dalla costante,
viene copiato in tutte le variabili indicate dopo la parola ‘TO’, rispettando eventualmente le
regole di modifica stabilite dai modelli di definizione delle variabili.
Nel secondo caso, avendo aggiunto la parola ‘CORRESPONDING’ (o soltanto ‘CORR’), si copia
il contenuto di una variabile strutturata in una o più variabili strutturate, abbinando però i
campi aventi lo stesso nome. In pratica, con il secondo schema si vogliono copiare i campi
della prima variabile strutturata che hanno gli stessi nomi di quelli contenuti nella seconda
variabile strutturata. Diversamente, per una copia di una variabile strutturata in altre variabili,
mantenendo inalterata la struttura originale dei dati, si usa il primo schema sintattico.