COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-54
DIVIDE GIVING
imperative-stmt-1
is an imperative statement for the process to execute if it detects a size error in the
division or in storing the result.
imperative-stmt-2
is an imperative statement for the process to execute if it does not detect a size
error in the division or in storing the result.
END-DIVIDE
ends the scope of the DIVIDE statement and makes it a delimited-scope
statement. If you omit END-DIVIDE but include the SIZE ERROR or NOT SIZE
ERROR phrase, the DIVIDE statement is a conditional statement and ends at the
next period separator.
Usage Considerations:
•
Mathematics
The statement
DIVIDE A INTO B GIVING C
means store B /A in C.
The statement
DIVIDE A BY B GIVING C
means store A /B into C.
•
Precision
For information on the precision of HP COBOL division, see Arithmetic Precision.