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

生徒

「COBOLで、他のプログラムを呼び出す方法ってありますか？」

先生

「はい、COBOLでは“外部サブルーチン”を使って、他のプログラムを呼び出すことができます。」

生徒

「外部サブルーチンって何ですか？難しそう…」

先生

「大丈夫ですよ。身近な例えを使って、ゆっくり説明していきますね！」

1. 外部サブルーチンとは？

外部サブルーチンとは、メインとなるプログラムから切り離して作成された、別のCOBOLプログラムを呼び出して実行する機能のことです。プログラミングにおける「サブルーチン」とは、特定の役割を持った小さな処理のまとまりを指します。これを「外部」として独立させることで、一つのプログラムだけでなく、複数の異なるプログラムから共通の部品として何度も呼び出すことが可能になります。

初心者の方にとって、プログラムの構造は少し複雑に見えるかもしれません。そこで、身近な例として「料理と家電製品」の関係でイメージしてみましょう。

カレーを作る工程（メインプログラム）を想像してください。具材を切ったり煮込んだりする途中で、「ご飯を炊く」という作業が必要になります。このとき、料理人が一から火を起こして鍋で炊くのではなく、すでに用意されている「炊飯器」という外部の道具にスイッチを入れて任せますよね。この「炊飯器」こそが、外部サブルーチンです。

プログラムの世界でも同様に、メインの処理が進む中で「複雑な税額計算」や「共通のログ出力」が必要になった際、自前ですべて書くのではなく、あらかじめ用意された専用の外部プログラムを呼び出して処理をお願いするのです。これにより、メインプログラムの記述がスッキリし、全体の構造が把握しやすくなるという大きなメリットがあります。

初心者向けイメージ図

メインプログラム： 料理の全体レシピ（カレー作り）
外部サブルーチン： 専用家電（炊飯器、電子レンジ、食洗機）
データの受け渡し： お米（材料）を渡して、炊き立てのご飯（結果）をもらう

2. なぜ外部サブルーチンを使うの？

大規模なシステム開発において、すべての処理を一つのプログラムに詰め込んでしまうと、コードが数万行に及び、どこに何が書いてあるか分からなくなる「スパゲッティ状態」に陥ってしまいます。そうなると、一部を修正しただけで思わぬ場所にエラーが出たり、プログラムの起動速度が低下したりするリスクが高まります。

そこで重要になるのが、処理を機能ごとに切り分けて小さく作るという考え方です。外部サブルーチンを活用することで、以下のような劇的なメリットが得られます。

開発効率の向上（再利用）

消費税計算や日付チェックなど、どの画面でも使う処理を「共通部品」として一度作っておけば、他のプログラマーもそれを呼び出すだけで済みます。同じコードを何度も書く手間が省けます。

保守・管理のしやすさ

例えば税率が変わった際、一つの外部サブルーチンを修正するだけで、それを呼び出しているすべてのプログラムに修正が反映されます。修正漏れによるバグを防ぎ、安全に運用できます。

未経験の方には、「レゴブロック」をイメージすると分かりやすいでしょう。完成品の城（メインプログラム）を作る際、窓やドア（外部サブルーチン）をあらかじめパーツとして作っておけば、別の家を作る時にもその窓のパーツをそのまま使い回せますよね。このように「部品化」して組み立てるのが、現代の効率的なシステム開発のスタンダードなのです。

3. CALL文で外部サブルーチンを呼び出す

COBOLで外部サブルーチンを動かすための最も重要な命令がCALL文です。文字通り、メインプログラムから「他のプログラムを呼んで（CALL）実行させる」役割を持っています。初心者の方は、スマートフォンの電話帳から特定の相手に電話をかけて、用件を伝えて結果をもらう様子をイメージすると分かりやすいでしょう。

基本的な書き方は以下の通りです。


CALL 'SUB-PROG' USING IN-DATA OUT-DATA

文法のポイント解説

'SUB-PROG'： 呼び出したい外部プログラムの名前です。シングルクォーテーションで囲みます。
USING： 外部プログラムに渡したいデータがある場合に記述します。
IN-DATA / OUT-DATA： サブルーチンへ送る値や、処理結果を受け取るための変数（引数）です。

例えば、画面に特定のメッセージを表示する処理を外部に任せる場合、以下のような流れになります。プログラム未経験の方でも、CALLが「指示出し」の合図だと分かれば、全体の構造が掴みやすくなります。


