//ECNTZL1I JOB (UI,4300,3400,T),INITNAME,CLASS=A,MSGCLASS=X,            00000010
//**        TYPRUN=SCAN,
//          NOTIFY=ECNTSUP
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//*********************************************************************
//*                                                                     00000200
//  SET  UINODE='PROD'            REGION VSAM MASTER FILES
//  SET MSTNODE='PROD'            REGION VSAM MASTER FILES
//  SET LVLNODE='PROD'            REGION BATCH LOADLIB/PROCLIB
//*
//*                                                                     00000200
//PROCLIB  JCLLIB ORDER=DOESTAX.DEVL.PROCLIB                            00000300
//*                                                                     00000400
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//*                                                                     00001700
//STEP0100 EXEC PGM=IDCAMS,         DELETE/DEFINE NAME FILE
//             REGION=0K
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSJ),DISP=SHR
//*
//STEP0120 EXEC PGM=DTSBD998,       INITIALIZE NAME FILE
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//DTSFMSTJ DD  DSN=DOESTAX.&LVLNODE..VSAM.MSTJ,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSIMSTJ),DISP=SHR
//*