なぜ「見出し部」の整理が重要なのか？
COBOLのプログラムを作成する際、最初に必ず記述するのが「IDENTIFICATION DIVISION（見出し部）」です。昔のCOBOLの教科書を見ると、作成者名（AUTHOR）や作成日（DATE-WRITTEN）などがズラリと並んでいるコードを見かけることがあります。しかし、現代の開発現場では、これらを記述することはほとんどありません。なぜなら、それらの情報は「ソースコード管理システム（Gitなど）」で自動的に管理するのが一般的だからです。不要な記述を省くことで、コードがスッキリし、保守性が高まります。
そもそも「見出し部」とは何か？
COBOLプログラムは、大きく分けて4つの「部（DIVISION）」で構成されています。その最初の入り口が「見出し部」です。ここには、プログラムの名前を宣言する「PROGRAM-ID」という段落が必須です。一方で、かつて推奨されていたAUTHORやINSTALLATIONといった段落は、現代のCOBOL規格では「廃止予定（Obsolete）」とされており、記述しないことが推奨されています。
実装のポイント：必要最低限の記述方法
プログラムを正しくコンパイル・実行させるために必要なのは、以下の2点だけです。
1. IDENTIFICATION DIVISION. という宣言。
2. PROGRAM-ID. というプログラム名の宣言。
これ以外の情報は、ソースコードの先頭にコメントとして記述するか、バージョン管理ツールに任せるのが、ベテランエンジニアの流儀です。
サンプルプログラム
以下のコードは、現在推奨されている、最もシンプルで標準的な構成です。そのままコピーしてコンパイルしてみてください。
IDENTIFICATION DIVISION.
- プログラム名を指定する（必須）
PROGRAM-ID. HELLO-WORLD.
- ここから処理部が始まる
PROCEDURE DIVISION.
DISPLAY “Hello, COBOL World!”.
STOP RUN.
応用と注意点：現場での陥りやすいミス
現場で注意すべきは、「古いコードの書き方をそのまま踏襲しないこと」です。特にレガシーな環境から移行する場合、古いサンプルコードには不要な段落が大量に含まれていることがあります。これらをそのまま残すと、可読性が下がるだけでなく、コンパイラによっては警告が出ることもあります。
また、PROGRAM-IDの名前は、プロジェクトの命名規約に従うことが非常に重要です。後から他人が見ても何のプログラムか一目でわかる名前（例えば、処理内容を示す動詞＋名詞など）を付ける癖をつけましょう。
最後に、もしプログラムの説明をコード内に残したい場合は、AUTHORなどの廃止予定の段落を使うのではなく、アスタリスク（）を使ったコメント行で記述するのが正解です。これにより、将来的な規格変更にも柔軟に対応できるコードを保つことができます。
コメント