DUTAS re-platformed to Raincode - Initial Source Code

This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions

View File

@ -0,0 +1 @@
REPRO INFILE(IFILE) OUTFILE(OFILE)

View File

@ -0,0 +1,8 @@
**DTSBX465 DCG FED BUS
**DTSBX465 20050101 20050331 DCG FED BUS
*** PROGRAM TO BE EXECUTED STARTS IN COL 3 - 10
*** STARTING QTR BEGINS IN COL 13 - 20, ENDING QTR BEGINS COL 22 - 29
*** IF 'BLANK' FOR QTR BEGIN & QTR END, IT WILL GIVE YOU A DEFAULT DATES
*** COL 31 - 33 DCG DCGOVERNMENT WAGES
*** COL 35 - 37 FED FEDERAL GOVERNMENT WAGES
*** COL 39 - 41 BUS BUSINESS WAGES

View File

@ -0,0 +1,5 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
delete does_checks.pgp
QUIT

View File

@ -0,0 +1,23 @@
DEL-
DOESTAX.DEVL.TEMP.TAXCOPY-
NOERASE
IF LASTCC=8 THEN-
SET MAXCC=0
DEFINE-
CLUSTER(-
NAME (DOESTAX.DEVL.TEMP.TAXCOPY)-
KEYS (4,0)-
RECSZ (314,314)-
CYL (30,10)-
FREESPACE (0 0)-
SHR (2,3)-
SPEED-
VOL (DES39Q)-
UNQ)-
DATA -
(NAME(DOESTAX.DEVL.TEMP.TAXCOPY.DATA))-
INDEX -
(NAME(DOESTAX.DEVL.TEMP.TAXCOPY.INDEX)-
CISZ(1024))

View File

@ -0,0 +1,5 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
delete does_payments.pgp
QUIT

View File

@ -0,0 +1,7 @@
10.82.193.147
TDEC_DCW_2
DYLE7ilpYZd4
ascii
PUT 'DOESTAX.CONV.TDEC.VERIF' verification_file.txt
PUT 'DOESTAX.CONV.TDEC.EMPNAME' employer_no_file.txt
QUIT

View File

@ -0,0 +1,5 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
delete does_wages.pgp
QUIT

View File

@ -0,0 +1,7 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
ascii
PUT 'DOESTAX.CONV.TDEC.VERIF' verification_file.txt
PUT 'DOESTAX.CONV.TDEC.EMPNAME' employer_no_file.txt
QUIT

View File

@ -0,0 +1,5 @@
ftp.photobookpress.com
document
docm
put 'DOESTAX.PROD.UC30data' DOESUC30.pgp
QUIT

View File

@ -0,0 +1,6 @@
10.87.72.48
trwftp
redskins
ascii
PUT 'DOESTAX.DEVL.EOPQTR.TXT' EOPCHG.txt
QUIT

View File

@ -0,0 +1,7 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
ascii
asis
get does_checks.pgp 'DOESTAX.conv.TDEC.does.crypt.chks' (replace
QUIT

View File

@ -0,0 +1,7 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
ascii
asis
get does_payments.pgp 'DOESTAX.conv.TDEC.essp.crypt.pymts' (replace
QUIT

View File

@ -0,0 +1,7 @@
10.82.193.144
TDEC_DCW_1
nBRkPK1v
ascii
asis
get does_wages.pgp 'DOESTAX.conv.TDEC.essp.crypt.WAGES' (REPlace
QUIT

View File

@ -0,0 +1,6 @@
ascii
SENDSITE
cd /outbound/GOVTO945_ACH_13/
get ESSP_DOESTAX_ACHDEBIT_RETURNS.TXT +
'ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDRETN' (REPLACE
quit

View File

@ -0,0 +1,4 @@
locstat
machine safetrans.wellsfargo.com
login bvj7sg4l
password udd1ldd9231%

View File

@ -0,0 +1,4 @@
locstat
machine safetrans.wellsfargo.com
login bvj7sg4l
password kcl6u5h888>

View File

@ -0,0 +1,5 @@
ascii
cd /inbound/GOVTO945_ACH_12/
PUT 'ecntsup.DOESTAX.conv.fromessp.achdpayt' +
ESSP_DOESTAX_ACHDEBIT_DEPOSITS.TXT
quit

View File

@ -0,0 +1,4 @@
locstat
machine safetrans.wellsfargo.com
login bvj7sg4l
password l8zy8uk8252$

View File

@ -0,0 +1 @@
REPRO INFILE(INDD01) OUTFILE(OUTDD01)

View File

@ -0,0 +1 @@
SORT FIELDS=(67,6,CH,A,40,6,CH,A)

View File

@ -0,0 +1 @@
SORT FIELDS=(7,64,CH,A)

View File

@ -0,0 +1,2 @@
SORT FIELDS=(1,10,CH,A)
INCLUDE COND=(33,2,CH,EQ,C'02')

View File

@ -0,0 +1 @@
SORT FIELDS=(1,23,CH,A)

View File

@ -0,0 +1 @@
SORT FIELDS=(5,6,CH,A,12,4,CH,A,17,1,CH,A,1,3,CH,A)

View File

@ -0,0 +1 @@
SORT FIELDS=(5,6,CH,A,1,3,CH,A)

View File

@ -0,0 +1 @@
SORT FIELDS=(1,13,CH,A)

View File

@ -0,0 +1,2 @@
SORT FIELDS=(1,10,CH,A)
INCLUDE COND=(33,2,CH,EQ,C'00')

View File

@ -0,0 +1 @@
SORT FIELDS=(5,6,CH,A,12,4,CH,A,17,1,CH,A,19,8,CH,A)

View File

@ -0,0 +1,2 @@
SORT FIELDS=(4,6,CH,A,76,8,CH,A)
INCLUDE COND=(33,2,CH,EQ,C'00')

View File

@ -0,0 +1,2 @@
SORT FIELDS=(5,6,CH,A,1,3,CH,A)
INCLUDE COND=(1,3,CH,EQ,C'140')

View File

@ -0,0 +1,2 @@
SORT FIELDS=(1,10,CH,A)
INCLUDE COND=(12,6,CH,EQ,C'2014/4',OR,33,2,CH,EQ,C'01')

View File

@ -0,0 +1,2 @@
SORT FIELDS=(1,10,CH,A)
OMIT COND=(12,6,CH,EQ,C'2014/4',OR,33,2,CH,EQ,C'01')

View File

@ -0,0 +1,2 @@
--encrypt --text --armor dd:textin
--user "IT Support <itsupport@linemark.com" --output dd:encout