導入
COBOLという言語は、半世紀以上の歴史を持ちながら、現在も金融や公共の基幹システムを支え続けています。しかし、あまりにも歴史が長いため、現代のコンパイラではエラーになる「過去の遺物」がソースコードに残っていることがあります。今回取り上げる「REMARKS」段落は、まさにその代表格。なぜこれが重要かといえば、古い資産をメンテナンスする際、この記述に出くわした若手技術者が「これは何だ？」と混乱しないようにするためです。古い仕様を知ることは、レガシーシステムを読み解くための「教養」なのです。
基礎知識
COBOLのプログラムは、大きく分けて4つの「部（Division）」で構成されます。その最初の部である「見出し部（Identification Division）」の中に、かつて「REMARKS」という段落が存在しました。これは、プログラムの説明文を記述するための領域です。しかし、現代のCOBOLでは、行の先頭にアスタリスク（）を置くことで、その行全体をコメントとして扱うことができます。REMARKSは、このコメント行が登場する前の、いわば「原始的な注釈機能」だったのです。1985年の規格で正式に削除（Obsolete）されており、現在のコンパイラでは使用できません。
実装/解決策
もし、解析中のレガシーコードの中にREMARKSを見つけた場合、そのコードを現代のコンパイラでそのままコンパイルしようとすると、構文エラー（Syntax Error）が発生します。解決策はシンプルです。その段落を削除し、適切な場所にアスタリスクを用いたコメント行として書き直すこと、これに尽きます。REMARKSはプログラムの構造上、コードのロジックに影響を与えることはありませんが、コンパイルを通すためには排除しなければならない「ノイズ」となります。
サンプルプログラム
以下のコードは、かつて存在したREMARKSの記述例です。現在の環境でコンパイルを通すために、どのように修正すべきかも併記しました。
[修正前（当時の記述）]
IDENTIFICATION DIVISION.
PROGRAM-ID. SAMPLE-PROG.
REMARKS. THIS MODULE IS FOR CALCULATING TOTAL AMOUNT.
- ここにロジックが続く…
[修正後（現代の記述）]
IDENTIFICATION DIVISION.
PROGRAM-ID. SAMPLE-PROG.
- —————————————————-
- 修正：REMARKSを削除し、アスタリスクを用いた
- コメント行に変更しました。
- THIS MODULE IS FOR CALCULATING TOTAL AMOUNT.
- —————————————————-
- ここにロジックが続く…
応用・注意点
現場での注意点として、REMARKSの内容が「そのプログラムの仕様書」の代わりになっている場合があるという点に注意してください。古いシステムでは、設計書が消失しており、ソースコード内のコメントが唯一の仕様書というケースは珍しくありません。REMARKSを削除する際は、その内容を新しいコメント形式に移行し、後続のメンテナンス担当者が困らないよう配慮することが、ベテラン技術者の作法です。また、古いコンパイラでしか動作しない特殊なオプション設定がないかも併せて確認してください。歴史を知ることは、現在のトラブルを未然に防ぐことにつながります。
コメント