| Interstage Application Server リファレンスマニュアル(API編) |
目次
索引
![]()
|
| 第4章 COBOLインタフェース | > 4.19 イベントサービスインタフェース | > 4.19.1 COSEVENTCOMMインタフェース |
COSEVENTCOMM-PUSHCONSUMER-DISCONNECT-PUSH-CONSUMER
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY CONST IN COSEVENTCOMM.
01 COPY PUSHCONSUMER IN COSEVENTCOMM REPLACING COSEVENTCOMM-PUSHCONSUMER BY OBJ.
COPY CONST IN CORBA.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
PROCEDURE DIVISION.
CALL "COSEVENTCOMM-PUSHCONSUMER-DISCONNECT-PUSH-CONSUMER" USING
OBJ
ENV.
サプライヤからイベント通信の終了を宣言します。
OBJには、COSEVENTCHANNELADMIN-SUPPLIERADMIN-OBTAIN-PUSH-CONSUMERが返すオブジェクトリファレンスを指定します。
正常終了した場合は、ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されます。異常終了した場合は、ENV構造体のMAJORにCORBA-SYSTEM-EXCEPTIONが設定され、ENV構造体のIDにシステム例外が設定されます。
システム例外の場合、以下の詳細情報が設定されます。
目次
索引
![]()
|