DUTAS re-platformed to Raincode - Initial Source Code

This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions

21
JCL/DTSCHGVR.jcl Normal file
View File

@ -0,0 +1,21 @@
//DTSCHGVR JOB (UI,4300,3400,T),JHPPROD.CHGMRSTR, 00000105
// CLASS=S,MSGCLASS=X, 00000200
//**** TYPRUN=SCAN, 00000300
// REGION=0M, 00000400
// NOTIFY=ECNTSUP 00000506
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//**** NOTIFY=ECNTJP2 00000606
//**** 00000900
//* UI TAX RESTORE OF CHGMXXX VSAM FILE(S) 00001106
//**** 00001800
// SET LVLNODE='PROD' 00001905
//**** 00002000
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB 00002100
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00002200
//**** 00002300
//* IN THE CICS REGION.
//****
//STEP0100 EXEC DTSURCHG,
// BKUPGEN='(+0)'
//*** OLD RESTORE
//