1. 導入：なぜ外部ライブラリ連携が必要なのか
COBOLは基幹業務の計算処理には非常に強力ですが、OSの深い階層にある機能や、最新のハードウェア制御、高速な暗号化ライブラリなど、COBOL単体では手に負えない処理に直面することがあります。そんな時、C言語などで書かれた「静的ライブラリ」をCOBOLから呼び出せたらどうでしょう？
モダンCOBOL（COBOL 2002以降）で導入されたEXTERNALクラスを使えば、外部のネイティブ関数をCOBOLのオブジェクト指向構文の一部として取り込むことが可能です。これにより、コードの再利用性が高まり、開発の幅が飛躍的に広がります。
2. 基礎知識：EXTERNALクラスとは？
通常、COBOLからC言語の関数を呼ぶにはCALL文を使いますが、EXTERNALクラスを用いると、外部ライブラリを一つの「クラス」として定義できます。
REPOSITORY段落で外部リソースを宣言することで、COBOLコンパイラはそのライブラリ内の関数をメソッドのように認識します。これにより、手続き的な呼び出しではなく、オブジェクト指向らしいスマートな記述が可能になります。
3. 実装のステップ
1. 外部ライブラリ（.libや.aなど）を用意します。
2. COBOLのREPOSITORY段落で、そのライブラリをCLASSとして定義します。
3. 呼び出したい関数を、クラスのメソッドとして定義します。
4. インスタンスを介して（あるいは静的メソッドとして）その機能を呼び出します。
4. サンプルプログラム
以下のコードは、C言語の数学ライブラリにある「平方根計算（sqrt）」をCOBOLから呼び出すイメージです。
IDENTIFICATION DIVISION.
PROGRAM-ID. CallNativeLib.
- REPOSITORYで外部ライブラリをクラスとして定義
REPOSITORY.
CLASS MathLib AS “math_native_lib”.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 VAL COMP-2.
01 RESULT COMP-2.
PROCEDURE DIVISION.
MOVE 25.0 TO VAL.
- 外部ライブラリのメソッドを呼び出し
- 実際にはライブラリの仕様に合わせた引数設定が必要です
INVOKE MathLib “sqrt” USING VAL RETURNING RESULT.
DISPLAY “計算結果: ” RESULT.
STOP RUN.
5. 応用・注意点：現場でハマらないために
データ型のマッピングには細心の注意が必要です。COBOLの「COMP-2（浮動小数点）」とC言語の「double」などが正確に対応しているか、コンパイラの仕様書で必ず確認してください。また、リンカ設定が不適切だと、実行時に「未定義のシンボル」エラーで停止します。
現場では、C言語側でラッパー関数を作成し、COBOL側が扱いやすい引数構造（Copybookで定義したデータ項目など）に変換してから呼び出すのが、バグを回避するコツです。ぜひ、既存の資産をモダンCOBOLから活用してみてください。
コメント