Files
DUTAS/JCL/DTSCHZE1.jcl

71 lines
5.5 KiB
Plaintext

//DTSCHGE1 JOB (UI,4300,3400,T),CHGEMP,CLASS=P,MSGCLASS=X, 00010038
//** TYPRUN=SCAN, 00011038
//*** USER=#DOADTS, 00012039
//*** NOTIFY=ECNTJP2,REGION=0M 00013041
// NOTIFY=ECNTSUP,REGION=0M 00014041
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//**** 00040000
// SET PRGNODE='PROD' /* CHK '<--' LINES BELOW FOR A RERUN 00050038
// SET LVLNODE='PROD' 00060038
// SET MSTNODE='PROD' 00061038
// SET UINODE='PROD' 00070044
// SET CHGNODE='PROD' 00070144
// SET CHGMNBR='CHGM002' 00071000
// SET CHGMSSN='CHGM030' 00072023
// SET QTRLY='SPECXX' 00080004
// SET LDEST=U@PRT65 00090000
// SET LHOLD='YES' 00100000
//***** 00110000
/*JOBPARM LINECT=104 /* NEEDED FOR THE OLD XEROX AT DOES ONLY 00120000
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB 00130000
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00140007
//**** 00150000
//* PERIODIC CHARGE REPORTING PROCESS CAN GENERATE CHARGE STATEMENTS 00160000
//* (W) FOR RATED EMPLOYERS, BILLS (I) FOR SELF-INSURED (S-I) 00170000
//* EMPLOYERS, MANAGEMENT REPORTS (O) FOR RATED, S-I, CWC & FEDS, 00180000
//* ALONG WITH LABELS FOR THE S-I, CWC & FEDS. 00200000
//**** 00210000
//* PARMS FOR CHGBD205: 00220000
//* COLS. RUN TYPE: 00240000
//* 01-03 QTR = QUARTERLY 00250000
//* ANN = ANNUAL 00260000
//* MNE = MONTHLY - WITH EMPLOYER ACCT NUMBER SPECIFIED 00270000
//* EMP = SPECIAL REPORT FOR SINGLE EMPLOYER ACCT NUMBER 00280000
//* RPT = REPRINT REPORTS SPECIFIED IN REPORT TYPE PARM 00300000
//* AGT = RECREATE FISCAL AGENT FILE 00310000
//* TEU = REPRINT TEUC RPT SPECIFIED IN REPORT TYPE PARM 00320000
//* 00330000
//* 05-10 MMDDYY = START DATE OF SELECTION 00340000
//* 12-17 MMDDYY = END DATE OF SELECTION 00350000
//* 00351000
//* 19-24 YYYYYY = (FOR RPT ONLY) REPORT TYPES DESIRED: 00360037
//* - Y/N RATED REPORT (W)(O) 00390000
//* - Y/N SELF-INSURED REPORT (I)(O) 00400000
//* - Y/N CWC REPORT (O) 00410000
//* - Y/N FEDERAL REPORT (O) 00420000
//* - Y/N TEUC REPORT (?) (O) 00430134
//* - Y/N DC GOV REPORT (O) 00430234
//* 00431000
//* 26-31 NNNNNN = 6 DIGIT EMPLOYER ACCOUNT NUMBER 00440037
//* (USED WITH RUN TYPE = EMP/MNE) 00450000
//* 00460000
//****SET EXTRACT PARM IN DOESTAX.&LVLNODE.APPL.PARMLIB(CHGPARM) 00470000
//* (OR NOT... FOR NOW) 00471000
//**** 00480000
//STEP0200 EXEC DTSUXCGP 00490000
//STEP0100.SYSIN DD * 00491000
EMP,010105,101508, ,143904 00492045
/* 00500000
//STEP0100.CHGPARM DD DISP=SHR /* CHARGE PARM 00500110
//STEP0100.DTSFVRO1 DD DISP=SHR /* CHG.BD205.RPT 00500211
//STEP0500.BD220CHG DD DISP=SHR /* CHG.BD220.RPT 00500308
//**** 00501000
//* SYSIN CARD: EMP,050102,053102, ,030302 00502137
//**** 00504000
//STEP0300 EXEC DTSCGRPT 00510000
//STEP0100.RPC100R2 DD DUMMY /* FISC.AGNT. <-- 00511001
//STEP0100.TPSCHRG DD DUMMY /* TPS FILE <-- 00512001
//STEP0100.DTSFBTCO DD DUMMY /* BTC FILE <-- 00513001
//DOESLBLP.DOESLBL1 DD DUMMY /* LABELS <-- 00514001
//**** 00520000