プログラムの実行中に入力または出力エラーが発生した場合に制御が与えられる ERROR 宣言型プロシージャーを 1 つ以上コーディングすることができます。 そのようなプロシージャーをコーディングしないと、入力または出力エラーの発生後に、ジョブが取り消されるか、異常終了します。
このようなプロシージャーをそれぞれ PROCEDURE DIVISION の宣言セクションに入れます。以下のものをコーディングすることができます。
ERROR 宣言型プロシージャーでは、訂正処置のコーディング、操作の再試行、実行の継続または終了を行うことができます。(ブロック化ファイルの処理を継続する場合、エラーが発生したレコードより後ろにあるブロック内の残りのレコードが失われることがあります。)エラーについてさらに詳しい分析を行う場合は、ERROR 宣言型プロシージャーとファイル状況キーを組み合わせて使用することができます。
関連参照
EXCEPTION/ERROR 宣言
(「COBOL for Windows 言語解説書」)