CBLDCMCF('TDCTLE ') − 論理端末の閉塞(COBOL言語)
- 〈このページの構成〉
形式
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) VALUE SPACE. 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 データ名K PIC 9(9) COMP VALUE ZERO. 01 一意名2. 02 データ名L PIC 9(9) COMP VALUE ZERO.
機能
論理端末を閉塞します。
なお,CBLDCMCF('TDCTLE△△')の正常終了は,論理端末の閉塞要求をSLU - TypeP2が正常に受け付けたことを意味します。このため,論理端末の閉塞が正常に完了したことを示すものではありません。
CBLDCMCF('TDCTLE△△')の呼び出し後に論理端末に関する何らかの処理をする場合は,CBLDCMCF('TLSLE△△△')を用いて論理端末の状態を確認してください。
UAPで値を設定するデータ領域
●データ名A
論理端末の閉塞を示す要求コード「VALUE 'TDCTLE△△'」を設定します。
●データ名C,データ名D1,データ名D2,データ名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
空白を設定します。
●データ名K,データ名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 |
データ名Kに0でない値が設定されています。 |
72053 |
データ名Lに0でない値が設定されています。 |
72058 |
データ名Cに空白でない値が設定されています。 |
72059 |
データ名D2,またはデータ名D3に空白でない値が設定されています。 |
72061 |
データ名Eに0未満または240以上の値が設定されています。 |
72063 |
データ名F1に空白が設定されています。 |
72065 |
データ名F2に空白でない値が設定されています。 |
72066 |
データ名Gに空白でない値が設定されています。 |
72068 |
データ名Hに空白でない値が設定されています。 |
72070 |
データ名Iに空白でない値が設定されています。 |
72072 |
データ名Jに空白でない値が設定されています。 |
72074 |
データ名F1に設定された文字列中に不正な文字があります。 |
72075 |
データ名D1に空白でない値が設定されています。 |