zOs/JCL/DB2REPAI

//A540769R JOB (CP00,KE50),'DB2 ADMIN',
//         TIME=1440,REGION=0M,CLASS=M1,SCHENV=DB2ALL,
//         MSGCLASS=T,NOTIFY=&SYSUID
//S1       EXEC PGM=DSNUTILB,PARM='DE0G,A540769R.REPA'
//SYSUT1   DD DISP=(,PASS),UNIT=SYSDA
//SORTOUT  DD DISP=(,PASS),UNIT=SYSDA
//SYSERR   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSIN    DD *
   REPAIR LEVELID TABLESPACE WU20A1P.A291A PART 1