100 lines
7.8 KiB
Plaintext
100 lines
7.8 KiB
Plaintext
//DTSBX553 JOB (UI,4300,3400,P),'UIXMATCH ',CLASS=A,MSGLEVEL=(1,1), 00010001
|
|
// USER=#DOADTS, 00011008
|
|
// MSGCLASS=X,REGION=2048K,NOTIFY=ECNTZL1 00020000
|
|
//** 00050300
|
|
//** 1/7/16 VERIFY AMENDED X140 WAGES MARKED FOR AMEND REPORTS 00051008
|
|
//** HAVE AN AT LEAST 1 X144(ADD WAGES) OR (X147(DELETE WAGE) RECORD 00053008
|
|
//** ZL1 00054000
|
|
//** 00055000
|
|
// SET PRGNODE='DEVL.BEN' 00056000
|
|
// SET LVLNODE='CONV' 00056100
|
|
// SET IMPNODE='CONV' 00056200
|
|
// SET UINODE='PROD' 00057000
|
|
//** 00057100
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB 00058000
|
|
//JOBLIB DD DSN=DOESTAX.&PRGNODE..LOADLIB,DISP=SHR 00060000
|
|
// DD DSN=DOESTAX.DEVL.BATCH.LOADLIB,DISP=SHR 00060100
|
|
// DD DSN=UI.&UINODE..DOCS.LOADLIB,DISP=SHR 00061000
|
|
// DD DSN=SYS1.SORTLIB,DISP=SHR 00070000
|
|
//* 00080000
|
|
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS 00090000
|
|
// COND=(0,LT) 00100000
|
|
//SYSOUT DD SYSOUT=* 00110000
|
|
//* 00120000
|
|
//SORTIN DD DSN=DOESTAX.CONV.ESSPAMEN.DAYX140(+0),DISP=SHR 00130008
|
|
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00140000
|
|
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00150000
|
|
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00160000
|
|
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00170000
|
|
//SORTOUT DD DSN=&&DAYX140, 00180001
|
|
// DISP=(NEW,PASS,DELETE), 00190001
|
|
// UNIT=SYSDA, 00210000
|
|
// SPACE=(30720,(2000,2000),RLSE), 00211000
|
|
// DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) 00212000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..PARMLIB(DTSSX553),DISP=SHR 00213003
|
|
//* 00214000
|
|
//* 00215001
|
|
//STEP0200 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS 00216002
|
|
// COND=(0,LT) 00217002
|
|
//SYSOUT DD SYSOUT=* 00218002
|
|
//* 00219002
|
|
//SORTIN DD DSN=DOESTAX.CONV.ESSPAMEN.DAYX144(+0),DISP=SHR 00220008
|
|
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00240000
|
|
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00250000
|
|
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00260000
|
|
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00270000
|
|
//SORTOUT DD DSN=&&DAYX144, 00280001
|
|
// DISP=(NEW,PASS,DELETE), 00300001
|
|
// UNIT=SYSDA, 00320000
|
|
// SPACE=(30720,(2000,2000),RLSE), 00330000
|
|
// DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) 00340000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..PARMLIB(DTSSX553),DISP=SHR 00350003
|
|
//* 00360000
|
|
//* 00370005
|
|
//STEP0300 EXEC PGM=SORT,PARM='VLTEST=0', SORT TRANSACTIONS 00380005
|
|
// COND=(0,LT) 00390005
|
|
//SYSOUT DD SYSOUT=* 00400005
|
|
//* 00410005
|
|
//SORTIN DD DSN=DOESTAX.CONV.ESSPAMEN.DAYX147(+0),DISP=SHR 00420009
|
|
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00430005
|
|
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00440005
|
|
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00450005
|
|
//SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE) 00460005
|
|
//SORTOUT DD DSN=&&DAYX147, 00470005
|
|
// DISP=(NEW,PASS,DELETE), 00480005
|
|
// UNIT=SYSDA, 00490005
|
|
// SPACE=(30720,(2000,2000),RLSE), 00500005
|
|
// DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) 00510005
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..PARMLIB(DTSSX553),DISP=SHR 00520005
|
|
//* 00530005
|
|
//************************************************************** 01210000
|
|
//* CREATE REPORT FROM DC SORTED ECTRACT AND UI MASTER FILES FOR 01220000
|
|
//* ANY SSN THAT HAVE A CLAIM PAID WITHIN THE DC PAY PERIOD 01221000
|
|
//***************************************************************** 01230000
|
|
//STP0400 EXEC PGM=DTSBX553 01240005
|
|
//SYSPRINT DD SYSOUT=* 01250000
|
|
//SYSDBOUT DD SYSOUT=* 01260000
|
|
//SYSCOUNT DD DUMMY 01270000
|
|
//SYSUDUMP DD DUMMY 01280000
|
|
//DTSFX147 DD DSN=&&DAYX147,DISP=(OLD,DELETE,DELETE) 01291005
|
|
//DTSFX144 DD DSN=&&DAYX144,DISP=(OLD,DELETE,DELETE) 01291102
|
|
//DTSFX140 DD DSN=&&DAYX140,DISP=(OLD,DELETE,DELETE) 01292002
|
|
//DTSFD147 DD DSN=DOESTAX.CONV.AMENDOES.DAYX144,DISP=SHR 01300008
|
|
//DTSFO140 DD DSN=DOESTAX.CONV.AMENDOES.DAYX140,DISP=SHR 01301007
|
|
//RPT552R1 DD DSN=DOESTAX.DEVL.RPT552R1,DISP=SHR 01307006
|
|
//ESSPMAIL EXEC PGM=IEBGENER,COND=(0,LT), 01307106
|
|
// REGION=4M 01307206
|
|
//SYSPRINT DD SYSOUT=* 01307306
|
|
//OUT1 OUTPUT DEST=U1003, 01307406
|
|
// USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV', 01307506
|
|
// 'SUBJECT: ESSP AMENDED ERROR REPORT', 01307606
|
|
// 'FILENAME:ESSP_X140S.TXT'), 01307710
|
|
// MAILFROM=DUTAS@DC.GOV 01307810
|
|
//SYSUT1 DD DSN=DOESTAX.DEVL.RPT552R1,DISP=SHR 01307906
|
|
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1 01308006
|
|
//SYSIN DD DUMMY 01308106
|
|
//SYSUDUMP DD SYSOUT=(*,,DUMP) 01308206
|
|
//SYSOUT DD SYSOUT=* 01309000
|
|
//* 01360000
|
|
//**********************************************************************01370000
|