COBOL Manual for TNS and TNS/R Programs
Procedure Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
43-18
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