Utility and Maintenance Functions › Enlarging the SCDS

Enlarging the SCDS

To make the SCDS larger, you can use the provided sample JCL member CASFNLRG. The steps executed in CASFNLRG are:

1. Back up the current SCDS file to a backup sequential data set.
2. Rename the current SCDS file.
3. Restore the backup data set into a new, larger SCDS.
4. Delete the old SCDS file.

The following is an illustration of the JCL provided in sample member CASFNLRG:

//CASFNLRG JOB (ACCTINFO),PGMR,CLASS=A,MSGCLASS=A
//*
//* THIS SAMPLE JCL INCREASES THE SIZE OF THE EXISTING
//* CA SMF Director CONTROL DATA SET (SCDS)
//*
//* NOTE: EDIT AS PER INSTALLATION STANDARDS
//*
//* REFERENCE: SEE CHAPTER 4 IN YOUR CA SMF Director INSTALLATION
//*            GUIDE UNDER 'CALCULATING SCDS SPACE REQUIREMENTS'
//*
//STEP1    EXEC PGM=IDCAMS,REGION=248K
//SYSPRINT DD   SYSOUT=*
//SYSIN    DD   *
/*                                                     */
/* RENAME THE CURRENT SCDS DATA SET                    */
/*                                                     */
ALTER CAI.SMFDIR.SCDS -
  NEWNAME(CAI.SMFDIR.SCDS.TEMP)
/*
//STEP2 EXEC PGM=SMFD,REGION=248K,PARM=BACKUP,
//      COND=(,NE,STEP1)
//STEPLIB  DD DISP=SHR,DSN=CASFLOAD
//SYSPRINT DD SYSOUT=*
//SYSXDIAG DD SYSOUT=*
//SCDS     DD DISP=SHR,DSN=CAI.SMFDIR.SCDS.TEMP
//SCDSBACK DD DISP=(,CATLG,DELETE),UNIT=SYSDA,
//            SPACE=(4096,(4,25),RLSE),
//            DSN=CAI.SMFDIR.SCDSBKUP
//*
//STEP3 EXEC PGM=SMFD,REGION=4096K,PARM=RESTORE,
//      COND=((,NE,STEP1),(,NE,STEP2))
//STEPLIB  DD DISP=SHR,DSN=CASFLOAD
//SYSPRINT DD SYSOUT=*
//SYSXDIAG DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(5,5),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(5,5),RLSE)
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(5,5),RLSE)
//SCDSBACK DD DSN=.STEP2.SCDSBACK,DISP=OLD
//SCDS     DD DSN=CAI.SMFDIR.SCDS.NEW,                <-- EDIT
//            DISP=(,CATLG),UNIT=????,                <-- EDIT
//            SPACE=(4096,(45)),VOL=SER=??????,       <-- EDIT
//            DCB=(RECFM=F,LRECL=4096,BLKSIZE=4096,DSORG=DA),
//*
//STEP4 EXEC PGM=IDCAMS,REGION=248K,
// COND=((,NE,STEP1),(,NE,STEP2),(,NE,STEP3))
//SYSPRINT DD SYSOUT=*
//SYSIN DD
/*                                                     */
/* RENAME THE NEW SCDS TO PRODUCTION SCDS AND SCRATCH  */
/* OLDER SCDS.                                         */
/*                                                     */
ALTER CAI.SMFDIR.SCDS.NEW -
NEWNAME(CAI.SMFDIR.SCDS)
IF LASTCC LE 4 THEN DO
DELETE (CAI.SMFDIR.SCDS.TEMP)
END
/*
//