Files
DUTAS/JCL/DTSRQ119.jcl

60 lines
2.2 KiB
Plaintext

//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..PROCS.BATCH.LIB
//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
//*