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

生徒

「先生、COBOLのプログラムが大きくなってきたんですけど、同じ処理を何度も書くのが大変です…。」

先生

「それは良い気づきですね。COBOLでは、サブルーチンやCOPY句を使うことで、同じ処理を何度も書かずに済むようになりますよ。」

生徒

「サブルーチンとCOPY句って、何が違うんですか？」

先生

「サブルーチンは“呼び出して使う処理のまとまり”、COPY句は“共通の部品を貼り付ける仕組み”です。それぞれの使い分け方や管理のコツを一緒に見ていきましょう。」

1. サブルーチンとは？

サブルーチンとは、COBOLで特定の処理をひとまとまりにして、他のプログラムから呼び出せるようにしたものです。たとえば、「日付の計算」や「データのフォーマット」など、複数のプログラムで共通して使う処理をサブルーチン化しておくと、修正や保守がとても簡単になります。

たとえるなら、サブルーチンは「お料理のレシピ」のようなものです。カレーを作るとき、毎回スパイスの配合を考えるのは大変ですよね。レシピ（＝サブルーチン）があれば、必要なときに同じ手順で再利用できます。

COBOLでのサブルーチン呼び出し例


CALL 'DATECALC' USING WS-DATE-IN WS-DATE-OUT.

この例では、「DATECALC」というサブルーチンを呼び出し、日付の入力データと出力データを引数として渡しています。こうすることで、共通の処理を一か所にまとめ、他のプログラムから呼び出すことができます。

2. COPY句とは？

COPY句は、COBOLで共通の定義や構造を外部ファイルにまとめておき、プログラム内で「貼り付ける」ように再利用する仕組みです。特に、データ定義（項目名や構造）や定数を共通化するのにとても便利です。

たとえば、社員情報を扱うプログラムが複数ある場合、同じデータ構造をそれぞれのプログラムに書くのは非効率です。そこで、共通部分を外部のCOPYファイルにまとめます。

COPY句のサンプル


01 EMPLOYEE-INFO.
   05 EMP-ID     PIC 9(5).
   05 EMP-NAME   PIC X(20).
   05 EMP-AGE    PIC 9(3).

これを「EMPINFO.CPY」というファイルに保存しておき、各プログラムで次のように呼び出します。


COPY 'EMPINFO'.

こうしておくと、共通定義を一元管理でき、社員情報の項目が増えた場合も「EMPINFO.CPY」だけを修正すれば済みます。

3. サブルーチンとCOPY句の違い

初心者の方がよく混乱するポイントが「どちらを使えばいいの？」という点です。簡単に言うと次のように使い分けます。

サブルーチン：動的な処理（計算や判定など）を共通化したいとき。
COPY句：静的な定義（データ構造や定数など）を共通化したいとき。

つまり、サブルーチンは「処理を再利用」、COPY句は「定義を再利用」するための仕組みです。

4. COPY句管理のベストプラクティス

COBOLの現場では、COPY句ファイルが数百個になることもあります。管理を怠ると、どのプログラムでどのCOPY句を使っているのか分からなくなり、修正時に大混乱することもあります。

以下のようなルールを守ることで、COPY句を安全かつ効率的に運用できます。

① ファイル命名規則を統一する

例えば「共通データ定義」ならCMN-EMPINFO.CPY、「業務別」ならPAY-DETAIL.CPYなど、接頭語で分類しておくと検索しやすくなります。

② バージョン管理を行う

Gitなどのバージョン管理ツールでCOPY句の変更履歴を追えるようにします。古いバージョンが必要になった場合も、すぐに復元できます。

③ コメントをしっかり書く

COPY句の先頭に「作成日」「作成者」「用途」「変更履歴」をコメントで記載しておくと、後任者にもわかりやすくなります。


*> EMPINFO.CPY
*> 作成日：2025/10/01
*> 用途：社員情報の基本構造定義
*> 更新履歴：2025/11/01 年齢項目を追加

5. サブルーチン運用のベストプラクティス

サブルーチンは、複数のプログラムから呼び出されるため、変更の影響範囲が広くなります。そのため、次のようなポイントに注意して運用しましょう。

① 入出力項目を明確にする

USINGで渡すデータ（引数）と、返すデータ（戻り値）を整理しておきましょう。曖昧なまま追加していくと、他のプログラムとの互換性が崩れます。

② エラー処理を統一する

エラーコードや例外メッセージの管理を統一すると、デバッグが容易になります。サブルーチンでエラーが発生した場合は、戻り値でエラーコードを返す仕組みが一般的です。


CALL 'FILECHK' USING WS-FILE-NAME WS-STATUS.
IF WS-STATUS NOT = 'OK'
    DISPLAY "ファイルチェックエラー"
END-IF

③ 共通化しすぎない

なんでもかんでもサブルーチン化すると、逆に複雑になります。たとえば、ある業務にしか使わない処理まで共通化すると、修正時に影響が広がってしまいます。汎用性が高い処理だけをサブルーチンにするのがポイントです。

