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

4.19.2.2 COSEVENTCHANNELADMIN-EVENTCHANNEL-FOR-SUPPLIERS

名前

　COSEVENTCHANNELADMIN-EVENTCHANNEL-FOR-SUPPLIERS

形式

  ENVIRONMENT DIVISION.
  CONFIGURATION SECTION.
  SPECIAL-NAMES.
  SYMBOLIC CONSTANT
  COPY SYMBOL-CONST IN CORBA.
  .
  
  DATA DIVISION.
  WORKING-STORAGE SECTION.
  COPY CONST IN COSEVENTCOMM.
  01 COPY EVENTCHANNEL IN COSEVENTCOMM REPLACING COSEVENTCHANNELADMIN-EVENT0001 BY OBJ.
  01 COPY SUPPLIERADMIN IN COSEVENTCOMM REPLACING COSEVENTCHANNELADMIN-SUPPL0001 BY RESULT.
  COPY CONST IN CORBA.
  01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
  
  PROCEDURE DIVISION.
  CALL "COSEVENTCHANNELADMIN-EVENTCHANNEL-FOR-SUPPLIERS" USING
                OBJ
                ENV
                RESULT.

機能説明

　サプライヤがイベントチャネルに接続するための、イベントチャネルのオブジェクトリファレンスを獲得します。OBJには接続するイベントチャネルのオブジェクトリファレンスを指定します。
　このメソッドはオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASEを使用して領域を解放する必要があります。

復帰値

　正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定され、RESULTにはサプライヤがイベントチャネルに接続するための、イベントチャネルのオブジェクトリファレンスが設定されます。異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONが設定され、ENV構造体のIDにシステム例外が設定されます。
　システム例外の場合、以下の詳細情報が設定されます。

EX-CORBA-STEXCEP-NO-RESOURCES

　以下のいずれかの可能性があります。
　−　イベントチャネルが閉塞終了中である。
　
　−　イベントチャネルが閉塞／自動閉塞されている。

EX-CORBA-STEXCEP-COMM-FAILURE

　通信異常が発生しました。

EX-CORBA-STEXCEP-NO-IMPLEMENT

　イベントチャネルが起動されていません。