//MYGENER   JOB   (ACCT01,ACCT02),'L-MCCABE',CLASS=I,
//                     MSGCLASS=X,NOTIFY=ME
/*ROUTE   PRINT   MyRMT
//*************************************************************
//JS010   EXEC   PGM=IEBGENER
//SYSPRINT   DD   SYSOUT=*
//SYSUT1       DD   DSN=PROD.COPYLIB(MEMBERXX),DISP=SHR
//*SYSUT2     DD   UNIT=SYSDA,DISP=(,CATLG,DELETE),
//*   DSN=MYID.MY.DATASET,
//*   SPACE=(TRK,(1,1),RLSE)
//*   DCB=(YOUR.MODEL)
//SYSUT2   DD   SYSOUT=*
//SYSIN     DD   DUMMY

Return To JCLLIB