COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-12
ADD GIVING
ADD GIVING
ADD GIVING adds two or more numeric values and replaces the current value of one
or more result data items with that sum; for example,
ADD A B C GIVING D E
stores A+B+C in both D and E.
addend
is a numeric literal or the identifier of an elementary numeric data item.
result
is the identifier of an elementary numeric data item to which addend or the sum of
the addends is added.
ROUNDED
specifies that result is to be rounded before being stored.
ADD
addend
END-ADD
ON
SIZE ERROR
NOT
ON
SIZE ERROR
imperative-stmt-2
imperative-stmt-1
ROUNDED
result
TO
addend
GIVING
VST129.vsd