分散トランザクション処理機能 OpenTP1 プログラム作成リファレンス COBOL言語編

[目次][索引][前へ][次へ]

CBLDCMCF('TLSCOM ')

名称

MCF通信サービスの状態取得

形式

PROCEDURE DIVISIONの指定

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

DATA DIVISIONの指定

 
01  一意名1.
    02  データ名A   PIC X(8)  VALUE 'TLSCOM  '.
    02  データ名B   PIC X(5).
    02  FILLER      PIC X(3).
    02  データ名C   PIC X(4).
    02  データ名D   PIC X(28) VALUE SPACE.
    02  データ名E   PIC 9(9)  COMP VALUE ZERO.
    02  データ名F   PIC X(64) 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.
 
01  一意名3.
    02  データ名M   PIC 9(9)  COMP.
    02  一意名4.
        03  データ名N   PIC 9(9) COMP.
        03  データ名O   PIC X(8).
        03  データ名P   PIC X(20).
        03  データ名Q   PIC X(12).
        03  データ名R   PIC X(20) VALUE LOW-VALUE.
    :
    02  一意名n.
        03  データ名N   PIC 9(9) COMP.
        03  データ名O   PIC X(8).
        03  データ名P   PIC X(20).
        03  データ名Q   PIC X(12).
        03  データ名R   PIC X(20) VALUE LOW-VALUE.
 

機能

MCF通信サービスまたはアプリケーション起動サービスの状態を取得します。

UAPで値を設定するデータ領域

●データ名A

MCF通信サービスまたはアプリケーション起動サービスの状態取得を示す要求コードを「VALUE 'TLSCOM△△'」と設定します。

●データ名C,データ名D

空白を設定します。

●データ名E

0を設定します。

●データ名F,データ名G,データ名H,データ名I,データ名J

空白を設定します。

●データ名K,データ名L

0を設定します。

●データ名M

一意名4から一意名nの数(データ名N・データ名O・データ名P・データ名Qとデータ名Rの組の数)を設定します。

処理終了後は,MCFサービスに登録されているMCF通信サービスまたはアプリケーション起動サービスの個数が返されます。

●データ名R

MCFで使用する領域です。

OpenTP1から値が返されるデータ領域

●データ名B

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

●データ名M

MCFサービスに登録されているMCF通信サービスまたはアプリケーション起動サービスの個数が返されます。

●データ名N

MCF通信プロセス識別子またはアプリケーション起動プロセス識別子が設定されます。

●データ名O

MCF通信サービス名が設定されます。

●データ名P

プロトコル種別が設定されます。

'MCF△△△△△△△△△△△△△△△△△'
TP1/Message Controlのアプリケーション起動サービス
'User△Agent△△△△△△△△△△'
TP1/NET/User Agent(OSAS/UAプロトコル)
'HDLC△△△△△△△△△△△△△△△△'
TP1/NET/HDLC(HDLCプロトコル)
'X25△△△△△△△△△△△△△△△△△'
TP1/NET/X25(X.25プロトコル)
'TP△△△△△△△△△△△△△△△△△△'
TP1/NET/OSI-TP(OSI TPプロトコル)
'XMAP3△△△△△△△△△△△△△△△'
TP1/NET/XMAP3
'HSC△△△△△△△△△△△△△△△△△'
TP1/NET/HSC(HSCプロトコル)
'NCSB△△△△△△△△△△△△△△△△'
TP1/NET/NCSB(NCSBプロトコル)
'OSAS-NIF△△△△△△△△△△△△'
TP1/NET/OSAS-NIF(NIF/OSIプロトコル)
'NET/SLUP2△△△△△△△△△△△'
TP1/NET/Secondary Logical Unit - TypeP2(SLUTYPE-Pプロトコル(2次局))
'TCP/IP△△△△△△△△△△△△△△'
TP1/NET/TCP/IP(TCP/IPプロトコル)
'X25-EX△△△△△△△△△△△△△△'
TP1/NET/X25-Extended(X.25プロトコル)
'UDP/IP△△△△△△△△△△△△△△'
TP1/NET/User Datagram Protocol(UDPプロトコル)

●データ名Q

MCF通信サービスまたはアプリケーション起動サービスの状態として,次の値が設定されます。

'OFFLINE△△△△△'
サービスが停止されていることを示します。
'STARTING△△△△'
サービスが準備中であることを示します。
'ONLINE△△△△△△'
サービスが開始されている,または終了準備中であることを示します。
'PREENDING△△△'
サービスが部分停止の終了準備中であることを示します。
'ENDING△△△△△△'
サービスが終了中であることを示します。

ステータスコード

ステータスコード 意味
00000 正常に終了しました。
71001 MCFが開始処理中のため,CBLDCMCF('TLSCOM ')が受け付けられません。
71004 CBLDCMCF('TLSCOM ')の処理中にメモリ不足が発生しました。
71005 通信障害が発生しました。原因については,メッセージログファイルを参照してください。
71006 内部障害が発生しました。原因については,メッセージログファイルを参照してください。
72013 MCF通信サービスまたはアプリケーション起動サービスの数がデータ名Mの指定値を超えました。データ名Mの指定値を超えたMCF通信サービスまたはアプリケーション起動サービスの情報は切り捨てられました。
72028 データ名Aに設定した値が間違っています。
72052 データ名Kに0でない値が設定されています。
72053 データ名Lに0でない値が設定されています。
72058 データ名Cに空白でない値が設定されています。
72059 データ名Dに空白でない値が設定されています。
72061 データ名Eに0でない値が設定されています。
72065 データ名Fに空白でない値が設定されています。
72066 データ名Gに空白でない値が設定されています。
72068 データ名Hに空白でない値が設定されています。
72070 データ名Iに空白でない値が設定されています。
72072 データ名Jに空白でない値が設定されています。
72076 データ名Mに0以下の値が設定されています。