COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-10
ADD TO
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.
imperative-stmt-1
is an imperative statement to be executed if a size error occurs during the addition
of addends or the storing of a result.
imperative-stmt-2
is an imperative statement to be executed if no size error occurs during the
addition of addends or the storing of a result.
ADD
addend
TO
result
ROUNDED
END-ADD
ON
SIZE ERROR
NOT
imperative-stmt-2
imperative-stmt-1
ON
SIZE ERROR
VST128.vsd