39 lines
3.0 KiB
Plaintext
39 lines
3.0 KiB
Plaintext
//DTSBZ22X JOB (UI,4300,3400,T),PROD.HHCONV.SPEC, 00010002
|
|
// CLASS=P,MSGCLASS=X, 00020000
|
|
// NOTIFY=ECNTSUP, 00030001
|
|
//*** USER=OPCSUB, 00040000
|
|
// REGION=0M 00050000
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**** 00060000
|
|
// SET LVLNODE='PROD' 00070003
|
|
//**** 00080000
|
|
//* 11/10/02 - JHP 00090001
|
|
//* THOSE STEPS FROM THE HH PARALLEL RUN TO CONVERT THE 00100001
|
|
//* PROD FILES FOR NEW FIELDS 00110001
|
|
//* NOTE: BEFORE RUNNING THIS JOB, CLOSE THE HTST FILES 00120000
|
|
//**** 00130000
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB 00190000
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00200000
|
|
//**** 00261000
|
|
//**** /* SPEC. CONV. STEP TO INIT NEW MRTE & MRCT DATA ELEMENTS 00270000
|
|
//STEP0030 EXEC PGM=DTSBZ220, 00270100
|
|
// COND=(0,LT) 00270200
|
|
//SYSOUT DD SYSOUT=* 00270400
|
|
//SYSABOUT DD SYSOUT=* 00270500
|
|
//SYSABEND DD SYSOUT=* 00270600
|
|
//CAIMRPTS DD SYSOUT=* 00270700
|
|
//* 00270800
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTX 00270900
|
|
//**** 00271100
|
|
//**** /* SPEC. CONV. STEP TO INIT NEW FUIR DATA ELEMENTS 00271200
|
|
//STEP0040 EXEC PGM=DTSBZ225, 00271300
|
|
// COND=(0,LT) 00271400
|
|
//SYSOUT DD SYSOUT=* 00271500
|
|
//SYSABOUT DD SYSOUT=* 00271600
|
|
//SYSABEND DD SYSOUT=* 00271700
|
|
//CAIMRPTS DD SYSOUT=* 00271800
|
|
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00271900
|
|
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00272000
|
|
// AMP=('BUFNI=5,BUFND=10') 00273000
|
|
//**** 00279101
|