CBLDCMCF('TDCTLE ')
- 〈このページの構成〉
形式
PROCEDURE DIVISIONの指定
CALL 'CBLDCMCF' USING 一意名1 一意名2
DATA DIVISIONの指定
01 一意名1. 02 データ名A PIC X(8) VALUE 'TDCTLE '. 02 データ名B PIC X(5). 02 FILLER PIC X(3). 02 データ名C PIC X(4) VALUE SPACE. 02 データ名D1 PIC X(1) VALUE SPACE. 02 データ名D2 PIC X(1). 02 データ名D3 PIC X(26) VALUE SPACE. 02 データ名E PIC 9(9) COMP. 02 データ名F1 PIC X(8). 02 データ名F2 PIC X(56) VALUE SPACE. 02 データ名G PIC X(8) VALUE SPACE. 02 データ名H PIC X(8) VALUE SPACE. 02 データ名I PIC X(144) VALUE SPACE. 02 データ名J PIC X(184) VALUE SPACE. 02 データ名K1 PIC 9(9) COMP. 02 データ名K2 PIC X(n). 01 一意名2. 02 データ名L PIC 9(9) COMP VALUE ZERO.
機能
論理端末を閉塞します。
なお,CBLDCMCF('TDCTLE ')の正常終了は,論理端末の閉塞要求をプロトコル製品が正常に受け付けたことを意味します。このため,論理端末の閉塞が正常に完了したことを示すものではありません。
CBLDCMCF('TDCTLE ')の呼び出し後に論理端末に関する何らかの処理をする場合は,CBLDCMCF('TLSLE ')を用いて論理端末の状態を確認してください。
UAPで値を設定するデータ領域
●データ名A
論理端末の閉塞を示す要求コードを「VALUE 'TDCTLE△△'」と設定します。
●データ名C,データ名D1
空白を設定します。
●データ名D2
通信プロトコルに依存する機能を使用するかどうかを設定します。
- '1'
-
通信プロトコルに依存する機能を使用するときに設定します。
- '0'
-
通信プロトコルに依存する機能を使用しないときに設定します。
- 空白
-
省略されたものとして,'0'(使用しない)が仮定されます。
●データ名D3
空白を設定します。
●データ名E
処理対象の論理端末を持つMCF通信サービスのMCF通信プロセス識別子※を設定します。設定できる範囲は0〜239です。
0を指定すると,該当する論理端末名称が属するMCF通信サービスを検索します。MCF通信サービスが多い構成やUAPからこの関数を多数発行する場合は,MCF通信プロセス識別子の指定をお勧めします。
- 注※
-
MCF環境定義(mcftenv -s)で指定するMCF通信プロセス識別子は16進数とみなしてください。
例えば,MCF通信プロセス識別子が10の場合,16を設定してください。
●データ名F1
閉塞する論理端末の論理端末名称を設定します。論理端末名称は8バイト以内で設定してください。8バイトに満たない名称を設定する場合は,後ろを空白で埋めてください。
●データ名F2,データ名G,データ名H,データ名I,データ名J
空白を設定します。
●データ名K1
プロトコル固有領域の長さを設定します。プロトコル固有領域は1024バイトまで設定できます。
通信プロトコルに依存する機能を使用しないときは,0を設定します。
●データ名K2
プロトコル固有領域の内容を設定します。
設定する値は使用する通信プロトコルによって異なります。詳細は,マニュアル「OpenTP1 プロトコル」の該当するプロトコル編を参照してください。
●データ名L
0を設定します。
OpenTP1から値が返されるデータ領域
●データ名B
ステータスコードが,5けたの数字で返されます。
ステータスコード
ステータスコード |
意味 |
---|---|
00000 |
正常に終了しました。 |
71001 |
MCFが開始処理中のため,CBLDCMCF('TDCTLE ')が受け付けられません。 |
71002 |
MCFが終了処理中のため,CBLDCMCF('TDCTLE ')が受け付けられません。 |
71004 |
CBLDCMCF('TDCTLE ')の処理中にメモリ不足が発生しました。 |
71005 |
通信障害が発生しました。原因については,メッセージログファイルを参照してください。 |
71006 |
内部障害が発生しました。原因については,メッセージログファイルを参照してください。 |
71008 |
指定された論理端末名称は登録されていません。 |
71009 |
CBLDCMCF('TDCTLE ')が,該当する通信プロセスではサポートされていません。 |
71010 |
MCF通信プロセスに論理端末の閉塞を要求しましたが,受け付けられませんでした。原因については,メッセージログファイルを参照してください。 |
71011 |
論理端末が削除されているため,CBLDCMCF('TDCTLE ')が受け付けられません。 |
72028 |
データ名Aに設定した値が間違っています。 |
72052 |
<データ名D2に'0',または空白を設定> データ名K1に0でない値が設定されています。 |
<データ名D2に'1'を設定> データ名K1に0未満,または1025以上の値を設定しています。 |
|
72053 |
データ名Lに0でない値が設定されています。 |
72058 |
データ名Cに空白でない値が設定されています。 |
72059 |
データ名D2に1,0,または空白以外の値が設定されています。 |
データ名D3に空白でない値が設定されています。 |
|
72061 |
データ名Eに0未満または240以上の値が設定されています。 |
72063 |
データ名F1の先頭が空白です。 |
72065 |
データ名F2に空白でない値が設定されています。 |
72066 |
データ名Gに空白でない値が設定されています。 |
72068 |
データ名Hに空白でない値が設定されています。 |
72070 |
データ名Iに空白でない値が設定されています。 |
72072 |
データ名Jに空白でない値が設定されています。 |
72074 |
データ名F1に設定された文字列中に不正な文字があります。 |
72075 |
データ名D1に空白以外の値が設定されています。 |