66 lines
3.8 KiB
Plaintext
66 lines
3.8 KiB
Plaintext
//DTSCHGXM JOB (UI,4300,3400,T),QTRLY-CWC-FED-CHGRS,CLASS=P,MSGCLASS=X, 00010017
|
|
//** TYPRUN=SCAN, 00011017
|
|
//* USER=#DOADTS,
|
|
// NOTIFY=ECNTSUP,REGION=0M 00014021
|
|
//**** 00042026
|
|
// SET PRGNODE='PROD' 00050017
|
|
// SET LVLNODE='PROD' 00060017
|
|
// SET UINODE='PROD' 00060124
|
|
// SET MSTNODE='PROD' /* QRTLY RUN FOR CWC & FED EMPLOYERS 00061032
|
|
// SET CHGNODE='PROD' 00070017
|
|
// SET CHGMNBR='CHGM002' /* AND DC GOVT VIEW DIRECT REPORTS 00071004
|
|
// SET CHGMSSN='CHGM030' 00072014
|
|
// SET QTRLY='CFOXM151' 00080038
|
|
// SET LDEST='LOCAL' 00090000
|
|
// SET LVDHOLD='YES' 00100027
|
|
// SET LHOLD='YES' 00101027
|
|
//***** 00110000
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB 00130000
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00140009
|
|
//**** 00150000
|
|
//* QUARTERLYCHARGE REPORTING PROCESS FOR CWC AND FED AND DC GOVT 00160032
|
|
//* VIEW DIRECT REPORTS 00160032
|
|
//**** 00480000
|
|
//STEP0200 EXEC DTSUXCWC 00490000
|
|
//**** 00480000
|
|
//*>>>>>>>>PARM MUST BE CHANGED BEFORE RUNNING JOB (START/END DATES) 00160032
|
|
//**** 00480000
|
|
//STEP0100.SYSIN DD * 00491032
|
|
RPT, , ,NNYYYY,000000
|
|
//**** 00504000
|
|
//STEP0300 EXEC DTSCHGXM 00510031
|
|
// 00520000
|
|
//*********************************************************************
|
|
//STEP0400 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//CHGFEDCW DD DSN=DOESTAX.PROD.CHG.BD220.CWC.TEMCWC,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//*OUTPUT REPT DEST=LOCAL,FORMS=REPT
|
|
//***********************************************************
|
|
//EMAIL EXEC PGM=IEBGENER,
|
|
// REGION=4M
|
|
//SYSPRINT DD SYSOUT=*
|
|
//OUT1 OUTPUT DEST=U1003,
|
|
// USERDATA=('TO:RAGINI.JUJJAVARAPU@DC.GOV',
|
|
// 'CC:ZARATH.LALPUTAN@DC.GOV',
|
|
// 'CC:NANCY.HUDAK@DC.GOV',
|
|
// 'SUBJECT: EOP FILE READY )',
|
|
// 'FILEDESC: CHARGES FOR EOP OFFICE ',
|
|
//* 'FILENAME:DOESTAX.DEVL.IRSFUTA.QTRLY')
|
|
// 'FILENAME:EOP_QTR_CHARGES.TXT')
|
|
//SYSUT1 DD DSN=DOESTAX.DEVL.EOPQTR.TXT,DISP=SHR
|
|
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
|
|
//SYSIN DD DUMMY
|
|
//SYSUDUMP DD SYSOUT=(*,,DUMP)
|
|
//*
|
|
//****************************************************************
|
|
//DTSFTCQ4 EXEC PGM=FTP,PARM='(EXIT TIMEOUT 120)',COND=(0,LT)
|
|
//*
|
|
//SYSPRINT DD SYSOUT=(*)
|
|
//SYSMDUMP DD SYSOUT=(*)
|
|
//OUTPUT DD SYSOUT=(*)
|
|
//INPUT DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSFTCQ4),DISP=SHR
|
|
//*
|
|
**************************** BOTTOM OF DATA **********************
|
|
//*********************************************************************
|