cobol
Sposta la dichiarazione
Ricerca…
Osservazioni
MOVE è il cavallo di battaglia di COBOL. I dati vengono spostati dal letterale o dall'identificatore a uno o più identificatori. COBOL ha una distinzione tra elementare e gruppo MOVE. I dati elementari sono di tipo convertito da origine a destinazione. I dati del gruppo vengono spostati come una matrice di byte, indipendentemente dai tipi di campo con una struttura. I campi numerici vengono spostati da destra a sinistra, troncamento di cifre di ordine superiore con riempimento a zero (normalmente). I dati alfanumerici dei caratteri vengono spostati da sinistra a destra, il troncamento dei caratteri di estremità destra con il riempimento dello spazio. Ci sono alcune regole su come MOVE sue attività, con i moduli dati BINARY e PICTURE DISPLAY e le gerarchie di gruppo che sono state prese in considerazione.
Alcuni dettagli MOVE, ce ne sono molti
01 a PIC 9.
01 b PIC 99.
01 c PIC 999.
01 s PIC X(4).
01 record-group.
05 field-a PIC 9.
05 field-b PIC 99.
05 field-c PIC 999.
01 display-record.
05 field-a PIC Z.
05 field-b PIC ZZ.
05 field-c PIC $Z9.
*> numeric fields are moved left to right
*> a set to 3, b set to 23, c set to 123
MOVE 123 TO a b c
*> moves can also be by matching names within groups
MOVE a TO field-a OF record-group
MOVE b TO field-b OF record-group
MOVE c TO field-c OF record-group
MOVE CORRESPONDING record-group TO display-record
*> character data is moved right to left
*> s will be set to xyzz
MOVE "xyzzy" TO s