zOs/JCL/WI101RBU

//Y4WI101R JOB (CP00,KE50),'DB2 REO',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//*
//******************************************************************
//*
//* DB2 ADMIN GENERATED JOB - RUN REBUILD UTILITY (INDEXES)
//*
//***********************************************************ADB2UXB
//*
//******************************************************************
//* STEP RBLDIDX: REBUILD INDEXES
//******************************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBOF,'Y4WI101R.REBUI'),
//   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 *
   OPTIONS EVENT (ITEMERROR, SKIP)
   LISTDEF LST
       INCLUDE INDEXSPACES TABLESPACE WI02A1P.A101$  PARTLEVEL
  REBUILD INDEX LIST LST SCOPE ALL
  --SHRLEVEL NONE
    SORTDEVT SYSDA
    WORKDDN(TSYUTD)