Buscar..


Observaciones

MOVE es el caballo de batalla de COBOL. Los datos se mueven de un literal o identificador a uno o más identificadores. COBOL tiene una distinción entre MOVE elemental y grupal . Los datos elementales son tipos convertidos de origen a destino. Los datos de grupo se mueven como una matriz de bytes, sin tener en cuenta los tipos de campo con una estructura. Los campos numéricos se mueven de derecha a izquierda, truncamiento de dígitos de orden superior con relleno cero (normalmente). Los datos de caracteres alfanuméricos se mueven de izquierda a derecha. El truncamiento de los caracteres del extremo derecho con el relleno de espacio. Existen bastantes reglas sobre cómo MOVE se MOVE de su negocio, con los formularios de datos BINARY y PICTURE DISPLAY, y se tienen en cuenta las jerarquías de grupo.

introduzca la descripción de la imagen aquí

Algunos detalles de MOVE, hay muchos

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


Modified text is an extract of the original Stack Overflow Documentation
Licenciado bajo CC BY-SA 3.0
No afiliado a Stack Overflow