CBLEEDBQ('INQUIRE2')

PROCEDURE DIVISIONの指定

CALL 'CBLEEDBQ' USING 一意名1 一意名2

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC X(8) VALUE 'INQUIRE2'.
   02 データ名B  PIC X(5).
   02 FILLER    PIC X(3).
   02 データ名C  PIC S9(9) COMP.
   02 データ名D  PIC X(28).
01 一意名2.
   02 データ名E  PIC X(32).
   02 データ名F  PIC X(32).
   02 データ名G  PIC X(28).
   02 データ名H  PIC X(32).
   02 データ名I  PIC 9(9) COMP.
   02 データ名J  PIC 9(9) COMP.
   02 データ名K  PIC 9(9) COMP.
   02 データ名L  PIC 9(9) COMP.
   02 データ名M  PIC 9(9) COMP.
   02 データ名N  PIC X(8).
   02 データ名O  PIC X(16).
   02 データ名P  PIC 9(9) COMP.
   02 データ名Q  PIC 9(9) COMP.
   02 データ名R  PIC X(5).
   02 データ名S  PIC X(1).
   02 FILLER    PIC X(74).

●データ名A

DBキュー情報の照会要求を示す要求コードを「VALUE 'INQUIRE2'」と設定します。

●データ名C

要求種別を，数値で設定します。

0

メッセージを読み出しているTP1/EEプロセスの読み出し状態（データ名I）の照会が不要な場合に設定します。

メッセージを読み出しているTP1/EEプロセスのDBキューの読み出し状態を照会するためのRPC通信は行いません。

1

メッセージを読み出しているTP1/EEプロセスの読み出し状態（データ名I）の照会が必要な場合に設定します。

データ名Dに指定したDBキューを読み出しているTP1/EEプロセスがAPI発行元のプロセスと異なる場合，RPC通信を行ってDBキューの読み出し状態を照会します。

データ名Cに1を指定した場合，メッセージを読み出しているTP1/EEのバージョンが07-80以降である必要があります。

●データ名D

照会するDBキュー名を，27バイト以内のアスキー文字列で設定します。文字列の最後には，空白を設定してください。この空白は文字列の長さに数えません。

●データ名E

指定したDBキューに現在接続しているDBキューサービス名が返されます。接続していない場合，およびユーザキューアクセス機能を使用したDBキューの場合はLOW-VALUEが設定されます。

●データ名F

指定したDBキューが属するDBキューグループ名が返されます。文字列の最後はLOW-VALUEです。

●データ名G

データ名Dに設定したDBキュー名が返されます。文字列の最後はLOW-VALUEです。

●データ名H

指定したDBキューを読み出すサービスグループ名が返されます。文字列の最後はLOW-VALUEです。読み出すサーバにサービスグループ名がない場合，LOW-VALUEが設定されます。

●データ名I

データ名Cに1を指定した場合の，DBキューの読み出し状態が返されます。

データ名Cに0を指定した場合，DBキューを読み出しているTP1/EEプロセスがCBLEEDBQ('INQUIRE2')の発行元のプロセスと異なっていると，DBキュー状態1が読み出し停止中のときでも0（正常）が返されます。

DBキューの読み出し状態は，DBキューの状態1とDBキューの状態2の和で返されます。

DBキューの状態1：

DBキューの状態1が次のどれかで返されます。

0：正常

1：障害による読み出し停止中

2：コマンド，定義，またはAPI関数による読み出し停止中

4：DB構成不正またはDBキューの内容矛盾による使用不可

8：リソースマネジャ未接続で使用不可

DBキューの状態2：

DBキューの状態2が次で返されます。

4096：書き込み抑止中

DBキューの状態1が4または8のときは加算しません。

このとき，書き込み抑止状態は不明となります。

●データ名J

DBキューへ最後に書き込んだメッセージの通番が返されます。データ名IのDBキュー状態1が4または8の場合は参照できません。

●データ名K

DBキューから最後に読み出したメッセージの通番が返されます。データ名IのDBキュー状態1が4または8の場合は参照できません。

●データ名L

定義に指定した最大書き込みメッセージ数と同一の値が設定されます。

●データ名M

未読み出し数が返されます。データ名IのDBキュー状態1が4または8の場合は参照できません。

●データ名N

読み出すサーバの基盤種別が返されます。データ名IのDBキュー状態1が4または8の場合は参照できません。

文字列の最後はLOW-VALUEです。

TP1EE：TP1/EE

CosmiRM：uCosminexus Reliable Messaging

●データ名O

該当するDBキューの読み出しを行うシステム種別が返されます。データ名IのDBキュー状態1が4または8の場合は参照できません。

文字列の最後はLOW-VALUEです。

TP1/EEの場合，ノード識別子が返されます。

uCosminexus Reliable Messagingの場合，RMSystemNameで指定したシステム名称が返されます。

●データ名P

DBキューの種別が返されます。

0：AP間通信機能を使用したDBキュー

1：ユーザキューアクセス機能を使用したDBキュー

●データ名Q

DBキューに付与した属性の論理和が返されます。データ名IのDBキュー状態1が4または8の場合は参照できません。

0：付与した属性なし

1：上書き抑止属性

2：通番初期化属性

4：データ連携支援書き込み

8：交替用メッセージ表書き込み機能を使用

●データ名R

該当するDBキューを読み出すTP1/EEプロセスのTP1/Server Baseのノード識別子が返されます。文字列の最後はLOW-VALUEです。データ名IのDBキュー状態1が4または8の場合は参照できません。

次の条件をすべて満たす場合にTP1/Server Baseのノード識別子が返されます。

• 該当するDBキューを読み出すサーバの基盤種別がTP1/EE

• 該当するDBキューを読み出すTP1/EEプロセスでネーム機能が有効

• 該当するDBキューを読み出すTP1/EEプロセスのTP1/EEバージョンが07-80以降

TP1/Server Baseのノード識別子を返さない場合は，LOW-VALUEが返されます。

●データ名S

該当するDBキューに対する書き込み禁止状態を返します。

X'00'：書き込み可能状態

X'01'：書き込み禁止状態

●データ名B

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