43 lines
3.3 KiB
Plaintext
43 lines
3.3 KiB
Plaintext
//DTSCHGVT JOB (UI,4300,3400,T),JHP.CHGDLY.REAPPLY, 00000139
|
|
// CLASS=P,MSGCLASS=X, 00000239
|
|
//*** TYPRUN=SCAN, 00000339
|
|
//*** USER=#DOADTS, 00000439
|
|
// NOTIFY=ECNTSUP,REGION=0M 00000639
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**** 00000739
|
|
// SET PRGNODE='PROD' /* REAPPLY DAILY CHRG TRXS AFTER 00000839
|
|
// SET LVLNODE='PROD' /* RESTORE OF CHGM002 VSAM FILE 00000939
|
|
// SET CHGNODE='PROD' /* (DTSCHGVR) FROM LAST WEEKLY 00001039
|
|
// SET CHGMNBR='CHGM002' /* (DTSCHGD7) 00001139
|
|
// SET BKPGEN='(+0)' /* ONCE FOR EACH DAY NEEDED 00001239
|
|
// SET LDEST=U@PRT65 00001339
|
|
// SET LHOLD='YES' 00001439
|
|
//**** 00001539
|
|
//* DAILY BENEFIT CHARGE PROCESS 00002003
|
|
//**** 00002425
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB 00003026
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00003227
|
|
//**** 00003325
|
|
//STEP0100 EXEC PGM=CHGBD200, 00004039
|
|
// COND=(0,LT) 00004139
|
|
//SYSOUT DD SYSOUT=* 00004239
|
|
//SYSABOUT DD SYSOUT=* 00004339
|
|
//SYSUDUMP DD SYSOUT=* 00004439
|
|
//BD100CHG DD DSN=DOESTAX.&LVLNODE..BKP.CHGBD200.TRX.DAILY&BKPGEN., 00004539
|
|
// DISP=SHR 00004639
|
|
//** 00004739
|
|
//BD200CHG DD DSN=DOESTAX.&CHGNODE..VSAM.&CHGMNBR.,DISP=SHR 00004839
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00004939
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00005039
|
|
// AMP=('BUFNI=5,BUFND=10') 00005139
|
|
//** 00005239
|
|
//* 00005318
|
|
//STEP0300 EXEC DTSCGRD1, /* PRINT REPORTS 00005428
|
|
// LDEST=U@PRT65, 00005505
|
|
// LHOLD='YES' 00005605
|
|
//** 00005726
|
|
//STEP0200.RPT907R1 DD HOLD=NO /* UNUS.COND. RPT 00006038
|
|
//STEP0200.RPT907R2 DD DUMMY /* UNUS.COND. RPT 00006138
|
|
//DOESLBLP.DOESLBL1 DD DUMMY /* LABELS 00007026
|
|
//**** 00020025
|