Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)

Procedure Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
6-48
MOVE Statements
MOVE CORRESPONDING Statement
The MOVE CORRESPONDING statement moves selected data items of one group to
corresponding data items of another group.
group-1
is the group name of sending data items.
group-2
is the group name of receiving data items.
group-1 and group-2 must be defined in the Working-Storage Section or the Linkage
Section, not in the Screen Section.
The following conventions apply to data items used with the CORRESPONDING
phrase:
•
group-1 and group-2 are the group names specified in the MOVE
CORRESPONDING statement. Either or both of these data items can be described
with the REDEFINES or OCCURS clause or be subordinate to items described with
these clauses.
•
Any subordinate data item of group-1 or group-2 which contains the
REDEFINES, RENAMES, OCCURS or USAGE IS INDEX clause will not be
moved.
•
No data item can be defined with a level number 66, 77, or 88.
Subordinate data items in two different groups correspond to each other according to the
following rules:
•
Both data items must have the same data name.
•
All possible qualifiers for the sending data item, not including the group name, must
be identical to all possible qualifiers for the receiving data item, not including the
receiving group name.
•
At least one of the corresponding sending/receiving items must be elementary. The
class of any corresponding pair of data items can differ.
•
Any data item subordinate to a data item that is not eligible for correspondence is
ignored.
•
FILLER data items are ignored.
MOVE { CORR } group-1 TO group-2
{ CORRESPONDING }