//RECOVER JOB (90497T,34SW,AIB000,DVM009,21337),FAISAL,
// NOTIFY=OU01774,TIME=30,MSGLEVEL=1,PRTY=13,MSGCLASS=T
//*MAIN ORG=RMT01,CLASS=TSO30
//*
//************************************************************
//* PLACE TABLESPACES IN UTILITY MODE.
//************************************************************
//STARTUTL EXEC PGM=IKJEFT01,DYNAMNBR=50,COND=(4,LT)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(DB39)
-DISPLAY DATABASE(DCXSIS1D) SPACENAM(GCXSISKD) LOCKS
-STOP DATABASE(DCXSIS1D) SPACENAM(GCXSISKD)
-START DATABASE(DCXSIS1D) SPACENAM(GCXSISKD) ACCESS(UT)
END
/*
//*
//************************************************************
//** R E C O V E R
//************************************************************
//UTIL1 EXEC DB39UTIL,SYSTEM=DB39,UID=,UTPROC=,
// COND=(4,LT)
//DB39UTIL.SYSUT1 DD DSN=&&SYSUT1,
// DISP=(NEW,DELETE,DELETE),
// SPACE=(CYL,(0009,0003),RLSE),
// UNIT=DISK,DCB=BLKSIZE=22528
//DB39UTIL.SORTOUT DD DSN=&&SORTOUT,
// DISP=(NEW,DELETE,DELETE),
// SPACE=(CYL,(0009,0003),RLSE),
// UNIT=DISK,DCB=BLKSIZE=22528
//DB39UTIL.SYSIN DD *
RECOVER TABLESPACE DCXSIS1D.GCXSISKD
DSNUM ALL
REBUILD INDEX(ALL)
TABLESPACE DCXSIS1D.GCXSISKD
SORTDEVT DISK SORTNUM 2
/*
//*
//************************************************************
//* CHECK CONDITION CODES OF PREVIOUS STEPS
//* ABEND IF GREATER THAN FOUR
//************************************************************
//JOBCK2 EXEC PGM=IEFBR14,COND=(4,LT)
//ABEND2 EXEC PGM=ABEND806,COND=((0,EQ,JOBCK2),EVEN)
//*
//************************************************************
//*
//* PLACE TABLESPACES IN READ WRITE STATUS.
//*
//************************************************************
//*
//STARTRW EXEC PGM=IKJEFT01,DYNAMNBR=50,COND=(4,LT)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(DB39)
-STOP DATABASE(DCXSIS1D) SPACENAM(GCXSISKD)
-START DATABASE(DCXSIS1D) SPACENAM(GCXSISKD) ACCESS(RW)
-DISPLAY DATABASE(DCXSIS1D) SPACENAM(GCXSISKD)
END
//*
Reorg Utility
//REORG JOB (90497T,34SW,AIB000,DVM009,21337),FAISAL,
// NOTIFY=OU01774,TIME=30,MSGLEVEL=1,PRTY=13,MSGCLASS=T
//*MAIN ORG=RMT01,CLASS=TSO30
//UTIL EXEC DB39UTIL,SYSTEM=DB39,UID='TEMP',UTPROC=''
//*
//**********************************************
//*
//* GENERATING JCL FOR THE REORG TABLESPACE UTILITY
//* DATE: 04/16/03 TIME: 14:59:14
//*
//**********************************************
//*
//DB39UTIL.SORTWK01 DD DSN=OU01774.SORTWK01,
// DISP=(MOD,DELETE,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SORTWK02 DD DSN=OU01774.SORTWK02,
// DISP=(MOD,DELETE,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SORTWK03 DD DSN=OU01774.SORTWK03,
// DISP=(MOD,DELETE,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SORTWK04 DD DSN=OU01774.SORTWK04,
// DISP=(MOD,DELETE,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SYSREC DD DSN=OU01774.REORG.RECDSN,
// DISP=(MOD,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SYSUT1 DD DSN=OU01774.SYSUT1,
// DISP=(MOD,DELETE,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SORTOUT DD DSN=OU01774.SORTOUT,
// DISP=(MOD,DELETE,CATLG),
// SPACE=(16384,(20,20),,,ROUND),
// UNIT=DISK
//DB39UTIL.SYSIN DD *
REORG TABLESPACE DCXSIS1D.GCXSISKD
/*
//
Repair Utility (If in Copy Pending state etc.)
//REPAIRTS JOB (90497T,34SW,AIB000,DVM009,21337),FAISAL,
// NOTIFY=OU01774,TIME=30,MSGLEVEL=1,PRTY=13,MSGCLASS=T
//*MAIN ORG=RMT01,CLASS=TSO30
//*
//*
//***********************************************************
//**
//** REPAIR THE TABLESPACES SELECTED. NOCOPYPEND, NORCVRPEND,
//** AND NOCHECKPEND CONTROL CARDS WILL BE GENERATED.
//** REMOVE THE CONTROL CARDS YOU DO NOT WANT TO RUN.
//**
//***********************************************************
//REPAIR EXEC DB39UTIL,SYSTEM=DB39,
// UID='''''',UTPROC=,COND=(4,LT)
//DB39UTIL.SYSIN DD *
REPAIR SET TABLESPACE DCXSIS1D.GCXSISKD NOCOPYPEND
REPAIR SET TABLESPACE DCXSIS1D.GCXSISKD NORCVRPEND
REPAIR SET TABLESPACE DCXSIS1D.GCXSISKD NOCHECKPEND
REPAIR SET TABLESPACE DCXSIS1D.GCXSISKD INDEXES NORCVRPEND
/*
Runstats Utility
//RUNSTAT JOB (90497T,34SW,AIB000,DVM009,21337),FAISAL,
// NOTIFY=OU01774,TIME=30,MSGLEVEL=1,PRTY=13,MSGCLASS=T
//*MAIN ORG=RMT01,CLASS=TSO30
//UTIL EXEC DB39UTIL,SYSTEM=DB39,UID='TEMP',UTPROC=''
//*
//**********************************************
//*
//* GENERATING JCL FOR THE RUNSTATS UTILITY
//* DATE: 04/16/03 TIME: 15:04:56
//*
//**********************************************
//*
//DB39UTIL.SYSIN DD *
RUNSTATS TABLESPACE DCXSIS1D.GCXSISKD
INDEX (ALL) SHRLEVEL REFERENCE
/*
//