cobol
Oświadczenie MOVE

.NET Framework C Language C# Language C++ Java Language GNU/Linux Python Language Ruby Language SQL Microsoft SQL Server
Szukaj…


Uwagi

MOVE to koń roboczy COBOL. Dane są przenoszone z literału lub identyfikatora na jeden lub więcej identyfikatorów. COBOL rozróżnia elementarne i grupowe MOVE. Dane elementarne są konwertowane na typy ze źródła na miejsce docelowe. Dane grupy są przenoszone jako tablica bajtów, bez względu na typy pól o strukturze. Pola numeryczne są przenoszone od prawej do lewej, obcinanie cyfr wysokiego rzędu z zerowym wypełnieniem (normalnie). Dane znaków alfanumerycznych są przenoszone od lewej do prawej, obcinanie znaków z prawej strony z wypełnianiem spacją. Istnieje wiele zasad dotyczących sposobu prowadzenia działalności przez MOVE , z uwzględnieniem zarówno formularzy danych BINARY, jak i OBRAZ WYŚWIETLANIA oraz wszystkich hierarchii grup.

wprowadź opis zdjęcia tutaj

Niektóre szczegóły MOVE, jest wiele

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
Licencjonowany na podstawie CC BY-SA 3.0
Nie związany z Stack Overflow