The COBOL DIVIDE
statement divides one numeric item into others setting data items to the quotient and, optionally, the remainder.
ROUNDED
phrase:
Default is TRUNCATION
if no rounded phrase specified. Default ROUNDED
mode is NEAREST-TOWARD-ZERO
(rounding down) unless other specified. So called Banker's rounding is NEAREST-EVEN
.