名前
CORBA-OBJECT-DUPLICATE
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY CONST IN CORBA.
01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY OBJ.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY RET-OBJ.
PROCEDURE DIVISION.
CALL "CORBA-OBJECT-DUPLICATE" USING
OBJ
ENV
RET-OBJ.機能説明
オブジェクトリファレンスを複製し、複製したオブジェクトのオブジェクトリファレンスを返します。
本関数はオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASE関数を使用して領域を解放する必要があります。
復帰値
正常終了した場合は、オブジェクトリファレンスが返され、ENV構造体の MAJORにはCORBA-NO-EXCEPTIONが設定されます。
異常終了した場合は、ENV構造体のMAJORにはCORBA-SYSTEM-EXCEPTIONが設定され、IDとMINORに詳細情報が設定されます。
IDとMINORの意味については、“メッセージ集”の“CORBAサービスから通知される例外情報/マイナーコード”を参照してください。
OBJにNULLが指定された場合は、ENV構造体のMAJORにはCORBA-USER-EXCEPTIONが設定されます。