zOs/JCL/BEIXRUN

//A540769R JOB (CP00,KE50),
//       'CATALOG',MSGCLASS=T,TIME=1440,
//         NOTIFY=&SYSUID,REGION=0M
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
//   PARM=(DBAF,'A540769R.RUNSTA'),
//   REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//RNPRIN01 DD SYSOUT=*
//SYSIN DD *
   RUNSTATS TABLESPACE BE01A1A.A010A01
         SHRLEVEL CHANGE
           INDEX(OA1A01.IBE010A0 KEYCARD)
           REPORT NO  UPDATE ALL