CBLDCMCF('TIMERSET')

PROCEDURE DIVISIONの指定

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

DATA DIVISIONの指定

01 一意名1.
   02 データ名A  PIC X(8) VALUE 'TIMERSET'.
   02 データ名B  PIC X(5).
   02 FILLER    PIC X(3).
   02 データ名C  PIC X(16) VALUE LOW-VALUE.
01 一意名2.
   02 データ名D  PIC 9(9) COMP.
   02 データ名E  PIC 9(9) COMP.
   02 データ名F  PIC X(16) VALUE LOW-VALUE.
   02 データ名G  PIC X(8).
   02 データ名H  PIC X(8).
   02 データ名I  PIC X(16) VALUE LOW-VALUE.
01 一意名3.
   02 データ名J  PIC 9(9) COMP.
   02 データ名K  PIC X(n).

●データ名A

ユーザタイマ監視の設定を示す要求コードを「VALUE 'TIMERSET'」と設定します。

●データ名C

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

●データ名D

CBLDCMCF('TIMERSET')を呼び出してから，何秒後にMHPを起動させるかを設定します。設定できる秒数は，1から360000まで（1秒から100時間まで）です。

注意事項

時間監視の精度は秒単位です。また，タイマ定義（mcfttim -t）のbtimオペランドで指定する時間監視間隔でタイムアウトが発生したかどうかを監視しています。このため，データ名Dに設定した監視時間と実際にタイムアウトを検出する時間には秒単位の誤差が生じます。そのため，タイミングによっては，設定した監視時間よりも短い時間で起動することがあります。監視時間が小さくなるほど，誤差の影響を受けやすくなりますので，監視時間は3（単位：秒）以上の値の設定を推奨します。

●データ名E

タイマ要求識別子を設定します。

データ名Eはこのタイマを一意に識別するための情報です。データ名Eは，データ名Gで指定した論理端末内で必ずユニークになるようにしてください。

●データ名F

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

●データ名G

タイムアウトが発生したときにイベントを生成する論理端末名称を指定します。8文字に満たない名称を指定する場合は後ろを空白で埋めます。論理端末名称は，アプリケーション起動サービスの論理端末を指定してもかまいません。

MHPからこの関数を呼び出す場合は，論理端末名称を省略できます。省略する場合には，空白を指定します。省略した場合，入力元論理端末を仮定します。

●データ名H

起動させるMHPのアプリケーション名を指定します。このアプリケーションの属性は，データ名Gで指定した論理端末を持つMCF通信サーバのMCF通信構成定義mcftenv -aオプションで指定したMCFアプリケーション定義内のアプリケーション属性定義（mcfaalcap）に定義してください。8文字に満たない名称を指定する場合は後ろを空白で埋めます。MHPは非応答型（noans型）のMHPでなければなりません。指定するアプリケーション名はユーザイベントでなければなりません。

●データ名I

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

●データ名J

起動させるMHPに渡すメッセージセグメントの長さを設定します。起動させるMHPに渡すセグメントがない場合は，0を設定します。指定できる値の範囲は0から256までです。設定できる値の最大値はMCF通信構成定義 mcfttimの-pオプションのmsgsizeオペランドに指定した最大メッセージ長に依存します。

●データ名K

起動させるMHPに渡す，メッセージのセグメントの内容を設定します。複数のセグメントを設定できません。起動させるMHPに渡すセグメントがない場合は，ヌル文字を設定します。

●データ名B

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