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

Procedure Division
HP COBOL Manual for TNS/E Programs—520347-003
43-17
DIVIDE GIVING REMAINDER
DIVIDE GIVING REMAINDER
ENTER
DIVIDE
quotient
ROUNDED
divisor
dividend
REMAINDER
remainder
END-DIVIDE
ON
SIZE ERROR
NOT
ON
SIZE
ERROR
imperative-stmt-2
imperative-stmt-1
INTO
dividend
BY
divisor
GIVING
VST147.vsd
ENTER
OF
language
routine-name
USING
parameter
IN
file-mnemonic
OMITTED
GIVING
return-value
VST148.vsd