配信制御ファイルの創成
配信制御ファイルを創成するためのJOBステートメントおよびAMSコマンドの例を示します。
JCL例
//QUEVSAM JOB CLASS=A,MSGCLASS=B
//*------< VSAM DEFINE CLUSTER >---------------------------------------
//DEFCLSTR EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE HULFT.QUEUE
DEFINE CLUSTER -
(NAME(HULFT.QUEUE) -
INDEXED) -
DATA -
(NAME(HULFT.QUEUE.DATA) -
KEYS(61 0) -
VOLUMES(HUL001) -
CYLINDERS(1 1) -
SHAREOPTIONS(4 3) -
RECORDSIZE(7600 7600) -
CONTROLINTERVALSIZE(26624)) -
INDEX -
(NAME(HULFT.QUEUE.IDX) -
VOLUMES(HUL001) -
CYLINDERS(1 1) -
SHAREOPTIONS(4 3))
//*------< FILE CREATE >---------------------------------------
//XRCREATE EXEC PGM=XRCREATE
//STEPLIB DD DSN=HULFT.LOAD,DISP=SHR
//XRLOG DD DUMMY
//XRLOG1 DD DUMMY
//XRLOG2 DD DUMMY
//XRFILE DD DUMMY
//XRHOST DD DUMMY
//XRQUE DD DSN=HULFT.QUEUE,DISP=SHR
//XRCNTL DD DUMMY
//XROPLC1 DD DUMMY
//XROPLC2 DD DUMMY
//XROPLF1 DD DUMMY
//XROPLF2 DD DUMMY
//SYSUDUMP DD SYSOUT=*
//
|
DD名 |
項目名 |
説明 |
|---|---|---|
|
STEPLIB |
HULFT.LOAD |
HULFTロードモジュールライブラリー |
|
XRQUE |
HULFT.QUEUE |
配信制御ファイル |
|
パラメーター名 |
項目名 |
説明 |
|---|---|---|
|
NAME |
HULFT.QUEUE |
配信制御ファイル |
|
NAME |
HULFT.QUEUE.DATA |
配信制御ファイル データ・コンポーネント エントリー名 |
|
VOLUMES |
HUL001 |
ボリューム名 |
|
CYLINDERS |
(*1) |
容量 |
|
NAME |
HULFT.QUEUE.IDX |
配信制御ファイル インデックス・コンポーネント エントリー名 |
|
*1 |
: |
(一次要求量 増分量) |