Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-74
MOVE Statements
PROCEDURE DIVISION.
begin-processing.
MOVE item-a TO temp1. (1)
MOVE item-a TO temp2. (2)
MOVE item-b TO temp3. (3)
MOVE item-b TO temp4. (4)
MOVE SPACES TO record-in.
MOVE ZEROS TO item-b.
(1) Item-a is truncated to fit temp1 .
(2) The remainder of temp2 is blank filled.
(3) The remainder of temp3 is zero filled.
(4) If the value in item-b is greater than 9.9, this move causes the TCP to
suspend the program unit with an arithmetic overflow error.