zOs/JCL/DB2RUNSA

//A540769Y  JOB (CP00,KE50),                                            00010001
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID
//*MAIN CLASS=LOG0 SYSTEM=S12
//RUNST EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DVBP,'A540769Y.RUNST'),
//   REGION=0M
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSTEMPL DD DISP=SHR,DSN=DVBP.DBAA.LISTDEF(TEMPL)
//SYSIN    DD *
LISTDEF LST
    INCLUDE TABLESPACE XBCZ1001.SPS01001 PARTLEVEL 25
RUNSTATS TABLESPACE XBCZ1001.SPS01001 PART 25
   TABLE(BUA.XBCZ1001PS001001)
   COLUMN(EA1ATRN)
   TABLESAMPLE SYSTEM 5
  SORTDEVT SYSDA
  SHRLEVEL CHANGE
  INDEX ALL KEYCARD UPDATE ALL