COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

result
is the identifier of a numeric elementary item or numeric edited elementary item where the result
of the computation is to be stored.
ROUNDED
specifies that the value is rounded before being stored.
expression
is an arithmetic expression.
imp-stmt-1
is an imperative statement to be executed when a size error has been detected in the
computation or in storing the result.
imp-stmt-2
is an imperative statement to be executed when no size error is detected in the computation
or in storing the result.
END-COMPUTE
ends the scope of the COMPUTE statement, causing the COMPUTE to be a delimited-scope
statement. If the COMPUTE statement does not end with an END-COMPUTE phrase, the presence
of the SIZE ERROR or the NOT SIZE ERROR phrase causes the COMPUTE statement to be a
conditional statement, which ends at the next period separator.
Usage Considerations:
• See Arithmetic Operations (page 257) for information on data conversion and alignment,
intermediate results, multiple results, and incompatible data.
• See Arithmetic Precision (page 261) for information on precision of addition.
• See ROUNDED Phrase (page 244) and SIZE ERROR Phrase (page 244) for information on these
phrases.
For Example 80 and Example 81, these descriptions are in the Working-Storage Section of a
program:
308 Procedure Division Verbs