4.6.6 CORBA-CONTEXT-DELETE

名前

CORBA-CONTEXT-DELETE

形式

 ENVIRONMENT DIVISION.
   CONFIGURATION SECTION.
   SPECIAL-NAMES.
     SYMBOLIC CONSTANT
     COPY SYMBOL-CONST IN CORBA.
     .
 DATA DIVISION.
  WORKING-STORAGE SECTION.
    COPY CONST IN CORBA.
    01 COPY CONTEXT IN CORBA REPLACING CORBA-CONTEXT BY CTX.
    01 COPY FLAGS IN CORBA REPLACING CORBA-FLAGS BY DEL-FLAGS.
    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-CONTEXT-DELETE" USING
         CTX
         DEL-FLAGS
         ENV
         ORB-STATUS.

機能説明

CTXで指定したコンテキストオブジェクトを削除します。CORBA-BOA-DISPOSE関数と同じようにオブジェクトリファレンスは破棄されます。
DEL-FLAGSには以下のフラグが指定できます。

CORBA-CTX-DELETE-DESCENDENTS: 子コンテキストオブジェクトが存在しているときに、子孫コンテキストオブジェクトまで削除します。
子孫コンテキストオブジェクトが存在する場合、CORBA-CTX-DELETE-DESCENDENTSが設定されていなければ、異常終了します。

復帰値

  正常終了した場合は、CORBA-OKが返されます。
  異常終了した場合は、CORBA-FAILEDが返されます。
  CTXにNULLが指定された場合、ENV構造体のMAJORにはCORBA-USER-EXCEPTIONが設定されます。