導入: なぜ今さら「段落」を語るのか
COBOLのPROCEDURE DIVISIONにおいて、PARAGRAPH（段落）はプログラムの骨格を成す最も基本的な構成要素です。昨今のモダンな開発環境では手続きが細分化される傾向にありますが、レガシーシステムの保守や大規模なバッチ処理においては、依然として「段落」の構造が可読性と保守性に直結します。本稿では、段落の正しい定義と、現場で嫌われる「スパゲッティコード」を回避するための設計指針を解説します。
基礎知識: 段落の定義と役割
COBOLにおいて、段落（PARAGRAPH）は「段落名」で始まり、「次の段落名」または「節（SECTION）の終わり」までを指す最小の命名単位です。
プログラムの実行制御において、PARAGRAPHは以下の二つの目的で活用されます。
1. 制御の分岐先: GO TO文の飛び先、あるいはPERFORM文によるサブルーチン呼び出しの単位。
2. 論理的なまとまり: 特定の処理（例：入力チェック、計算、出力）を意味のある塊として名前付けし、コードの意図を明確にする。
実装/解決策: 構造化プログラミングの原則
現場で避けるべきは、段落をまたいだ「GO TO文」の多用です。現代のCOBOL開発では、処理の飛び越しは避け、可能な限りPERFORM文による「呼び出し」に徹するべきです。また、一つの段落が肥大化しすぎないよう、1画面（あるいは30～50行程度）に収まるサイズで分割することが、可読性向上への近道です。
サンプルプログラム: 実用的な段落の構成例
以下に、メイン処理から段落を呼び出す標準的な構成例を示します。
IDENTIFICATION DIVISION.
PROGRAM-ID. PARA-SAMPLE.
PROCEDURE DIVISION.
MAIN-PROC.
- 処理の開始
PERFORM INIT-PARA.
PERFORM CALC-TOTAL-PARA.
PERFORM EXIT-PARA.
STOP RUN.
- 初期化処理を行う段落
INIT-PARA.
MOVE 0 TO COUNTER.
DISPLAY “初期化完了”.
- 合計を計算する段落
CALC-TOTAL-PARA.
ADD 10 TO COUNTER.
DISPLAY “現在値: ” COUNTER.
- 終了処理を行う段落
EXIT-PARA.
DISPLAY “全処理完了”.
応用・注意点: 現場で役立つ補足情報
段落設計における注意点として、以下の2点を推奨します。
1. 段落名の命名規則: 現場のコーディング規約に従うのは当然ですが、原則として「動詞＋名詞」の形式（例：CALC-TOTAL, READ-FILE）を採用し、何をする段落かを一目で分かるようにしてください。
2. EXIT段落の活用: 大規模な段落でPERFORMの範囲を明確にする場合、最後に「段落名-EXIT.」という空の段落を配置し、EXIT文を使用して制御を戻す手法が一般的です。これにより、複数の出口を持つような複雑な処理でも、終了位置が明確になりバグの混入を防ぐことができます。
段落は単なるラベルではなく、「プログラムの意図」を伝える重要なドキュメントです。適切な命名と適切なサイズ維持を心がけましょう。
コメント