次の例は、0 による除算を行うとプログラムが通知メッセージを 出すように、ON SIZE ERROR 命令ステートメントをコーディングする方法を示しています。
DIVIDE-TOTAL-COST.
DIVIDE TOTAL-COST BY NUMBER-PURCHASED
GIVING ANSWER
ON SIZE ERROR
DISPLAY “ERROR IN DIVIDE-TOTAL-COST PARAGRAPH”
DISPLAY “SPENT ” TOTAL-COST, “ FOR ” NUMBER-PURCHASED
PERFORM FINISH
END-DIVIDE
. . .
FINISH.
STOP RUN.
0 による除算を行うと、プログラムはメッセージを書き出し、プログラム実行を停止します。