DUTAS re-platformed to Raincode - Initial Source Code

JCL/DTSBINIT.jcl

@@ -0,0 +1,18 @@
+//DTSBINIT JOB (UI,4300,3400,T),PROD.DAILY,CLASS=P,MSGCLASS=X,
+//         NOTIFY=ECNTSUP,
+//****     TYPRUN=SCAN,
+//****     TYPRUN=HOLD,
+//         REGION=0M
+/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
+//**
+//  SET EXTNODE='CONV'
+//  SET PGMNODE='PROD'
+//  SET LVLNODE='PROD'
+//  SET MSTNODE='PROD'
+//  SET LVDHOLD='YES'
+//*
+//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB
+//LOADLIBS INCLUDE MEMBER=DTSIJLIB
+//****
+//STEP0100 EXEC DTSBINIT
+//