//DTSRRRPT JOB (UI,4300,3400,T),PROD.PER.RPT,                           00000010
//       CLASS=P,MSGCLASS=X,                                            00000010
//       NOTIFY=ECNTSUP,
//****   TYPRUN=SCAN,
//       REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****
//     SET RPTNODE='SRTDAILY'
//     SET RPTGEN='+0'
//     SET LVLPROG='PROD'
//     SET LVLNODE='PROD'
//       SET LHOLD='YES'
//     SET LVDHOLD='YES'
//       SET LDEST=U@PRT65
//****
//*   JOB : RERUN A REPORT FROM A GIVEN PER.RPT FILE(S)
//****
/*JOBPARM  LINECT=104         /* NEEDED FOR THE OLD XEROX AT DOES ONLY
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLPROG..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//****                                      SORT REPORT RECORDS
//STEP0200 EXEC DTSZSORT
//*TEP0100.SORTIN DD DSN=DOESTAX.&LVLNODE..SRTDAILY.RPT(+0),
//*          DISP=SHR
//****            DD DSN=DOESTAX.&LVLNODE..PER.RPT.G0349V00,
//****       DISP=SHR
//****                                      REPORT GENERATION
//**DTSBD800,INC,102,103,108,109,112,115,116,117
//****
//STEP0300 EXEC DTSD0Z
//**//STEP0100.PARMIN  DD  *
//**DTSBD800,INC,412
//**/*
//*TEP0100.RPT411R1 DD  HOLD=YES
//*TEP0100.RPT412R1 DD  HOLD=YES
//*TEP0100.RPT412R2 DD  HOLD=YES
//*TEP0100.RPT417R1 DD  HOLD=YES
//*TEP0100.RPT418R1 DD  HOLD=YES
//*TEP0100.RPT420R1 DD  HOLD=YES
//*TEP0100.RPT421R1 DD  HOLD=YES
//*TEP0100.RPT422R1 DD  HOLD=YES
//**EP0100.RPT422R2 DD  HOLD=YES
//***STEP0100.CBDATA   DD  DSN=DOES.CICS.FIN730.CBDATA.EX060102,DISP=SH
//*TEP0100.CBDATA   DD  DSN=DOES.CICS.FIN730.CBDATA.EX100102,DISP=SHR
//*TEP0100.RPT704R1 DD  HOLD=YES
//*TEP0100.RPT705R1 DD  HOLD=YES
//*TEP0100.RPT708R1 DD  HOLD=YES
//*TEP0100.RPT980R1 DD  HOLD=YES
//*                                                                     00640000
//DOESLBLP.DOESLBL1 DD  HOLD=YES                 LABELS                 00631000
//*