giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

24
JCL/DTSVRSTR.jcl Normal file
View File

@ -0,0 +1,24 @@
//DTSVRSTR JOB (UI,4300,3400,T),PROD-RESTORE,CLASS=P,MSGCLASS=X, 00000123
// NOTIFY=ECNTSUP, 00000217
//**** TYPRUN=SCAN, 00000320
// REGION=0M 00000414
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//* 00000500
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCLIB 00000609
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00000721
//**** 00000921
//* UI TAX VSAM FILES RESTORE ------ READ NOTE BELOW -------- * 00001100
//* * 00001200
//* WHEN JOB DTSPDAY1 ABENDS AND YOU HAVE TO RUN THIS RESTORE * 00001200
//* JOB THEN YOU WILL HAVE TO RUN JOB DTSREEXT TO RESTORE ALL * 00001200
//* EXTERNAL FILES NEEDED FOR DAILY JOB. * 00001200
//* PLEASE VERIFY FILES PROD.WAGE.BTC AND PROD.BTC GENERATION * 00001200
//* ARE EMPTY OR DUPLICATES WILL OCCUR. IF THERE ARE NO GENERATION 00001200
//* THAT IS OK ONE WILL BE CREATED FROM THE RESTORE AND RERUN OF * 00001200
//* THE DAILY JOB * 00001200
//**** 00001621
//* NOTE: BEFORE RUNNING THIS JOB, CLOSE THE FILES * 00001300
//* IN THE CICS REGION. * 00001400
//**** 00001621
//STEP0100 EXEC DTSURVSM, 00002000
// BKUPGEN='(+0)' 00003029