導入：なぜ「行継続」の知識が重要なのか
COBOLの現場で長年親しまれてきた「固定形式（Fixed Format）」では、長い文字列を記述する際、7桁目の標識領域にハイフン（-）を置いて行をまたぐ必要がありました。しかし、この手法は可読性を下げ、転記ミスによるバグの温床になりがちでした。モダンCOBOL（COBOL 2002以降）の「自由形式」を採用することで、この制約から解放されます。本稿では、コードをクリーンに保つための「&」連結演算子の活用法を解説します。
基礎知識：自由形式と連結演算子
COBOL 2002で導入された自由形式は、従来の72桁制限や特定の列（エリア）への記述義務を撤廃したものです。この環境下では、文字列リテラルを連結する「&（アンパサンド）」演算子が利用可能です。これにより、固定形式で行っていた「ハイフンによる継続」という物理的な制約を意識することなく、論理的な意味のまとまりでコードを記述できるようになりました。
実装・解決策：直感的な文字列連結
解決策はシンプルです。長い文字列を分割し、それぞれの末尾と先頭を「&」で繋ぐだけです。これにより、プログラムの見た目がスッキリし、メンテナンス性が飛躍的に向上します。特に、SQL文や複雑なメッセージ定義などをソースコード内に直接記述する際、非常に高い効果を発揮します。
サンプルプログラム
以下は、自由形式で長いメッセージを連結して表示する実用的な例です。
> 自由形式で記述（コンパイラオプションでFREE指定が必要）
IDENTIFICATION DIVISION.
PROGRAM-ID. SAMPLE-JOIN.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-MESSAGE PIC X(100).
PROCEDURE DIVISION.
MAIN-PROCEDURE.
> & を使うことで、ハイフンを気にせず複数行に分けて記述可能
> 視認性が高く、修正も容易になる
MOVE “これは非常に長い文字列を” &
“自由形式でスマートに” &
“連結するサンプルプログラムです。”
TO WS-MESSAGE.
DISPLAY WS-MESSAGE.
GOBACK.
応用・注意点：現場で役立つアドバイス
1. 空白文字の扱いに注意
「&」で連結する際、自動的に空白は挿入されません。例えば “ABC” & “DEF” と記述すると “ABCDEF” となります。単語間に空白が必要な場合は、明示的に含める（”ABC ” & “DEF”）ことを忘れないでください。
2. コンパイラオプションの確認
この記法は「自由形式」専用です。既存の固定形式（72桁制限があるもの）のソースファイルでそのまま記述すると、構文エラーになります。古い資産を移行する際は、まずソースコードの形式を自由形式へ変換する作業が必要になります。
3. SQL文での活用
特に埋め込みSQL（EXEC SQL）を使用する場合、長いSELECT文やWHERE句を「&」で適切に改行して記述することで、後任者がSQLの構造を把握しやすくなります。現場の保守性を高めるために、ぜひ積極的に導入してください。
コメント