//ECNTINIT JOB (UI,4300,3400,T),ZARATH,CLASS=A,MSGCLASS=X,              00000010
//***       TYPRUN=SCAN,
//          NOTIFY=ECNTSUP
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//*********************************************************************
//*                                                                     00000200
//  SET LVLNODE='PROD'
//*                                                                     00000200
//*                                                                     00000200
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB                       00000300
//*                                                                     00000400
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//*                                                                     00001700
//STEP0200 EXEC PGM=DTSBD998,       INITIALIZE WTC FILES
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//CAIMRPTS DD  SYSOUT=*
//DTSFWTC  DD  DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSIWTC),DISP=SHR
//*
//