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/RUNIDCAM.jcl
+++ b/JCL/RUNIDCAM.jcl
@ -0,0 +1,24 @@
+//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.&LVLNODE..PROCLIB                       00000300
+//*                                                                     00000400
+//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
+//*                                                                     00001700
+//STEP0100 EXEC PGM=IDCAMS,         DELETE/DEFINE NAME FILE
+//             REGION=0K
+//WEBTRN   DD  DSN=ECNTSUP.DOESTAX.&MSTNODE..FTP.TRN(+1),
+//             DISP=(,CATLG,DELETE),
+//             UNIT=SYSDA,
+//             SPACE=(25600,(100,200),RLSE),
+//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=25600)
+//SYSIN    DD  *
+//*