COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
subtrahend
is a numeric literal or the identifier of a numeric elementary data item.
minuend
is a numeric literal or the identifier of an elementary numeric data item.
result
is the identifier of a numeric or numeric edited elementary data item.
ROUNDED
specifies that the result is to be rounded before being stored.
imperative-stmt-1
is an imperative statement to be executed when a size error is detected in the subtraction or
in storing the result.
imperative-stmt-2
is an imperative statement to be executed when no size error is detected in the subtraction or
in storing the result.
END-SUBTRACT
ends the scope of the SUBTRACT statement, causing the SUBTRACT to be a delimited-scope
statement. If the SUBTRACT statement does not end with an END-SUBTRACT phrase, the presence
of the SIZE ERROR or the NOT SIZE ERROR phrase causes the SUBTRACT statement to be a
conditional statement, which ends at the next period separator.
SUBTRACT 469










