Files
DUTAS/Procs/EFTUI100
2025-07-21 11:20:11 -04:00

64 lines
5.0 KiB
Plaintext

//***** 00000811
//** DAILY ELECTRONIC PAYMENT/REPORTING IMPORT 00000911
//***** 00001011
//EFTUI100 PROC 00001143
//***** 00001211
//* 00002800
//********************************************************************* 00002900
//STEP0310 EXEC PGM=EFTBI100, EMPLOYER WAGE LISTING 00003040
//* TIME=(0,30), 00003100
// COND=(0,LT) 00003201
//SYSOUT DD SYSOUT=* 00003300
//SYSABOUT DD SYSOUT=* 00004000
//SYSUDUMP DD SYSOUT=* 00005000
//SYSIN DD DUMMY 00005112
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00006000
//* 00006100
//GOVONEFT DD DSN=&&GOV1EFT, 00058366
// DISP=(OLD,DELETE,DELETE) 00058565
//* 00059019
//EFTTRANS DD DSN=DOESTAX.&MSTNODE..GOV1.TRANSOUT(+1), 00059167
// DISP=(,CATLG,DELETE), 00059247
// UNIT=SYSDA, 00059301
// SPACE=(8192,(1000,1000),RLSE), 00059401
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00059568
//* 00059601
//DTSFVRO1 DD DSN=DOESTAX.&MSTNODE..&GOV1ERR(+1), 00180059
// DISP=(,CATLG,DELETE), 00190070
// UNIT=SYSDA, 00200028
// SPACE=(8192,(1000,1000),RLSE), 00210028
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00221030
//* 00230004
//EFTIFGDG DD DSN=DOESTAX.&MSTNODE..&GOV1OLD.&GOV1GEN,DISP=SHR 00250065
//* 00569801
//* 00569960
//STEP0320 EXEC EFTRSORT 00570063
//* 00580060
//******************************************************* 00590064
//STEP0330 EXEC PGM=DTSBD800, 00600064
// COND=(0,LT) 00610064
//SYSOUT DD SYSOUT=* 00620064
//SYSABOUT DD SYSOUT=* 00630064
//SYSUDUMP DD SYSOUT=* 00640064
//** 00650064
//PARMIN DD DUMMY 00660064
//** 00690064
//ATLSTIN DD DUMMY 00700064
//** 00710064
//DTSFVRI1 DD DSN=&&SRTRPT,DISP=(OLD,DELETE,DELETE) 00720064
//** 00730064
//DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, 00740064
// AMP=('BUFNI=5,BUFND=10') 00750064
//* 00760064
//** ERRORS REPORT 00770064
//RPT907R1 DD SYSOUT=Z, 00780064
// HOLD=&LHOLD., 00790064
// DEST=U@PRT65 00800064
//* 00800172
//RPT907R2 DD DUMMY 00801072
//* 00810064
//RPT980R1 DD SYSOUT=Q,COPIES=2, 00910064
// HOLD=&LHOLD., 00920064
// DEST=U@PRT65 00930064
//* 00940064