入力ステートメントまたは出力ステートメントが失敗しても、COBOL がユーザーに代わって訂正処置を行うことはありません。 重大エラーではない入出力エラーが発生した後でプログラムの実行を継続するかどうかを選択してください。
COBOL は、特定の QSAM 入出力エラーを代行受信して処理するために、以下の方法を提供します。
FILE STATUS キーまたは宣言をコーディングしなかった場合に、重大な QSAM 処理エラーが起こると、メッセージが出され、言語環境プログラム条件が合図されます。ランタイム・オプション ABTERMENC(ABEND) が指定されていると、この条件の結果として、異常終了が引き起こされます。
FILE STATUS 節または EXCEPTION/ERROR 宣言を使用する場合は、そのファイルに対する DD ステートメントの DCB で EROPT=ACC をコーディングしてください。そうしなければ、COBOL プログラムは、いくつかのエラー条件が発生した後で処理を継続することができなくなります。
FILE STATUS 節を使用する場合は、必ずキーを調べ、キー値に基づいて適切なアクションを取るようにしてください。キーを調べなくても、プログラムが実行を継続できる可能性がありますが、予期したものではない結果になることがあります。
関連タスク
入出力操作でのエラーの処理