33 lines
2.5 KiB
Plaintext
33 lines
2.5 KiB
Plaintext
//PRUX413Q PROC 00015066
|
|
//* 00041123
|
|
//******************************************************************** 00051000
|
|
//* STEP0100 - VALIDATE WAGE TRANSACTIONS FROM TAPE 00060048
|
|
//******************************************************************** 00070000
|
|
//STEP0100 EXEC PGM=WAGEDC,PARM='&LOGNO.&ZEROEMP.' 00080065
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(PRUI413Q),DISP=SHR 00120068
|
|
//MAGFILE DD DSN=DOESTAX.CONV.&LOGNODE., 00120172
|
|
//*AGFILE DD DSN=DOESTAX.CONV.WAGEDC, 00120272
|
|
// DISP=SHR 00120369
|
|
//ESP600F1 DD DSN=UI.PROD.DOCS.ESP600F1,DISP=SHR 00120471
|
|
//* 00120571
|
|
//MAGOUT DD DSN=DOESTAX.CONV.&W4FILE, 00120671
|
|
// DISP=(MOD,KEEP,KEEP), 00120771
|
|
// UNIT=SYSDA, 00120871
|
|
// SPACE=(CYL,(5,5)), 00120971
|
|
// DCB=(RECFM=FB,LRECL=90,BLKSIZE=9000) 00121071
|
|
//* 00160015
|
|
//DTSFVRO1 DD DSN=DOESTAX.CONV.&EMFILE, 00172063
|
|
// DISP=(MOD,KEEP,KEEP), 00173058
|
|
// UNIT=SYSDA, 00173135
|
|
// SPACE=(8192,(1000,1000),RLSE), 00174029
|
|
// DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00175037
|
|
//* 00180028
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00190047
|
|
//***************************************************************** 00320000
|
|
//LISTOUT DD SYSOUT=(*) 00330000
|
|
//SYSABOUT DD SYSOUT=(*) 00340004
|
|
//SYSPRINT DD SYSOUT=(*) 00360004
|
|
//SYSUDUMP DD SYSOUT=(*) 00370047
|
|
//SYSOUT DD SYSOUT=(*) 00400000
|
|
//* 00410029
|