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

4.20.3.2 COSNOTIFYCHANNELADMIN-EVENTCHANNEL--GET-DEFAULT-SUPPLIER-ADMIN

名前

  COSNOTIFYCHANNELADMIN-EVENTCHANNEL--GET-DEFAULT-SUPPLIER-ADMIN

形式

  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 NOTIFYEVENTCHANNEL IN COSEVENTCOMM REPLACING COSNOTIFYCHANNELADMIN-EVENTCHA BY OBJ.
  01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
  01 COPY NOTIFYSUPPLIERADMIN IN COSEVENTCOMM REPLACING COSNOTIFYCHANNELADMIN-SUPPLIER BY SUPADMIN.

  PROCEDURE DIVISION.
  CALL "COSNOTIFYCHANNELADMIN-EVENTCHANNEL--GET-DEFAULT-SUPPLIER-ADMIN" USING
            OBJ
            ENV
            SUPADMIN.

機能説明

　イベントチャネルが標準で持つSUPPLIERADMINオブジェクトのオブジェクトリファレンスを返します。
　この関数はオブジェクトリファレンスを格納する領域を獲得するため、この領域が不要になった時点で、CORBA-OBJECT-RELEASE関数を使用して領域を解放する必要があります。

パラメタ

　OBJ

　接続するイベントチャネルのオブジェクトリファレンス。

　ENV

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

　SUPADMIN

　イベントチャネルが標準で持つSUPPLIERADMINオブジェクトのオブジェクトリファレンス。

復帰値

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