Parte ii - IIS Marconi Latina - Area didattica

Manuale COBOL 955
della prima variabile, il contenuto della variabile viene copiato nella seconda; successivamente,
viene ripetuta la copia in modo corrispondente.
Se si compila il programma con OpenCOBOL e si avvia ciò che si ottiene, si dovrebbe vedere
un risultato simile a quello seguente, dove si può notare la differenza tra un tipo di copia e
l’altra:
|RECORD-1: 12345ABCDEFGHIJ12345
| A: 123.45
| B: ABCDEFGHIJ
| C: 12345
|RECORD-2: 12345ABCDEFGHIJ12345
| A: 5 .000
| B: CDEFGHIJ1234
| C: 12345A
|RECORD-2: 0012345ABCDEFGHIJ 0123450
| A: 0123.450
| B: ABCDEFGHIJ
| C: 0012345
Si osservi che una variabile di tipo ‘INDEX’ non può essere usata con l’istruzione ‘MOVE’.
Per assegnare un valore a una tale variabile occorre servirsi dell’istruzione ‘SET’.
82.12.13 Istruzione «MULTIPLY»
«
L’istruzione ‘MULTIPLY’ consente di eseguire delle moltiplicazioni. Sono previsti due diversi
formati per l’utilizzo di questa istruzione.
Nello schema sintattico appena mostrato, si vede che dopo la parola chiave ‘MULTIPLY’ viene
indicato un valore, in forma costante o attraverso una variabile; questo valore viene moltiplicato
per la variabile indicata dopo la parola chiave ‘BY’ e il risultato viene assegnato alla
stessa variabile che funge da moltiplicatore. Se appaiono più variabili dopo la parola ‘BY’, la
moltiplicazione viene ripetuta per ognuna di quelle, assegnando rispettivamente il risultato.
L’opzione ‘ROUNDED’ richiede di eseguire un arrotondamento se la variabile ricevente non può
rappresentare in modo esatto il valore; l’opzione ‘SIZE ERROR’ serve a eseguire un’istruzione
nel caso una delle variabili riceventi non possa accogliere la porzione più significativa del
valore ottenuto dalla somma. Si osservi l’esempio seguente:
|000000 MULTIPLY 100 BY A.
Supponendo che la variabile ‘A’, prima della divisione contenga il valore 5, dopo l’operazione