zOs/JCL/DB2REORG

//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=(DBTF,'A540769T.REORG'),
//   REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SORTWK00 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK01 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK02 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK03 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK04 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK05 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK06 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK07 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK08 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SORTWK09 DD UNIT=DISK,SPACE=(CYL,(200,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK00 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK01 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK02 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK03 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK04 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK05 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK06 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK07 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK08 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//DATAWK09 DD UNIT=DISK,SPACE=(CYL,(500,800)),DISP=(NEW,DELETE),
//            DSNTYPE=LARGE
//SYSTEMPL DD DISP=SHR,DSN=DBTF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
     LISTDEF LST#REO   INCLUDE TABLESPACE VV28A1T.VDPS360
     REORG TABLESPACE LIST LST#REO
         LOG NO
         SORTDATA
         COPYDDN(TCOPYD)
         SHRLEVEL CHANGE
         MAPPINGTABLE S100447.MAPTAB03
         MAXRO 300
         DRAIN ALL
         DELAY 1500
         TIMEOUT TERM
         UNLOAD CONTINUE
         PUNCHDDN TPUNCH
         DISCARDDN TDISCA
         SORTKEYS
  --     SORTDEVT DISK
  --     SORTNUM 255
         STATISTICS
           INDEX ALL KEYCARD
           REPORT NO UPDATE ALL