MHPのサービス開始

PROCEDURE DIVISIONの指定

 
CALL 'CBLDCMCF' USING 一意名1
 

DATA DIVISIONの指定

 
01 一意名1.
   02 データ名A  PIC X(8) VALUE 'MAINLOOP'.
   02 データ名B  PIC X(5).
   02 FILLER    PIC X(3).
   02 データ名C  PIC X(16).
 

アプリケーション名に該当するサービスプログラムへのスケジュールを受け付けます。CBLDCMCF('MAINLOOP')は，MHPのメインプログラムから呼び出します。プロセスで1回だけ呼び出してください。

CBLDCMCF('MAINLOOP')を呼び出してから，OpenTP1からMHPの終了が要求されるまで，CBLDCMCF('MAINLOOP')はリターンしません。

●データ名A

MHPのサービス開始を示す要求コードを「VALUE 'MAINLOOP'」と設定します。

●データ名C

「LOW-VALUE」を設定します。

●データ名B

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

ステータスコード	意味
00000	OpenTP1からMHPの終了が要求されました。MHPはすぐにプロセスの終了処理をして，CBLDCMCF('CLOSE ')と CBLDCRPC('CLOSE ')を呼び出してから，メインプログラムをSTOP RUNで終了してください。
70900	データ名に設定した値が間違っています。
70901	CBLDCMCF('MAINLOOP')を呼び出す前に，CBLDCRPC('OPEN ')を呼び出していません。
70902	サービスを開始できませんでした。
70903	ローカルメモリが不足しました。
72016	データ名Cに設定した値が間違っています。
72028	データ名Aに設定した値が間違っています。