zOs/TX/PER08RUN
//A540769Q JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=LOG
//*
//***************************************************
//* CREATED BY : A540769
//* TIMESTAMP : 06/20/2006.09.40.21
//* ENVIRONMENT: ISPF 5.7MVS TSO
//* RELEASE : V7.4.02 08/31/2004
//* DB2 VERSION: 810
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DP4G,'A540769T.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DP4G.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
RUNSTATS TABLESPACE QTXDBY.APER08
INDEX ALL KEYCARD
UPDATE ALL
SHRLEVEL CHANGE