先生と生徒の会話形式で理解しよう

生徒

「COBOLのバッチ処理がエラーで止まってしまったとき、すぐに最初からやり直しても大丈夫ですか？」

先生

「慌ててはいけませんよ。そのまま再実行すると、二重にデータを計算してしまう危険があるんです。」

生徒

「二重計算！？それは大変ですね。安全にやり直すための『リトライ制御』について教えてください。」

先生

「はい。失敗した原因を取り除き、正しい手順で復旧させるための注意点を一緒に見ていきましょう！」

1. リトライ制御とは何か？パソコン初心者向けに解説

リトライ制御（再試行制御）とは、プログラムが途中でエラーになって止まった際に、もう一度実行して正常な状態に戻すための仕組みやルールのことです。プログラミング未経験の方には、「料理の作り直し」をイメージしてもらうと分かりやすいでしょう。

例えば、カレーを作っていて途中で味付けを間違えたとします。そのままルーを追加して作り直すと、味が濃くなりすぎて食べられませんよね。一度お鍋を空にしてから作り直すか、失敗した直前の状態まで戻す必要があります。コンピュータの世界でも同じで、エラーが起きた後の「片付け」をせずに再実行すると、システム全体が壊れてしまうことがあるのです。

COBOL（コボル）が使われる銀行や企業のシステムでは、膨大なデータを取り扱うため、この「やり直しのルール」が非常に厳格に決められています。単にボタンをもう一度押せば良いというわけではなく、安全に復旧させるための手順が不可欠なのです。

2. 再実行時に最も怖い「二重更新」の恐怖

バッチ処理を再実行する際に、最も警戒しなければならないのが二重更新（にじゅうこうしん）です。これは、すでに処理が終わったデータに対して、もう一度同じ処理を重ねて行ってしまうミスです。

例えば、100人の給料を振り込むプログラムが、50人目のところでエラーになったとします。何も考えずに最初からやり直すと、最初の50人は給料が2回振り込まれてしまいます。これが二重更新の怖さです。これを防ぐためには、「どこまで処理が終わったか」を正確に把握し、重複しないように制御しなければなりません。


* すでに処理済みかどうかを判定するロジックの例
 IF UPDATED-FLG = "Y" THEN
     DISPLAY "このデータは処理済みのためスキップします"
     CONTINUE
 ELSE
     PERFORM UPDATE-PROCESS
     MOVE "Y" TO UPDATED-FLG
 END-IF.

3. 異常終了の原因を確認する重要性

プログラムが止まったとき、まずはなぜ止まったのかという原因調査が必要です。原因を直さずに何度リトライしても、同じ場所でまたエラーが発生してしまいます。これを専門用語で「異常終了（アベンド）」と呼びます。

原因にはさまざまな種類があります。

データの不備： 数字が入るべき場所に文字が入っている。
容量不足： データを保存する場所（ハードディスク）がいっぱい。
資源の競合： 他のプログラムが同じファイルを先に使っていて開けない。

これらをログ（実行記録）から読み取り、根本的な原因を取り除いてから初めて再実行の手順に進むことができます。

4. 初期化処理（リカバリ）の重要ポイント

再実行を安全に行うためには、プログラムを動かす前の状態にデータを戻す初期化（リカバリ）という作業が必要です。これは、お絵かきで失敗したときに、消しゴムできれいに消してから描き直す作業に似ています。

具体的には、中途半端に書き込まれたファイルを削除したり、データベースの情報をエラー前の状態に巻き戻したりします。この「巻き戻し」のことをロールバックと言います。COBOLの運用管理では、このロールバックが確実に行われたことを確認してから、再実行の指示を出します。


* エラー時にデータを元の状態へ戻す指示のイメージ
* 実際にはデータベースの機能などで制御します
 IF ERROR-STATUS NOT = "00" THEN
     DISPLAY "エラーが発生しました。ロールバックを実行します。"
     PERFORM DATABASE-ROLLBACK
     STOP RUN
 END-IF.

5. ステップリスタートとチェックポイント

巨大なバッチ処理を最初からやり直すと、時間がかかりすぎて朝までに終わらないことがあります。そこで使われるのがステップリスタートという手法です。これは、プログラムを細かな「ステップ」に分け、成功したステップは飛ばして、失敗したステップから再開する方法です。

これを実現するために、プログラムの途中で「ここまでは成功！」という印をつけることがあります。この印をチェックポイントと呼びます。登山で例えるなら、一度下山して登り直すのではなく、途中の山小屋から再出発するようなものです。これにより、復旧時間を大幅に短縮することができます。

6. ファイルのバックアップと世代管理

リトライに備える最強の武器はバックアップです。処理を開始する直前のデータを別の場所にコピーしておけば、どんなにデータがめちゃくちゃになっても、そのコピーを戻すだけで確実に元の状態に復旧できます。

COBOLの現場では、ファイルを「第1世代（今日）」「第2世代（昨日）」「第3世代（一昨日）」というように名前をつけて残す世代管理がよく行われます。再実行する際は、この「処理前の世代」を正しく選んでセットし直す必要があります。この世代の選択ミスは二次災害を招くため、非常に慎重に行われる作業です。


* 実行前にバックアップファイルを確認する例
 OPEN INPUT BACKUP-FILE.
 IF FILE-STATUS = "35" THEN
     DISPLAY "バックアップファイルが見つかりません。再実行不可です。"
     STOP RUN
 ELSE
     DISPLAY "バックアップからデータを復元し、再実行を準備します。"
 END-IF.

7. リトライ回数の制限と判断基準

「エラーが出たら自動でリトライする」という設定にしているシステムもありますが、無限に繰り返してはいけません。一般的には「リトライは3回まで」といった回数制限を設けます。なぜなら、データの不備などは何度やっても直らないからです。

回数制限に達しても成功しない場合は、システムを停止させて人間に判断を仰ぎます。運用管理者は、ログを見て「これは自動リトライで直る一時的な通信エラーだ」とか「これはデータを直さないとダメな致命的なエラーだ」という判断を下します。この判断力こそが、バッチ運用のエンジニアに求められるスキルです。

8. 再実行後の確認作業（照合処理）

再実行が完了して「正常終了」の文字が出ても、まだ安心はできません。本当にデータが正しく処理されたかを確認する照合（しょうごう）が必要です。合計金額が合っているか、処理件数にズレはないか、といった数字のチェックを行います。

特にリトライをした後は、どこかでデータが重複したり抜け落ちたりしやすいものです。前日の残高と今日の取引を足して、今日の残高と一致するかという「整合性」を厳しくチェックします。この最後の確認が終わって初めて、バッチ処理の復旧作業が完了したと言えるのです。


--- 再実行後の確認ログ ---
[INFO] ジョブ再実行：成功
[CHECK] 入力件数：5000件
[CHECK] 出力件数：5000件
[CHECK] 合計金額：10,500,000円 (前日比と一致)
[RESULT] データ整合性確認：OK

9. リトライ制御を意識した設計のコツ

最後に、これからCOBOLを学ぶ皆さんに覚えておいてほしいのは、「プログラムは止まるもの」という前提で設計することです。完璧に動くプログラムを作るのと同じくらい、「止まっても安全にやり直せるプログラム」を作ることは価値があります。

複雑な計算を一気に行うのではなく、途中で進捗を記録したり、再実行しても結果が変わらない（べき等性といいます）ように工夫したり。そうした「運用のしやすさ」を考えたプログラムこそが、長年愛されるCOBOLシステムの正体なのです。地味な部分ですが、このリトライ制御の考え方をマスターして、信頼されるエンジニアを目指しましょう！