CALL 'CBLDCRPS' USING 一意名1 一意名2 一意名3
01 一意名1.
02 データ名A PIC X(8) VALUE 'GETWATCH'.
02 データ名B PIC X(5).
02 FILLER PIC X(3).
02 データ名C PIC S9(9) COMP VALUE ZERO.
02 データ名D PIC 9(9) COMP.
01 一意名2.
02 FILLER PIC X(1).
01 一意名3.
02 FILLER PIC X(1).
CALL 'CBLDCRPC' USING 一意名1
01 一意名1.
02 データ名A PIC X(8) VALUE 'GETWATCH'.
02 データ名B PIC X(5).
02 FILLER PIC X(3).
02 データ名C PIC S9(9) COMP VALUE ZERO.
現在のサービス要求の応答待ち時間を参照します。CBLDCRPS('SETWATCH')は,CBLDCRPS('SETWATCH')でサービス応答待ち時間を一時的に変更する前に,元の値を退避するために使用します。
CBLDCRPS('SETWATCH')は,CBLDCRPS('SETWATCH')で変更したサービスの応答時間をリターンします。変更していない場合は,クライアント環境定義DCWATCHTIMの値をリターンします。
得られる値は,OpenTP1のCBLDCRPS('CALL ')に対して有効です。
ステータスコード | 意味 |
---|---|
00000 | 正常終了しました。 |
02401 | 要求コード(データ名A)に指定した値が間違っています。 |
02402 | CBLDCRPS('OPEN ')が実行されていません。 |
02404 | メモリ不足が発生しました。 |
02544 | データ名Dに指定したクライアントIDはCBLDCCLS('CLTIN '),またはCBLDCCLS('EXCLTIN ')で受け取ったクライアントIDと異なっています。 |