IDENTIFICATION DIVISION.
PROGRAM-ID. MAIN-APP.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 SEND-MSG  PIC X(20) VALUE "Hello COBOL!".

PROCEDURE DIVISION.
    * 外部プログラム 'MSG-DISP' を呼び出し、SEND-MSGの内容を渡す
    CALL 'MSG-DISP' USING SEND-MSG
    STOP RUN.

このように、メイン側は「何を渡して、どのプログラムを呼ぶか」を決めるだけで済みます。実際の表示処理（DISPLAYなど）が外部プログラム側に隠されることで、メインプログラムの可読性が格段に向上し、Googleが評価する「構造化された質の高いコード」としての保守性も確保されます。

ここが重要！
CALL文でデータを渡す際は、送り側と受け取り側でデータの「長さ（桁数）」と「順番」が完全に一致している必要があります。ここがズレると、全く違う値が表示されたりシステムが停止したりする原因になるため、慎重に定義しましょう。

4. 静的CALLと動的CALLの違い

CALL文には2つの使い方があります。

静的CALL（せいてきコール）： プログラム名を文字で直接書きます。
動的CALL（どうてきコール）： 変数に入ったプログラム名を使います。

まずは静的CALLの例から見てみましょう。


CALL 'PRINT-SUB' USING PRINT-TEXT

これが静的CALLです。呼び出すプログラム「PRINT-SUB」が文字で直接書かれています。

では次に、動的CALLの例です。


01 PROG-NAME PIC X(10).
MOVE 'PRINT-SUB' TO PROG-NAME
CALL PROG-NAME USING PRINT-TEXT

このように、変数にプログラム名を入れてからCALLすると、実行時に呼び出すプログラムを変更できるようになります。

5. 実際の例：計算用の外部サブルーチンを呼び出す

それでは、簡単なサンプルを見てみましょう。足し算の処理を別のサブルーチンに任せる場合の例です。


IDENTIFICATION DIVISION.
PROGRAM-ID. MAIN-PROG.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 NUM1        PIC 9(3) VALUE 100.
01 NUM2        PIC 9(3) VALUE 200.
01 RESULT      PIC 9(4).

PROCEDURE DIVISION.
    CALL 'ADD-SUB' USING NUM1 NUM2 RESULT
    DISPLAY "計算結果は " RESULT
    STOP RUN.

この例では、外部のADD-SUBというサブルーチンを呼び出し、NUM1とNUM2を渡して、計算された結果をRESULTに受け取っています。

呼び出される側（ADD-SUB）もCOBOLで、こんな風に書かれています。


IDENTIFICATION DIVISION.
PROGRAM-ID. ADD-SUB.

DATA DIVISION.
LINKAGE SECTION.
01 L-NUM1    PIC 9(3).
01 L-NUM2    PIC 9(3).
01 L-RESULT  PIC 9(4).

PROCEDURE DIVISION USING L-NUM1 L-NUM2 L-RESULT.
    ADD L-NUM1 TO L-NUM2 GIVING L-RESULT
    EXIT PROGRAM.

6. LINKAGE SECTIONとは？

LINKAGE SECTION（リンケージ・セクション）は、外からデータを受け取るための特別な場所です。呼び出されたサブルーチンで、他のプログラムから渡されたデータを使うために定義します。

このLINKAGE SECTIONに定義した変数と、CALL文で渡す変数は、順番も型も合わせる必要があります。間違えるとエラーになりますので注意しましょう。

7. 外部サブルーチン使用時の注意点

プログラム名は大文字で統一するのが一般的です。
パラメータの数・順番・型は、呼び出す側と呼び出される側で一致させる必要があります。
EXIT PROGRAMで処理を終了させることを忘れないでください。
動的CALLの場合、変数に正しい文字列が入っていないとエラーになります。

これらに注意することで、スムーズに外部サブルーチンを活用できます。

8. 外部サブルーチンを使うメリット

初心者にとっては少し難しそうに感じるかもしれませんが、外部サブルーチンを使うことで以下のようなメリットがあります。

プログラムを小さく分けて管理できる
同じ処理を何度も使えるので、無駄な繰り返しがなくなる
修正や確認がしやすくなるので、バグを見つけやすい

まるで料理の「レシピ」を分けて管理するようなものです。「スープの作り方」「サラダの作り方」「ご飯の炊き方」をそれぞれレシピとして分けておけば、必要な時にすぐ使えますよね。

まとめ

