Hitachi

OpenTP1 Version 7 分散トランザクション処理機能 OpenTP1 プログラム作成リファレンス COBOL言語編


CBLDCRPC('SETWATCH')

〈このページの構成〉

名称

サービスの応答待ち時間の更新

形式

PROCEDURE DIVISIONの指定

CALL  'CBLDCRPC'  USING 一意名1

DATA DIVISIONの指定

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

機能

サービス要求の応答待ち時間を変更します。CBLDCRPC('SETWATCH')で変更した値は,CBLDCRPC('CLOSE ')を呼び出すまで有効です。

サービス要求の応答待ち時間を CBLDCRPC('SETWATCH')を呼び出す前の値に戻すときは,事前に呼び出した CBLDCRPC('GETWATCH')でリターンされた値を,CBLDCRPC('SETWATCH')に設定して呼び出してください。

CBLDCRPC('SETWATCH')を呼び出しても,システム共通定義のwatch_timeオペランドの値に指定した値は変更されません。CBLDCRPC('SETWATCH')に設定した値は,あとから呼び出す CBLDCRPC('CALL ')にだけ影響します。

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

●データ名A

サービス要求の応答待ち時間の変更を示す要求コードを「VALUE 'SETWATCH'」と設定します。

●データ名C

変更後のサービス応答待ち時間を設定します。1から65535の範囲で設定します。無制限に待ち続ける場合は,0を設定します。

OpenTP1から値が返されるデータ領域

●データ名B

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

ステータスコード

ステータスコード

意味

00000

正常に終了しました。

00301

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

要求コード(データ名A)が間違っている場合も含みます。

上記以外

プログラムの破壊などによる,予期しないエラーが起こりました。