DUTAS re-platformed to Raincode - Initial Source Code

2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
--- a/JCL/DTSTINIT.jcl
+++ b/JCL/DTSTINIT.jcl
@ -0,0 +1,12 @@
+//BCGB3896 JOB (UI,4300,3400,T),'G. BROWN   ',MSGCLASS=X,CLASS=S,
+//      NOTIFY=DCGGAB
+/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
+//PROCLIB JCLLIB ORDER=PROD.PROCLIB    BY Z/OS
+//**************************************************************
+//*               INITIALIZE SCRATCH CARTRIDGE                 *
+//**************************************************************
+// EXEC PGM=IEHINITT
+//SYSPRINT DD  SYSOUT=*
+//TAPEIN   DD UNIT=CART,LABEL=(,SL),DSN=DOESTAX.CHRGS
+//SYSIN    DD  *
+TAPEIN INITT SER=AT3896