48 lines
3.7 KiB
Plaintext
48 lines
3.7 KiB
Plaintext
//DTSRQ517 JOB (UI,4300,3400,T),PRODYRLY.RATING.2B, 00000163
|
|
// CLASS=P,MSGCLASS=X, 00000261
|
|
// NOTIFY=ECNTSUP, 00000363
|
|
//**** TYPRUN=SCAN, 00000458
|
|
//*** USER=#DOADTS, 00000563
|
|
// REGION=0M 00000631
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**** CHECK '***>>>' ON LINES BELOW FOR A RERUN 00000731
|
|
//**** 00000831
|
|
//* AFTER YEARLY EXPERIENCE RATING PART 1 (RUNRQ506) 00000931
|
|
//* & AFTER REPORT REVIEW AND ANY NEEDED ADJUSTMENTS, 00001031
|
|
//* RUN YEARLY EXPERIENCE RATING PART 2A (RUNRQ503) (*NO* MST UPDATE) 00001131
|
|
//* AND/OR 00001231
|
|
//* RUN YEARLY EXPERIENCE RATING PART 2B (THIS RUN) (WITH MST UPDATE) 00001331
|
|
//**** 00001431
|
|
//* *** THE FOLLOWING DATA ELEMENTS MUST BE AVAILABLE *** 00001531
|
|
//* *** BEFORE STARTING THIS RUN: *** 00001631
|
|
//* *** 1. THE RATE NOTICE DATE (THE DATE *** 00001731
|
|
//* *** PRINTED ON THE RATE NOTICES) ON SCREEN 83 *** 00001831
|
|
//* *** 2. A CALENDAR YEAR REFERENCE FILE RECORD *** 00001931
|
|
//* *** (FCYR) ON SCREEN 81. THIS RECORD WILL *** 00002031
|
|
//* *** INCLUDE THE TAXABLE WAGE BASE AND THE *** 00002131
|
|
//* *** FUTA CREDIT RATE FOR THE NEW RATE YEAR. *** 00002231
|
|
//**** 00002331
|
|
// SET LOADLIB='PROD' 00002461
|
|
// SET LVLNODE='PROD' 00002561
|
|
// SET TPSYRQ='YR2007' 00002665
|
|
// SET RATEYR='YR2007' 00002765
|
|
// SET LDEST=U@PRT65 00002864
|
|
// SET LVDHOLD='YES' 00002964
|
|
// SET BD750='071,Y,R' /* RTE-YR-START-YRQ,UPD-MST-IND,RUN-TYPE 00003065
|
|
// SET BD790='071' /* RTE-YR-START-YRQ A=ANNUAL 00003165
|
|
//**** /* R=REGULAR 00003265
|
|
// SET CHGNODE='PROD' 00003364
|
|
// SET CHGMNBR='CHGM002' 00003464
|
|
//**** 00003564
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&LOADLIB..PROCS.BATCH.LIB 00003664
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00003764
|
|
//**** BACKUP BEFORE THIS RUN 00003800
|
|
//**** (NOT NEEDED IF RUN RIGHT AFTER A DAILY) 00003931
|
|
//*TEP0100 EXEC DTSUTVSM, 00004065
|
|
//* BKUPGEN='(+1)' 00004165
|
|
//**** RUN THE EXTRACT 00004263
|
|
//**** SORT REPORT RECORDS 00041600
|
|
//STEP0400 EXEC DTSARRVD 00090000
|
|
//** TEXT VERSION OF ETA204 FOR DOWNLOAD 00110024
|
|
//** 00680000
|