COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs522555-006
9-14
ADD CORRESPONDING
ADD CORRESPONDING
ADD CORRESPONDING adds numeric elements of one data structure to
corresponding numeric elements of another data structure.
CORRESPONDING
CORR
are equivalent and specify that the values of corresponding elementary items of
two data structures are to be added.
group-1
is the identifier of a data structure in which some or all of the elementary items are
numeric.
Caution. ADD CORRESPONDING is not recommended, because minor changes to one data
structure can change the correspondence between its elements and those of the other data
structure, and this is difficult to detect.
ADD CORRESPONDING
CORR
ON
SIZE
ERROR
group-1 TO
group-2
ROUNDED
ON
SIZE
ERROR
imperative-stmt-1
NOT
imperative-stmt-2
END-ADD
VST130.vsd