名前
CORBA-ORB-GET-DEFAULT-CONTEXT
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY CONST IN CORBA.
01 COPY ORB IN CORBA REPLACING CORBA-ORB BY ORB.
01 COPY CONTEXT IN CORBA REPLACING CORBA-CONTEXT BY CTX.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 COPY STATUS IN CORBA REPLACING CORBA-STATUS BY ORB-STATUS.
PROCEDURE DIVISION.
CALL "CORBA-ORB-GET-CONTEXT-DEFAULT-CONTEXT" USING
ORB
CTX
ENV
ORB-STATUS.機能説明
デフォルトContextオブジェクトのオブジェクトリファレンスを返します。
ORBには、CORBA-ORB-INIT関数で返されるORBのオブジェクトリファレンスを指定します。
復帰値
正常終了した場合は、CORBA-OK返され、CTXにはデフォルトContextオブジェクトのオブジェクトリファレンスが設定されます。
異常終了した場合は、CORBA-FAILEDが返されます。
ORBにNULLが指定された場合、ENV構造体のMAJORにはCORBA-USER-EXCEPTIONが設定されます。