//DTSRQ119 JOB (UI,4300,3400,T),PROD.BE119.NO-UPDT,CLASS=P,             00000010
//       MSGCLASS=X,                                                    00000010
//       NOTIFY=ECNTSUP,
//       USER=#DOADTS,
//****   TYPRUN=SCAN,
//       REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****
//   SET LVLNODE='PROD'
//   SET   LHOLD='NO'
//****
//* RPT119R1  = '8 QTRS OF NONE' REPORT
//****
//* NOTE: THIS RUN WILL NOT UPDATE THE MASTER FILES (SEE DTSRQ116)
//*       THE 119R1 REPORT PRODUCED HERE IS A PRELIMINARY LIST
//*       FOR THE TIMEFRAME CHOSEN               (SEE PARMS BELOW)
//****
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//*
//****                    NO BKP NEEDED FOR THIS RUN
//*
//STEP0100 EXEC DTSUEXT,                    BD400 EXTRACT
//          RUNTYPE='OR',
//          PREBACK='Y'
//STEP0100.EXTPARM  DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRQ119),
//         DISP=SHR
//***                                       SORT REPORT RECORDS
//STEP0200 EXEC DTSRSORT
//***
//*                                         REPORT GENERATION
//STEP0300 EXEC DTSRQRPT
//DOESLBLP.DOESLBL1 DD DUMMY                      LABELS                00630200
//*                                         SPECIFIC OVERRIDES
//STEP0100.RPT117R2 DD  HOLD=YES
//STEP0100.RPT119R1 DD  DSN=DOESTAX.CONV.RPT119R1.TXT(+1),
//             DISP=(,CATLG,DELETE),
//             SPACE=(30000,(100,200),RLSE),
//             DCB=(RECFM=FB,LRECL=134,BLKSIZE=1340)
//*
//STEP0300 EXEC PGM=IEBGENER,COND=(0,LT),REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:GERALD.SMART@DC.GOV',
//         'TO:ROSALIND.HOLBROOK@DC.GOV',
//         'TO:LAWANNE.CRAIG@DC.GOV',
//         'CC:MARGARET.HERNANDEZ@DC.GOV',
//         'CC:ARAVIND.VITTA@SAGITEC.COM',
//*        'CC:RYAN.MOORE-LEE@DC.GOV',
//         'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: DUTAS 8QTR ZERO WAGE INACTIVATIONS....ZL1',
//         'FILEDESC: DUTAS INACTIVATIONS 8QTR AND ZERO RPT',
//         'FILENAME: DUTAS_8QTR_0WAGE_RPT.TXT'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.RPT119R1.TXT(+1),DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*