
Procedure Division
HP COBOL Manual for TNS/E Programs—520347-003
43-16
DIVIDE GIVING
DIVIDE GIVING
DIVIDE
divisor
dividend
INTO
dividend
BY
divisor
GIVING
END-DIVIDE
ON
SIZE ERROR
NOT
ON
SIZE
ERROR
imperative-stmt-2
imperative-stmt-1
quotient
ROUNDED
VST146.vsd