//DTSRQ764 JOB (UI,4300,3400,T),PROD.JBSRV764,CLASS=S,MSGCLASS=X, // NOTIFY=ECNTJP2, //**** TYPRUN=SCAN, //**** USER=#DOADTS, // REGION=0M /*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE //* // SET LVLNODE='PROD' // SET QTRLY='QTR003' //**** //* EXTRACT DATA FROM THE TAX MASTER FILE(S) AND //* WRITE THE JOB SERVICE DOWNLOAD FILE. //**** //PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB //LOADLIBS INCLUDE MEMBER=DTSIJLIB //** //* NO REPORT PRODUCED IN THIS JOB. //**** //STEP0200 EXEC DTSUEXT, // RUNTYPE='OR' //* //STEP0100.DTSFBTCO DD DUMMY //STEP0100.DTSFVRO1 DD DUMMY //STEP0100.EXTPARM DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRQ764), // DISP=SHR //* ADD/OVERRIDE DD NAME DTSJSDL FILE //**** //STEP0100.DTSJSDL DD DSN=DOESTAX.&LVLNODE..JS.EXTRACT.&QTRLY., 00005000 // DISP=(NEW,CATLG,DELETE), 00006000 //*** DISP=SHR, (IF A RERUN) 00006000 // UNIT=SYSDA, 00007000 // SPACE=(8450,(5000,5000),RLSE), 00008000 // DCB=(RECFM=FB,LRECL=845,BLKSIZE=8450) 00009000 //**