COBOL Manual for TNS and TNS/R Programs

Procedure Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
43-16
DIVIDE INTO
DIVIDE INTO
DIVIDE
divisor
INTO
END-DIVIDE
ON
SIZE ERROR
NOT
ON
SIZE ERROR
imperative-stmt-2
imperative-stmt-1
dividend
ROUNDED
VST145.vsd