Hitachi

OpenTP1 Version 7 分散トランザクション処理機能 TP1/Server Base Enterprise Option プログラム作成の手引


CBLEERPC('DISCARDF')

〈このページの構成〉

名称

すべての非同期応答型RPCの応答受信拒否

形式

PROCEDURE DIVISIONの指定

CALL 'CBLEERPC' USING 一意名1

DATA DIVISIONの指定

01 一意名1.
  02 データ名A  PIC X(8) VALUE 'DISCARDF'.
  02 データ名B  PIC X(5).
  02 FILLER     PIC X(3).
  02 データ名C  PIC S9(9) COMP VALUE ZERO.

機能

非同期応答型RPCを使った場合に,まだ返ってきていない応答を,これ以上受信しないことを宣言します。CBLEERPC('DISCARDF')を呼び出したあとは,応答が返ってきても受信しないで捨てられます。

非同期応答型RPCの応答待ちのデータを受信しない場合は,必ずCBLEERPC('DISCARDF')を呼び出してください。呼び出さないと,CBLEERPC('POLLANYR')が不要な応答を受信してしまうことがあります。

CBLEERPC('DISCARDF')は,次に示す場合に呼び出してください。

UAPで値を設定するデータ領域

●データ名A

処理結果の受信を拒否することを示す要求コードを「VALUE 'DISCARDF'」と設定します。

●データ名C

0を設定します。

TP1/EEから値が返されるデータ領域

●データ名B

ステータスコードが,5けたの数字で返されます。

ステータスコード

ここで示すステータスコードは,TP1/EEが返す値です。サービスプログラムが返す値ではありません。

ステータスコード

意味

00000

正常に終了しました。

00001

TP1/EEの環境下にありません。

00004

UOCから発行しているため,この機能は使用できません。

00005

オフラインバッチプロセスから発行しているため,この機能は使用できません。

00301

データ名に設定した値が間違っています。

00338

発行条件が不正です。