In the text that follows, d1 and d2 must each be identifiers that refer to group items. A pair of data items, one from d1 and one from d2 correspond if the following conditions exist:
- A data item in d1 and a data item in d2 are not designated by the key word FILLER and have the same data-name and the same qualifiers up to, but not including, d1 and d2.
- At least one of the data items is an elementary data item and the resulting move is legal according to the move rules in the case of a MOVE statement with the CORRESPONDING phrase, and both of the data items are elementary numeric data items in the case of the ADD statement with the CORRESPONDING phrase or the SUBTRACT statement with the CORRESPONDING phrase.
- The description of d1 and d2 must not contain level-number 66, 77,
78
or 88, the USAGE IS INDEX clause
or the USAGE IS OBJECT clause
- A data item that is subordinate to d1 or d2 and contains a REDEFINES, RENAMES, OCCURS, USAGE IS INDEX
, USAGE IS PROCEDURE-POINTER
, USAGE IS POINTER
, or USAGE IS OBJECT
clause is ignored, as well as those data items subordinate to the data item that contains the REDEFINES, RENAMES, OCCURS, USAGE IS INDEX
, USAGE IS PROCEDURE-POINTER
, USAGE IS POINTER
, or USAGE IS OBJECT
clause. However, d1 and d2 can have REDEFINES or OCCURS clauses or be subordinate to data items with REDEFINES or OCCURS clauses.
Neither d1 or d2 can be reference modified.
- The name of each data item which satisfies the above conditions must be unique after application of the implied qualifiers.
