//DTSRQ330 JOB (UI,4300,3400,T),DTSBE330,CLASS=P,                       00000199
//         MSGCLASS=X,                                                  00000261
//         NOTIFY=ECNTSUP,                                              00000399
//****     TYPRUN=SCAN,                                                 00000499
//         REGION=0M                                                    00000522
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00000625
//**                                                                    00000799
//**         CREATE DAILY CREDITS AND DEBITS ESTABLISHED REPORT.        00000899
//**                   (*NO* MSTR UPDATE)                               00000999
//**                                                                    00001099
//****                                                                  00003090
//  SET LVLNODE='PROD'                                                  00003199
//  SET MSTNODE='PROD'                                                  00003299
//  SET   LHOLD='YES'                                                   00003399
//****                                                                  00003499
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB                            00003599
//****                                                                  00003636
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00003736
//****                                                                  00004486
//STEP0100 EXEC DTSUX330,                                               00004999
//          RUNTYPE='QE'                                                00005099
//STEP0100.EXTPARM  DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRQ330),        00005299
//          DISP=SHR                                                    00005599
//*                                                                     00005699
//STEP0200 EXEC DTSRP330                     PRINT REPORT               00005799
//****                                                                  00041699