DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
21
JCL/DTSCHGVB.jcl
Normal file
21
JCL/DTSCHGVB.jcl
Normal file
@ -0,0 +1,21 @@
|
||||
//DTSCHGVB JOB (UI,4300,3400,T),JHPPROD.CHGMBKP, 00000103
|
||||
// CLASS=P,MSGCLASS=X, 00000203
|
||||
//**** TYPRUN=SCAN, 00000300
|
||||
// REGION=0M, 00000400
|
||||
// USER=#DOADTS, 00000600
|
||||
// NOTIFY=ECNTSUP 00000600
|
||||
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
||||
//**** 00000900
|
||||
//* UI TAX BACKUP OF CHARGE MSATER VSAM FILES *00001101
|
||||
//* CHGIM002 & CHGIM030 09/12/2018 ZL1*00001101
|
||||
//**** 00001800
|
||||
// SET LVLNODE='PROD' 00001903
|
||||
//**** 00002001
|
||||
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB 00002101
|
||||
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00002200
|
||||
//**** 00002301
|
||||
//************************************
|
||||
//*
|
||||
//STEP0100 EXEC DTSUTCHG,
|
||||
// BKUPGEN='(+1)'
|
||||
// 00004001
|
||||
Reference in New Issue
Block a user