集配信履歴ファイルの創成

集配信履歴ファイルを創成するためのJOBステートメントおよびAMSコマンドの例を示します。

JCL例

//LOGVSAM JOB CLASS=A,MSGCLASS=B
//DEFCLSTR EXEC PGM=IDCAMS                                                      
//SYSPRINT DD SYSOUT=*                                                          
//SYSIN DD *                                                                    
     DEFINE CLUSTER                                                   -         
            (NAME(HULFT.LOG)                                          -         
             INDEXED                                                  -         
             REUSE)                                                   -         
            DATA                                                      -         
            (NAME(HULFT.LOG.DATA)                                     -         
             KEYS(59 0)                                               -         
             VOLUMES(HUL001)                                          -         
             CYLINDERS(1 1)                                           -         
             SHAREOPTIONS(4 3)                                        -         
             RECORDSIZE(1600 1600)                                    -         
             CONTROLINTERVALSIZE(26624))                              -         
            INDEX                                                     -         
            (NAME(HULFT.LOG.IDX)                                      -         
             VOLUMES(HUL001)                                          -         
             CYLINDERS(1 1)                                           -         
             SHAREOPTIONS(4 3))                                                 
            DEFINE CLUSTER                                            -         
            (NAME(HULFT.LOG.PATH1)                                    -         
             INDEXED                                                  -         
             REUSE)                                                   -         
            DATA                                                      -         
            (NAME(HULFT.LOG.PATH1.DATA)                               -         
             KEYS(59 59)                                              -         
             VOLUMES(HUL001)                                          -         
             CYLINDERS(1 1)                                           -         
             SHAREOPTIONS(4 3)                                        -         
             RECORDSIZE(1600 1600)                                    -         
             CONTROLINTERVALSIZE(26624))                              -         
            INDEX                                                     -         
            (NAME(HULFT.LOG.PATH1.IDX)                                -         
             VOLUMES(HUL001)                                          -         
             CYLINDERS(1 1)                                           -         
             SHAREOPTIONS(4 3))                                                 
            DEFINE CLUSTER                                            -         
            (NAME(HULFT.LOG.PATH2)                                    -         
             INDEXED                                                  -         
             REUSE)                                                   -         
            DATA                                                      -         
            (NAME(HULFT.LOG.PATH2.DATA)                               -         
             KEYS(9 118)                                              -         
             VOLUMES(HUL001)                                          -         
             CYLINDERS(1 1)                                           -         
             SHAREOPTIONS(4 3)                                        -         
             RECORDSIZE(1600 1600)                                    -         
             CONTROLINTERVALSIZE(26624))                              -         
            INDEX                                                     -         
            (NAME(HULFT.LOG.PATH2.IDX)                                -         
             VOLUMES(HUL001)                                          -         
             CYLINDERS(1 1)                                           -         
             SHAREOPTIONS(4 3))                                                 
//*------< FILE CREATE         >---------------------------------------         
//XRCREATE EXEC PGM=XRCREATE                                                    
//STEPLIB  DD DSN=HULFT.LOAD,DISP=SHR                                           
//XRLOG    DD DSN=HULFT.LOG,DISP=SHR                                            
//XRLOG1   DD DSN=HULFT.LOG.PATH1,DISP=SHR                                      
//XRLOG2   DD DSN=HULFT.LOG.PATH2,DISP=SHR                                      
//XRFILE   DD DUMMY                                                             
//XRHOST   DD DUMMY                                                             
//XRQUE    DD DUMMY                                                             
//XRCNTL   DD DUMMY                                         
//XROPLC1  DD DUMMY                                                             
//XROPLC2  DD DUMMY                                                             
//XROPLF1  DD DUMMY                                                             
//XROPLF2  DD DUMMY                                                             
//SYSUDUMP DD SYSOUT=*                                                          
//*------< LOGCNT >---------------------------------------                      
//XRLOGCNT EXEC PGM=XRLOGCNT                                                    
//STEPLIB  DD DSN=HULFT.LOAD,DISP=SHR                                           
//XRLOG    DD DSN=HULFT.LOG,DISP=SHR                                            
//XRLOG1   DD DSN=HULFT.LOG.PATH1,DISP=SHR                                      
//XRLOG2   DD DSN=HULFT.LOG.PATH2,DISP=SHR                                      
//XRCRD    DD *                                                                 
LOGCNT=ALL                                                                      
//XRPRINT  DD SYSOUT=*                                                          
//SYSOUT   DD SYSOUT=*                                                          
//SYSUDUMP DD SYSOUT=*                                                          
//                                                                              

DD名

項目名

説明

STEPLIB

HULFT.LOAD

HULFTロードモジュールライブラリー

XRLOG

HULFT.LOG

集配信履歴ファイルIDキーファイル

XRLOG1

HULFT.LOG.PATH1

集配信履歴ホスト名キーファイル

XRLOG2

HULFT.LOG.PATH2

集配信履歴日付キーファイル

パラメーター名

項目名

説明

NAME

HULFT.LOG

集配信履歴ファイルIDキーファイル

NAME

HULFT.LOG.DATA

集配信履歴ファイルIDキーファイル データ・コンポーネント エントリー名

VOLUMES

HUL001

ボリューム名

CYLINDERS

(*1)

容量

NAME

HULFT.LOG.IDX

集配信履歴ファイルIDキーファイル インデックス・コンポーネント エントリー名

NAME

HULFT.LOG.PATH1

集配信履歴ホスト名キーファイル

NAME

HULFT.LOG.PATH1.DATA

集配信履歴ホスト名キーファイル データ・コンポーネント エントリー名

NAME

HULFT.LOG.PATH1.IDX

集配信履歴ホスト名キーファイル インデックス・コンポーネント エントリー名

NAME

HULFT.LOG.PATH2

集配信履歴日付キーファイル

NAME

HULFT.LOG.PATH2.DATA

集配信履歴日付キーファイル データ・コンポーネント エントリー名

NAME

HULFT.LOG.PATH2.IDX

集配信履歴日付キーファイル インデックス・コンポーネント エントリー名

*1

:

(一次要求量 増分量)