Creating the System Control file

An example of using a JOB statement and AMS commands to create the System Control file is shown below.

Example of JCL

//CNTLVSAM JOB  CLASS=A,MSGCLASS=B                                              
//*------< VSAM DEFINE CLUSTER >---------------------------------------         
//DEFCLSTR EXEC PGM=IDCAMS                                                      
//SYSPRINT DD   SYSOUT=*                                                        
//SYSIN    DD   *                                                               
     DELETE HULFT.SYSCNTL                                                       
     DEFINE CLUSTER                      -                                      
            (NAME(HULFT.SYSCNTL)         -                                      
             INDEXED)                    -                                      
            DATA                         -                                      
            (NAME(HULFT.SYSCNTL.DATA)    -                                      
             KEYS(52 0)                  -                                      
             VOLUMES(HUL001)             -                                      
             CYLINDERS(1 1)              -                                      
             SHAREOPTIONS(4 3)           -                                      
             RECORDSIZE(400 400)         -                                      
             CONTROLINTERVALSIZE(18432)) -                                      
            INDEX                        -                                      
            (NAME(HULFT.SYSCNTL.IDX)     -                                      
             VOLUMES(HUL001)             -                                      
             CYLINDERS(1 0)              -                                      
             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                                                           
//XRHOST   DD   DUMMY                                                           
//XRFILE   DD   DUMMY                                                           
//XRQUE    DD   DUMMY                                                           
//XRCNTL   DD   DSN=HULFT.SYSCNTL,DISP=SHR                                      
//XROPLC1  DD   DUMMY                                                           
//XROPLC2  DD   DUMMY                                                           
//XROPLF1  DD   DUMMY                                                           
//XROPLF2  DD   DUMMY                                                           
//SYSUDUMP DD   SYSOUT=*                                                        
//                                                                         

DD Name

Value

Description

STEPLIB

HULFT.LOAD

HULFT load module library

XRCNTL

HULFT.SYSCNTL

System Control file

Parameter Name

Value

Description

NAME

HULFT.SYSCNTL

System Control file

NAME

HULFT.SYSCNTL.DATA

Entry name of the data component of the System Control file

VOLUMES

HUL001

Volume name

CYLINDERS

(*1)

Capacity

NAME

HULFT.SYSCNTL.IDX

Entry name of the index component of the System Control file

*1

:

(primary secondary)