CBLEEDBQ('CONCTL ')
- 〈このページの構成〉
形式
PROCEDURE DIVISIONの指定
CALL 'CBLEEDBQ' USING 一意名1 一意名2
DATA DIVISIONの指定
01 一意名1. 02 データ名A PIC X(8) VALUE 'CONCTL '. 02 データ名B PIC X(5). 02 FILLER PIC X(3). 02 データ名C PIC S9(9) COMP VALUE ZERO. 01 一意名2. 02 データ名D PIC X(1). 02 データ名E PIC X(28). 02 データ名F PIC X(32).
機能
DBキューとDBキューサービスとを接続，および接続解除します。
UAPで値を設定するデータ領域
●データ名A
DBキューの接続制御を示す要求コードを「VALUE 'CONCTL△△'」と設定します。
●データ名C
0を設定します。
●データ名D
要求種別を設定します。
- VALUE 'C'
-
DBキューとDBキューサービスとを接続します。
- VALUE 'R'
-
DBキューとDBキューサービスとの接続を解除します。
●データ名E
DBキュー名を27バイト以内のアスキー文字列で設定します。文字列の末尾には空白を付けてください。この空白は文字列の長さに数えません。
●データ名F
DBキューサービス名を31バイト以内のアスキー文字列で設定します。文字列の末尾には空白を付けてください。この空白は文字列の長さに数えません。
TP1/EEから値が返されるデータ領域
●データ名B
ステータスコードが，5けたの数字で返されます。
ステータスコード
|
ステータスコード |
意味 |
|---|---|
|
00000 |
正常に終了しました。 |
|
00001 |
TP1/EEの環境下にありません。 |
|
00004 |
UOCから発行しているため，この機能は使用できません。 |
|
00005 |
オフラインバッチプロセスから発行しているため，この機能は使用できません。 |
|
05601 |
データ名に設定した値が間違っています。 |
|
05602 |
DBキュー機能は使用できません。 |
|
05603 |
この関数を呼び出せる状態ではありません。
|
|
05604 |
データ名に設定したDBキュー名は存在しません。 |
|
05607 |
DBキューが使用できない状態です。 |
|
05610 |
すでに，別DBキューサービスと接続済みのため接続できません。 |
|
05611 |
データ名に設定したDBキューサービス名は存在しません。 |
|
05612 |
要求のあったDBキューとDBキューサービスは接続されていません。 |
|
05613 |
要求のあったDBキューサービスの属するDBキューサービスグループとDBキューの属するDBキューグループはDBキュー機能関連定義で関連づけられていません。 |
|
05615 |
そのほかのエラーが発生しました。 |
|
05616 |
設定されたDBキューのタイプは機能対象外です。
|
|
05617 |
DBキューサービスが永久閉塞中（エントリポイントなし）です。 |
|
05621 |
関数の呼び出し条件が不正です。 |
|
05622 |
該当するDBキューサービスで使用する最大DBキュー数を超えるため接続できません。 |
|
05623 |
DBキュー機能のライブラリがリンケージされていません。 |
|
05627 |
AP間通信機能を使用するDBキューではありません。 |
注意事項
-
DBキュー機能関連定義のdbqgrpdef定義コマンドに-cオプションを指定していない相手システムの読み出しDBキューとの接続，および接続解除はできません。
-
該当するDBキューの読み出し処理中に接続解除と接続とを続けて実行できません。
-
最初のAP起動時には，定義によって任意のDBキューサービスに接続されているか，またはどのDBキューサービスにも接続されていない場合があります。DBキューをほかのDBキューサービスに接続変更する場合は，現在接続されているDBキューサービスを指定して接続を解除してから，変更先のDBキューサービスを指定して接続してください。
-
次の場合，CBLEEDBQ('CONCTL ')はステータスコード「00000」でリターンします。
-
接続されているDBキューとDBキューサービスに対して接続を要求した場合
-
接続されていないDBキューとDBキューサービスに対して接続解除を要求した場合
-