6. COPY句とサブルーチンの連携

実際の開発現場では、COPY句で定義したデータをサブルーチンで利用するケースが多くあります。例えば、共通の顧客情報定義をCOPY句から読み込み、その情報を処理するロジックをサブルーチンとして呼び出す構成です。

組み合わせのサンプル構成


IDENTIFICATION DIVISION.
PROGRAM-ID. CUSTOMER-MAIN.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY 'CUSTINFO'.

PROCEDURE DIVISION.
    CALL 'CUSTCHECK' USING CUST-ID CUST-STATUS.

このように、COPY句とサブルーチンを組み合わせることで、COBOLプログラムの保守性と再利用性を大幅に向上させることができます。

まとめ

ここまで、COBOLにおけるサブルーチンとCOPY句の基本から実務での使い分け、さらに保守性や再利用性を高めるためのベストプラクティスについて詳しく見てきました。COBOLは長年企業システムで使われてきた言語であり、安定した運用が求められるため、コードの整理や共通化はとても重要なポイントになります。

サブルーチンは、処理の共通化を実現するための重要な仕組みです。例えば日付計算やファイルチェック、入力値の検証など、複数のプログラムで繰り返し使われる処理はサブルーチンとして切り出すことで、コードの重複を防ぎ、修正時の影響範囲を最小限に抑えることができます。CALL文を使って外部プログラムを呼び出す設計は、COBOL開発において基本でありながら非常に強力なテクニックです。

一方でCOPY句は、データ定義の共通化に特化した仕組みです。社員情報や顧客情報のように複数のプログラムで同じレイアウトを使う場合、COPY句を利用することで一元管理が可能になります。これにより、項目追加や変更が発生した場合でも、COPYファイルを修正するだけで全体に反映されるため、保守効率が大きく向上します。

重要なのは、サブルーチンとCOPY句を正しく使い分けることです。処理を共通化したい場合はサブルーチン、データ構造を共通化したい場合はCOPY句という基本ルールを押さえておくことで、設計の迷いが減り、可読性の高いプログラムを作ることができます。

また、実務では単に使うだけでなく、運用ルールも非常に重要になります。COPY句ファイルには命名規則を設け、用途ごとに分類することで管理しやすくなります。さらにコメントをしっかり残すことで、後から参画した開発者でも内容を理解しやすくなります。サブルーチンについても、引数の設計やエラーコードの扱いを統一することで、複数人開発でも混乱を防ぐことができます。

例えば、以下のようにCOPY句とサブルーチンを組み合わせることで、実務に近い形のプログラム構成を実現できます。データ定義はCOPY句で読み込み、処理はサブルーチンに任せるという設計は、COBOL開発の現場で非常によく使われるパターンです。


IDENTIFICATION DIVISION.
PROGRAM-ID. SAMPLE-MAIN.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY 'EMPINFO'.

PROCEDURE DIVISION.
    MOVE 10001 TO EMP-ID
    CALL 'EMPCHK' USING EMP-ID EMP-AGE
    IF EMP-AGE > 60
        DISPLAY "定年対象の社員です"
    END-IF.

このように、データ構造はCOPY句で統一し、ロジックはサブルーチンに集約することで、プログラム全体の見通しが良くなり、保守や改修が非常にやりやすくなります。特に大規模な業務システムでは、このような設計が品質に直結するため、しっかり理解しておくことが重要です。

さらに、COBOLの開発現場では長期間にわたってシステムが使われるため、将来の変更にも耐えられる設計が求められます。そのためには、共通化のやりすぎにも注意が必要です。すべてをサブルーチン化してしまうと、逆に依存関係が複雑になり、修正時に影響範囲が広がってしまいます。適切な粒度で共通化することが、安定したシステム運用の鍵になります。

COBOL初心者の方は、まずは小さなサブルーチンを作ることから始めてみてください。そして、同じデータ定義を複数箇所で書いていると気づいたら、COPY句にまとめる習慣をつけることが大切です。この積み重ねが、読みやすく保守しやすいプログラムへとつながっていきます。

本記事で解説したサブルーチンとCOPY句の考え方は、COBOLだけでなく他のプログラミング言語にも通じる重要な概念です。共通化、再利用、保守性といったキーワードを意識しながら、実務でも活かせるスキルとして身につけていきましょう。

先生と生徒の振り返り会話

生徒

サブルーチンとCOPY句の違いがやっと分かってきました。処理をまとめるのがサブルーチンで、データをまとめるのがCOPY句なんですね。

先生

その通りです。COBOL開発ではこの違いを理解して使い分けることがとても大切です。特に大規模なシステムでは、共通化の設計が品質に大きく影響します。

生徒

同じコードを何度も書いていたのですが、サブルーチンにすれば修正も楽になりますね。

先生

はい。例えばバグが見つかった場合でも、サブルーチンを一か所修正するだけで済むので、作業効率が大きく向上します。

生徒