zOs/JCL/CMNXXREO
//A540769R JOB (CP00,KE50),
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID
//*MAIN CLASS=DBOF ,SYSTEM=S12
//REO EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'A540769R.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBOF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE DB2PLAN.CMNXX* PARTLEVEL BASE
REORG TABLESPACE LIST LST#REO
LOG NO
SORTDATA
COPYDDN(TCOPYD)
SHRLEVEL CHANGE
MAPPINGTABLE S100447.MAPTAB03
MAXRO 300
DRAIN ALL
DELAY 1500
TIMEOUT TERM
UNLDDN TSRECD
UNLOAD CONTINUE
PUNCHDDN TPUNCH
DISCARDDN TDISCA
SORTKEYS
SORTDEVT DISK
STATISTICS
INDEX ALL KEYCARD
REPORT NO UPDATE ALL
//A540769L JOB (CP00,KE50),
// MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID
//*MAIN CLASS=DBOF ,SYSTEM=S12
//REO EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'A540769L.REORG'),
// REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DBOF.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
LISTDEF LST#REO INCLUDE TABLESPACE DB2PLAN.CMNXX* PARTLEVEL LOB
REORG TABLESPACE LIST LST#REO
SHRLEVEL REFERENCE
COPYDDN(TCOPYD)
UNLOAD CONTINUE