Interstage Application Server リファレンスマニュアル（API編）

4.21.1.1 COSEVENTCHANNELADMIN-EVENTCHANNEL-CREATE-UTIL

名前

  COSEVENTCHANNELADMIN-EVENTCHANNEL-CREATE-UTIL

形式

  ENVIRONMENT DIVISION.
  CONFIGURATION SECTION. 
  SPECIAL-NAMES. 
  SYMBOLIC CONSTANT
  COPY SYMBOL-CONST IN CORBA. 
  . 

  DATA DIVISION. 
  WORKING-STORAGE SECTION. 
  COPY CONST IN COSEVENTCOMM. 
  COPY CONST IN CORBA. 
  01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT  BY OBJ.
  01 COPY UTILTYPE IN COSEVENTCOMM REPLACING COSEVENTCHANNELADMIN-EVENTC001 BY UTIL-TYPE.
  01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV. 
  01 COPY CHANNELUTIL IN COSEVENTCOMM REPLACING ES-CHANNELUTIL BY CHNLUTIL. 

  PROCEDURE DIVISION. 
  CALL "COSEVENTCHANNELADMIN-EVENTCHANNEL-CREATE-UTIL" USING
            OBJ
            UTIL-TYPE
            ENV
            CHNLUTIL.

機能説明

　ES-CHANNELUTILインタフェースのオブジェクトリファレンスを作成します。
　この関数はオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASE関数を使用して領域を解放する必要があります。

パラメタ

　OBJ

　COSEVENTCHANNELADMIN-EVENTCHANNELのオブジェクトリファレンス。

　UTIL-TYPE

　インタフェースタイプ。

UTIL-TYPEに指定可能な値	復帰値情報
COSEVENTCHANNELADMIN-EVENTCHAN	ES-CHANNELUTILインタフェースのオブジェクトリファレンスを取得

　ENV

　例外情報が格納される構造体。

　CHNLUTIL

　ES-CHANNELUTILインタフェースのオブジェクトリファレンス。

復帰値

　正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。
　異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONが設定され、ENV構造体のIDに詳細情報が設定されます。
　システム例外の場合は、“メッセージ集”の“イベントサービスから通知される例外情報/マイナーコード”および“CORBAサービスから通知される例外情報/マイナーコード”を参照し、設定されたシステム例外およびマイナーコードに対する対処を行ってください。