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

集配信履歴ファイルを創成するためのジョブ制御文およびAMSコマンドの例を示します。

JCL例

\         JOB  LOGVSAM,LIST=(A,JS)                                              
\*-------< VSAM DEFINE CLUSTER >--------------------------------------*         
\LOGVSAM  EX   KQCAMS                                                           
\         FD   STEPCAT=DA,FILE=USERCAT                                          
\         FD   SYSPRINT=DA,TRK=(10,10),VOL=WORK,SOUT=A                          
\         FD   SYSIN=*                                                          
     DELETE HULFT.LOG                                                           
     DELETE HULFT.LOG.PATH1                                                     
     DELETE HULFT.LOG.PATH2                                                     
     DEFINE CLUSTER                     -                                       
            (NAME(HULFT.LOG)            -                                       
             INDEXED                    -                                       
             REUSE)                     -                                       
            DATA                        -                                       
            (NAME(HULFT.LOG.DATA)       -                                       
             KEYS(59 0)                 -                                       
             VOLUMES(HUL001)            -                                       
             CYLINDERS(5)               -                                       
             SHAREOPTIONS(4 3)          -                                       
             RECORDSIZE(4000 4000)      -                                       
             CONTROLINTERVALSIZE(22528)) -                                      
            INDEX                       -                                       
            (NAME(HULFT.LOG.IDX)        -                                       
             VOLUMES(HUL001)            -                                       
             CYLINDERS(1)               -                                       
             SHAREOPTIONS(4 3))         -                                       
             CATALOG(USERCAT)                                                   
     DEFINE CLUSTER                     -                                       
            (NAME(HULFT.LOG.PATH1)      -                                       
             INDEXED                    -                                       
             REUSE)                     -                                       
            DATA                        -                                       
            (NAME(HULFT.LOG.PATH1.DATA)  -                                      
             KEYS(59 59)                -                                       
             VOLUMES(HUL001)            -                                       
             CYLINDERS(5)               -                                       
             SHAREOPTIONS(4 3)          -                                       
             RECORDSIZE(4000 4000)      -                                       
             CONTROLINTERVALSIZE(22528)) -                                      
            INDEX                       -                                       
            (NAME(HULFT.LOG.PATH1.IDX)  -                                       
             VOLUMES(HUL001)            -                                       
             CYLINDERS(1)               -                                       
             SHAREOPTIONS(4 3))         -                                       
             CATALOG(USERCAT)                                                   
     DEFINE CLUSTER                     -                                       
            (NAME(HULFT.LOG.PATH2)      -                                       
             INDEXED                    -                                       
             REUSE)                     -                                       
            DATA                        -                                       
            (NAME(HULFT.LOG.PATH2.DATA)  -                                      
             KEYS(9 118)                -                                       
             VOLUMES(HUL001)            -                                       
             CYLINDERS(5)               -                                       
             SHAREOPTIONS(4 3)          -                                       
             RECORDSIZE(4000 4000)      -                                       
             CONTROLINTERVALSIZE(22528)) -                                      
            INDEX                       -                                       
            (NAME(HULFT.LOG.PATH2.IDX)  -                                       
             VOLUMES(HUL001)            -                                       
             CYLINDERS(1)               -                                       
             SHAREOPTIONS(4 3))         -                                       
             CATALOG(USERCAT)                                                   
\**------< FILE CREATE         >---------------------------------------         
\XRCREATE EX   XRCREATE,RSIZE=4096K                                             
\         FD   STEPCAT=DA,FILE=USERCAT                                          
\         FD   XRLOG=DA,FILE=HULFT.LOG,AMP=AMORG                                
\         FD   XRLOG1=DA,FILE=HULFT.LOG.PATH1,AMP=AMORG                         
\         FD   XRLOG2=DA,FILE=HULFT.LOG.PATH2,AMP=AMORG                         
\         FD   XRFILE=DUMMY                                                     
\         FD   XRHOST=DUMMY                                                     
\         FD   XRQUE=DUMMY                                                      
\         FD   XRCNTL=DUMMY
\         FD   XROPLC1=DUMMY                                                    
\         FD   XROPLC2=DUMMY                                                    
\         FD   XROPLF1=DUMMY                                                    
\         FD   XROPLF2=DUMMY                                                    
\**------< LOGCNT              >---------------------------------------         
\XRLOGCNT EX   XRLOGCNT,RSIZE=1024K                                             
\         FD   PRGLIB=DA,FILE=HULFT.LOAD                                        
\         FD   CF=DA,FILE=C.ALIB                                                
\         FD   STEPCAT=DA,FILE=USERCAT                                          
\         FD   XRLOG=DA,FILE=HULFT.LOG,AMP=AMORG                                
\         FD   XRLOG1=DA,FILE=HULFT.LOG.PATH1,AMP=AMORG                         
\         FD   XRLOG2=DA,FILE=HULFT.LOG.PATH2,AMP=AMORG                         
\         FD   LIST=DA,VOL=WORK,TRK=(10,10),SOUT=A                              
\         FD   XRCRD=*                                                          
LOGCNT=ALL                                                                      
\         JEND                                                                  

FD名

項目名

説明

PRGLIB

HULFT.LOAD

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

STEPCAT

USERCAT

カタログ簿データセット名

XRLOG

HULFT.LOG

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

XRLOG1

HULFT.LOG.PATH1

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

XRLOG2

HULFT.LOG.PATH2

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

パラメータ名

項目名

説明

CATALOG

USERCAT

カタログ簿データセット名

VOLUMES

HUL001

ボリューム名

NAME

HULFT.LOG

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

NAME

HULFT.LOG.DATA

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

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

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