zOs/JCL/DB2DIS

//A540769W JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M                                     00030000
//*MAIN CLASS=LOG0,DEADLINE=(30M,A),HOLD=YES
//P04     EXEC PGM=IKJEFT01
//SYSTSPRT  DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSTSIN   DD *
 DSN SYS(DBOC)
 -DIS DB(DCMN050) SPACENAM(*) restrict LIMIT(*)
 -DIS DB(DCMN050) SPACENAM(*)          LIMIT(*)
END
   sub WK.JCL(DB2DIS)