CBLDCMCF('TDCTCN ')

PROCEDURE DIVISIONの指定

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

DATA DIVISIONの指定

01  一意名1.
    02  データ名A   PIC X(8)  VALUE 'TDCTCN  '.
    02  データ名B   PIC X(5).
    02  FILLER      PIC X(3).
    02  データ名C   PIC X(4).
    02  データ名D1  PIC X(1).
    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.

●データ名A

コネクション解放を示す要求コードを「VALUE 'TDCTCN△△'」と設定します。

●データ名C

解放するコネクションの指定方法を設定します。

'LE△△'

解放するコネクションを論理端末名称で指定するときに設定します。

'CN△△'

解放するコネクションをコネクションIDで指定するときに設定します。

空白

省略されたものとして，'LE△△'（論理端末名称指定）が仮定されます。

●データ名D1

コネクションを強制的に解放するかどうかを設定します。

'1'

コネクションを強制的に解放します。

'0'

コネクションを正常に解放します。

空白

省略されたものとして，'0'（正常解放）が仮定されます。

●データ名D2

通信プロトコルに依存する機能を使用するかどうかを設定します。

'1'

通信プロトコルに依存する機能を使用するときに設定します。

'0'

通信プロトコルに依存する機能を使用しないときに設定します。

空白

省略されたものとして，'0'（使用しない）が仮定されます。

●データ名D3

空白を設定します。

●データ名E

処理対象のコネクションを持つMCF通信サービスのMCF通信プロセス識別子^※を設定します。設定できる範囲は0〜239です。

論理端末名称を使用してコネクションの解放を要求する場合は，無効となります。

0を指定すると，該当するコネクションIDが属するMCF通信サービスを検索します。MCF通信サービスが多い構成やUAPからこの関数を多数発行する場合は，MCF通信プロセス識別子の指定をお勧めします。

注※

MCF環境定義（mcftenv -s）で指定するMCF通信プロセス識別子は16進数とみなしてください。

例えば，MCF通信プロセス識別子が10の場合，16を設定してください。

●データ名F1

解放するコネクションの論理端末名称，またはコネクションIDを設定します。論理端末名称，またはコネクションIDは8バイト以内で設定してください。8バイトに満たない名称を設定する場合は，後ろを空白で埋めてください。

●データ名F2，データ名G，データ名H，データ名I，データ名J

空白を設定します。

●データ名K1

プロトコル固有領域の長さを設定します。プロトコル固有領域は1,024バイトまで設定できます。

通信プロトコルに依存する機能を使用しないときは，0を設定します。

●データ名K2

プロトコル固有領域の内容を設定します。

設定する値は使用する通信プロトコルによって異なります。詳細は，マニュアル「OpenTP1 プロトコル」の該当するプロトコル編を参照してください。

●データ名L

0を設定します。

●データ名B

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