名前
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が設定されます。