1. 導入：なぜメソッドの「一意名修飾」が必要なのか
COBOLのオブジェクト指向機能（COBOL 2002以降）を活用する際、避けて通れないのが「多重継承」や「複数インターフェース実装」に伴う名前の衝突です。特に、複数のインターフェースを実装したクラスで、たまたま同じ名称のメソッドが存在する場合、単にメソッド名だけを呼び出すと、コンパイラはどちらを実行すべきか判断できずエラーとなります。この「メソッドの曖昧さ」を解消し、確実に特定のインターフェースの機能を呼び出す手法が「一意名修飾」です。本稿では、この解決策を実務レベルで解説します。
2. 基礎知識：インターフェースとメソッドの衝突
オブジェクト指向におけるインターフェースとは、クラスが備えるべき「振る舞い」の契約書のようなものです。
例えば、「印刷機能を持つインターフェース（Printable）」と「保存機能を持つインターフェース（Storable）」があり、両方に「Execute」というメソッド名が含まれていたとします。一つのクラスがこれら両方を実装（IMPLEMENTS）したとき、`INVOKE MyObj “Execute”` と記述しても、それが「印刷」なのか「保存」なのかをCOBOLは判別できません。これを解決するために、`インターフェース名::メソッド名` という構文で明示的に指定する必要があります。
3. 実装・解決策：一意名修飾の手順
一意名修飾は、呼び出し（INVOKE）時に、メソッド名のプレフィックスとしてインターフェース名を付与します。
記述ルールは以下の通りです。
1. インターフェース名を記述する。
2. セパレータとして `::` （ダブルコロン）を挿入する。
3. その後にメソッド名を記述する。
この記述により、コンパイラおよびランタイムに対して、どの仕様に基づいたメソッドを呼び出したいのかを明確に指示できます。
4. サンプルプログラム
以下は、2つのインターフェースを実装したクラスから、特定の一意名を呼び出す実用的な例です。
IDENTIFICATION DIVISION.
PROGRAM-ID. MainModule.
DATA DIVISION.
WORKING-STORAGE SECTION.
- オブジェクト参照の定義
01 MyObj OBJECT REFERENCE MyClass.
PROCEDURE DIVISION.
> クラスのインスタンス化（省略）
> 通常の呼び出しでは曖昧になるケース
> PrintableインターフェースのPrintを明示的に呼び出す
INVOKE MyObj “Printable::Print”
> StorableインターフェースのPrintを明示的に呼び出す
INVOKE MyObj “Storable::Print”
STOP RUN.
- — コンパイル時のクラス定義イメージ —
- CLASS-ID. MyClass IMPLEMENTS Printable, Storable.
- METHOD-ID. Printable::Print.
- PROCEDURE DIVISION.
- DISPLAY “印刷処理を実行します”.
- END METHOD.
- METHOD-ID. Storable::Print.
- PROCEDURE DIVISION.
- DISPLAY “保存処理を実行します”.
- END METHOD.
- END CLASS.
5. 応用・注意点：現場でのバグ回避
現場でこの機能を利用する際、以下の点に注意してください。
命名規則の統一: 一意名修飾を多用するとコードが冗長になります。可能な限り、インターフェース設計の段階で「Print-Data」「Save-Data」のようにメソッド名が重複しないよう設計するのがベストプラクティスです。
コンパイラのバージョン: この構文はCOBOL 2002規格以降で正式にサポートされています。古い環境（COBOL 85など）では使用できないため、プロジェクトの環境仕様を必ず確認してください。
保守性の観点: インターフェース名を変更した場合、呼び出し側の記述もすべて修正する必要があります。インターフェース名は一度決めたら変更しない運用、あるいは定数化して管理するなどの工夫が必要です。
技術者として、名前の衝突を力技で回避するのではなく、言語仕様に基づく「一意名修飾」で論理的に解決する習慣をつけることで、より堅牢なオブジェクト指向プログラムを構築できるはずです。
コメント