DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
69
Procs/DTSOEMAL
Normal file
69
Procs/DTSOEMAL
Normal file
@ -0,0 +1,69 @@
|
||||
//DTSOEMAL PROC RUNTYPE='ONTIME' 00000010
|
||||
//* 00001700
|
||||
//*************************************************** 00001700
|
||||
//* MATCH TDEC ONTIME WAGE W4 TRANSACTIONS TO REPORTS
|
||||
//*************************************************** 00001700
|
||||
//* 00001700
|
||||
//*****************************************************************
|
||||
//***
|
||||
//STEP0600 EXEC PGM=IEBGENER,
|
||||
// COND=(0,LT),
|
||||
// REGION=4M
|
||||
//SYSPRINT DD SYSOUT=*
|
||||
//OUT1 OUTPUT DEST=U1003,
|
||||
// USERDATA=('FROM:ZARATH.LALPUTAN@DC.GOV',
|
||||
// 'TO:ROSA.MORALES@DC.GOV',
|
||||
// 'CC:MOHAMED.JALLOH@DC.GOV',
|
||||
// 'CC:GIL.DIMATTIA@DC.GOV',
|
||||
// 'CC:ZARATH.LALPUTAN@DC.GOV',
|
||||
// 'SUBJECT: TDEC ONTIME MISSING REPORTS )',
|
||||
// 'FILEDESC: TDEC ONTIME MISSING REPORTS ',
|
||||
// 'FILENAME: TDEC.ONTIME.ERROR1.TXT')
|
||||
//SYSUT1 DD DSN=DOESTAX.&EXTNODE..TDECX148.&RUNTYPE..MISSRPTS,
|
||||
// DISP=SHR
|
||||
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
|
||||
//SYSIN DD DUMMY
|
||||
//SYSUDUMP DD SYSOUT=(*,,DUMP)
|
||||
//****************************************************
|
||||
//**
|
||||
//STEP0700 EXEC PGM=IEBGENER,
|
||||
// COND=(0,LT),
|
||||
// REGION=4M
|
||||
//SYSPRINT DD SYSOUT=*
|
||||
//OUT1 OUTPUT DEST=U1003,
|
||||
// USERDATA=('FROM:ZARATH.LALPUTAN@DC.GOV',
|
||||
// 'TO:ROSA.MORALES@DC.GOV',
|
||||
// 'CC:MOHAMED.JALLOH@DC.GOV',
|
||||
// 'CC:GIL.DIMATTIA@DC.GOV',
|
||||
// 'CC:ZARATH.LALPUTAN@DC.GOV',
|
||||
// 'SUBJECT: TDEC ONTIME WAGE DISCREPANCIES )',
|
||||
// 'FILEDESC: TDEC ONTIME WAGE DISCREPANCIES ',
|
||||
// 'FILENAME: TDEC.ONTIME.ERROR2.TXT')
|
||||
//SYSUT1 DD DSN=DOESTAX.&EXTNODE..TDECX148.&RUNTYPE..WAGEEROR,
|
||||
// DISP=SHR
|
||||
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
|
||||
//SYSIN DD DUMMY
|
||||
//SYSUDUMP DD SYSOUT=(*,,DUMP)
|
||||
//****************************************************
|
||||
//**
|
||||
//STEP0800 EXEC PGM=IEBGENER,
|
||||
// COND=(0,LT),
|
||||
// REGION=4M
|
||||
//SYSPRINT DD SYSOUT=*
|
||||
//OUT1 OUTPUT DEST=U1003,
|
||||
// USERDATA=('FROM:ZARATH.LALPUTAN@DC.GOV',
|
||||
// 'TO:ROSA.MORALES@DC.GOV',
|
||||
// 'CC:MOHAMED.JALLOH@DC.GOV',
|
||||
// 'CC:GIL.DIMATTIA@DC.GOV',
|
||||
// 'CC:ZARATH.LALPUTAN@DC.GOV',
|
||||
// 'SUBJECT: TDEC ONTIME COUNTS )',
|
||||
// 'FILEDESC: TDEC ONTIME COUNTS ',
|
||||
// 'FILENAME: TDEC.ONTIME.COUNTS.TXT')
|
||||
//SYSUT1 DD DSN=DOESTAX.&EXTNODE..TDECX148.&RUNTYPE..SUMYCNTS,
|
||||
// DISP=SHR
|
||||
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
|
||||
//SYSIN DD DUMMY
|
||||
//SYSUDUMP DD SYSOUT=(*,,DUMP)
|
||||
//*
|
||||
//*********************************************************************
|
||||
//**
|
||||
Reference in New Issue
Block a user