17 lines
1.2 KiB
Plaintext
17 lines
1.2 KiB
Plaintext
//ECNTSUPR JOB (UI,4300,3400,T),JHP.PROD.RSTR,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.PROCS.BATCH.LIB 00000609
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00000721
|
|
//**** 00000921
|
|
//* UI TAX VSAM FILES QUARTER FILE RESTORE * 00001100
|
|
//* * 00001200
|
|
//* NOTE: BEFORE RUNNING THIS JOB, CLOSE THE FILES * 00001300
|
|
//* IN THE CICS REGION. * 00001400
|
|
//**** 00001621
|
|
//STEP0100 EXEC DTSURQTR, 00002000
|
|
// BKUPGEN='(+0)' 00003029
|