cobol => MOVE-verklaring

Opmerkingen

MOVE is het werkpaard van COBOL. Gegevens worden verplaatst van letterlijk of ID naar een of meer ID's. COBOL maakt onderscheid tussen elementaire en groep MOVE. Elementaire gegevens worden van bron naar bestemming geconverteerd. Groepsgegevens worden verplaatst als een bytearray, ongeacht veldtypen met een structuur. Numerieke velden worden van rechts naar links verplaatst, afkorting van hoge orde met nulvulling (normaal). Alfanumerieke tekengegevens worden van links naar rechts verplaatst, tekenafbreking rechts met spatievulling. Er zijn nogal wat regels voor de manier waarop MOVE zijn bedrijfsactiviteiten uitvoert, met zowel BINARY- als PICTURE DISPLAY-gegevensformulieren en groepshiërarchieën die allemaal verantwoordelijk zijn.

Enkele MOVE-details, er zijn er veel

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

Licentie onder CC BY-SA 3.0

Niet aangesloten bij Stack Overflow

cobol
MOVE-verklaring

Zoeken…

Opmerkingen

Enkele MOVE-details, er zijn er veel