COBOLで外部サブルーチンを呼び出す方法や、その仕組み、静的CALLと動的CALLの特徴、LINKAGE SECTIONの役割などを振り返ると、外部サブルーチンは大規模システムにおいて欠かせない重要な構成要素であることがよく理解できます。特に、複数のプログラム間で共通処理を再利用できる点は、大規模現場ならではの作業効率化につながり、安定した運用の基盤になります。外部サブルーチンは、単なる「別プログラムの呼び出し」ではなく、システム全体の構造を整理し、保守しやすくし、処理の明確化と再利用性向上にとても役立ちます。さらに、CALL文によって外部プログラムへ正しくデータを渡し、結果を受け取る仕組みを理解することで、COBOLのデータ連携やモジュール分割の意義も深く実感できるようになります。また、静的CALLと動的CALLの違いを理解することは、柔軟なプログラム設計に直結します。特に動的CALLは、実行時に呼び出すプログラムを切り替えることができるため、入力に応じて処理を変えたい場合や、可変的な構造を必要とする業務ロジックでは大きな効果を発揮します。COBOLの外部サブルーチンを活用することで、プログラムを小さく分割して管理でき、必要な箇所だけ修正すれば全体に波及しないメリットがあります。 CALL文、USING句、LINKAGE SECTIONの関連性を正確に理解することは、COBOLにおけるパラメータ受け渡しの基礎であり、順番や型の一致が非常に重要である理由も実務を通して実感しやすい部分です。特にLINKAGE SECTIONにおける受け取り定義は、外部サブルーチンの振る舞いを決める大切な要素で、ここを誤ると意図した値を正しく受け取れず、結果として処理の誤動作につながります。大規模COBOLシステムでは、数百、数千のプログラムが連携するケースも多く、外部サブルーチンの正確な理解は不可欠な技術となります。以下は、学んだ内容を整理するための外部サブルーチン構造をまとめたサンプルコードです。


IDENTIFICATION DIVISION.
PROGRAM-ID. MAIN-PROG.

DATA DIVISION.
WORKING-STORAGE SECTION.
01  IN-VALUE1     PIC 9(3) VALUE 050.
01  IN-VALUE2     PIC 9(3) VALUE 070.
01  OUT-VALUE     PIC 9(4).

PROCEDURE DIVISION.
    DISPLAY "外部サブルーチン呼出開始".
    CALL 'CALC-SUB' USING IN-VALUE1 IN-VALUE2 OUT-VALUE
    DISPLAY "計算結果：" OUT-VALUE
    STOP RUN.


IDENTIFICATION DIVISION.
PROGRAM-ID. CALC-SUB.

DATA DIVISION.
LINKAGE SECTION.
01  L-IN1       PIC 9(3).
01  L-IN2       PIC 9(3).
01  L-OUT       PIC 9(4).

PROCEDURE DIVISION USING L-IN1 L-IN2 L-OUT.
    ADD L-IN1 TO L-IN2 GIVING L-OUT
    EXIT PROGRAM.

このように、メインプログラムからCALL文を使い、外部のCALC-SUBを呼び出し、USING句を通じて値を受け渡すことで、柔軟で整理されたプログラム構成を実現できます。外部サブルーチンは、COBOLの強みである安定性・再利用性・保守性の高さを支える根幹であり、初心者の段階でしっかりと理解しておくことで実務でも大きな助けになります。また、外部サブルーチンを扱う際には、プログラム名の統一、EXIT PROGRAMの書き忘れ防止、USING句の順番・型の整合性などの注意点を守ることで、予期せぬエラーを回避でき、長期運用にも耐える堅牢なCOBOLシステムを作ることができます。複雑な業務ロジックを扱う現場では、このような基本の積み重ねが品質確保に直結していきます。

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

生徒

「先生、外部サブルーチンって複雑だと思っていましたが、CALL文の仕組みが分かると意外と理解しやすいですね！」

先生

「そうなんだよ。基本的な考え方はシンプルで、必要な処理を外に任せて呼び出すだけなんだ。プログラムの役割を分けることで、整理しやすくなるんだよ。」

生徒

「LINKAGE SECTIONで受け取るデータの順番や型が大事という理由もよく分かりました！間違えると正しい計算ができなくなるんですね。」

先生

「その通り。外部サブルーチンは複数のプログラムと連携して動くから、受け渡しが正しいかどうかがとても重要になるんだ。」

生徒

「動的CALLも便利ですね。実行時に呼び出すプログラムを切り替えられるのは業務でも役立ちそうです。」

先生