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

divisor
is the identifier of the elementary numeric data item or numeric literal that is the divisor.
dividend
is the identifier of an elementary numeric data item that is the dividend.
quotient
is the identifier of the elementary numeric item or elementary numeric edited data item in which
the quotient is to be stored.
ROUNDED
specifies that quotient is to be rounded before being stored.
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
316 Procedure Division Verbs