次の例は、ゼロ除算が発生した場合にプログラムが通知メッセージを出すように 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.
ゼロ除算が発生すると、プログラムはメッセージを作成し、プログラム実行を停止します。