Files
DUTAS/JCL/DTSPX148.jcl

50 lines
2.1 KiB
Plaintext

//DTSPX148 JOB (UI,4300,3400,T),PROCESS-SI-ADMIN, 00000010
// CLASS=A,MSGCLASS=X, 00000010
// USER=#DOADTS,
// NOTIFY=ECNTSUP,
// REGION=0M
//* 00001700
//*>>>>>>>>>>>>>> PROCESS DAILY SI ASSESSMENTS UPDATES <<<<<<<<<<<<<< 00001700
//* 00001700
//*************************************************** 00001700
//* TDEC WAGES PROCESSING MATCH W4 TRANSACTIONS TO REPORTS----REMOVED
//* FROM PRODUCTION ON 10/23/17..................................ZL1 00001700
//* 00001700
//* JOB WILL NOW PROCESS SI ASSESSMENT FEE DURING THE QUARTER ZL1
//*************************************************** 00001700
// SET LVLNODE='PROD'
// SET MSTNODE='PROD'
// SET LHOLD='YES'
// SET PRTHOLD='YES'
// SET LVDHOLD='YES'
// SET LDEST='LOCAL'
// SET S0910='+0'
//* 00001700
//* 00001700
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCLIB 00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600
//*****************************************************************
//***
//*****************************************************************
//* VERIFY NEW BTCH NUMBER VSAM FILE
//*****************************************************************
//******************************************************************
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
VERIFY DATASET (DOESTAX.PROD.VSAM.BTNO)
/*
//***
//*****************************************************************
//* PROCESS SI ASSESSMENTS AFTER LATE PENALTY RUN
//*****************************************************************
//*
//STEP0100 EXEC DTSBE328,
// RUNTYPE='OR'
//*
//STEP0100.EXTPARM DD *
328
/*
//
//***