Files
DUTAS/JCL/RUNPBKUP.jcl

123 lines
9.7 KiB
Plaintext

//RUNPBKUP JOB (UI,4300,3400,T),PROD.SOURCE.BKUP,CLASS=A,MSGCLASS=X, 00010001
// NOTIFY=ECNTSUP 00030001
//**********************************************************************00050000
//**********************************************************************00090000
//STEP0100 EXEC PGM=PAN#1,PARM='OPEN=INP' 00100000
//PANDD1 DD DSN=DOESTAX.PROD.PANLIB,DISP=SHR 00110000
//PANDD2 DD SYSOUT=* 00120000
//PDS DD DSN=&&TEMPPDS,DISP=(,PASS,DELETE), 00130000
// UNIT=SYSDA, 00140000
// SPACE=(9000,(5000,900,900)), 00150002
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) 00160000
//SYSPRINT DD SYSOUT=* 00170000
//SYSPUNCH DD DUMMY 00180000
//SYSIN DD * 00190000
++OPTION OUTPUT,PDS 00200000
++WRITE WORK,* 00210000
/* 00220000
//**********************************************************************00260000
//STEP0200 EXEC PGM=IEBCOPY 00310000
//SYSOUT DD SYSOUT=* 00320000
//SYSUDUMP DD SYSOUT=* 00330000
//SYSPRINT DD SYSOUT=* 00340000
//INPDS DD DSN=&&TEMPPDS,DISP=(OLD,DELETE,DELETE) 00350000
//BACKUP DD DSN=DOESTAX.PROD.BKUP.PANLIB(+1),DISP=(,CATLG,DELETE), 00360001
// UNIT=SYSDA, 00370001
// SPACE=(9000,(5000,900,900)), 00371002
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=80,BLKSIZE=8000) 00380001
//SYSUT3 DD DSN=&&TEMPWRK,DISP=(NEW,DELETE), 00400000
// UNIT=SYSDA, 00410000
// SPACE=(CYL,50) 00420000
//SYSIN DD * 00430000
COPY OUTDD=BACKUP,INDD=INPDS 00440000
/* 00450000
//************************************M*********************************00460000
//STEP0300 EXEC PGM=IEBCOPY 00470000
//SYSOUT DD SYSOUT=* 00480000
//SYSUDUMP DD SYSOUT=* 00490000
//SYSPRINT DD SYSOUT=* 00500000
//INPDS DD DSN=DOESTAX.PROD.APPL.PARMLIB,DISP=SHR 00510000
//BACKUP DD DSN=DOESTAX.PROD.BKUP.APPL.PARMLIB(+1), 00520001
// DISP=(,CATLG,DELETE), 00521000
// UNIT=SYSDA, 00530001
// SPACE=(8000,(2000,500,500)), 00540001
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=80,BLKSIZE=8000) 00550001
//SYSUT3 DD DSN=&&TEMPWRK,DISP=(NEW,DELETE), 00560000
// UNIT=SYSDA, 00570000
// SPACE=(CYL,50) 00580000
//SYSIN DD * 00590000
COPY OUTDD=BACKUP,INDD=INPDS 00600000
/* 00610000
//**********************************************************************00620000
//STEP0400 EXEC PGM=IEBCOPY 00630000
//SYSOUT DD SYSOUT=* 00640000
//SYSUDUMP DD SYSOUT=* 00650000
//SYSPRINT DD SYSOUT=* 00660000
//INPDS DD DSN=DOESTAX.PROD.JOBLIB,DISP=SHR 00670000
//BACKUP DD DSN=DOESTAX.PROD.BKUP.JOBLIB(+1), 00680001
// DISP=(,CATLG,DELETE), 00681000
// UNIT=SYSDA, 00690000
// SPACE=(8000,(2000,500,500)), 00700001
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=80,BLKSIZE=8000) 00710001
//SYSUT3 DD DSN=&&TEMPWRK,DISP=(NEW,DELETE), 00720000
// UNIT=SYSDA, 00730000
// SPACE=(CYL,50) 00740000
//SYSIN DD * 00750000
COPY OUTDD=BACKUP,INDD=INPDS 00760000
/* 00770000
//**********************************************************************00780000
//STEP0500 EXEC PGM=IEBCOPY 00790000
//SYSOUT DD SYSOUT=* 00800000
//SYSUDUMP DD SYSOUT=* 00810000
//SYSPRINT DD SYSOUT=* 00820000
//INPDS DD DSN=DOESTAX.PROD.PROCS.BATCH.LIB,DISP=SHR 00821000
//BACKUP DD DSN=DOESTAX.PROD.BKUP.PROCLIB(+1), 00822001
// DISP=(,CATLG,DELETE), 00840000
// UNIT=SYSDA, 00850000
// SPACE=(8000,(2000,500,500)), 00860001
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=80,BLKSIZE=8000) 00870001
//SYSUT3 DD DSN=&&TEMPWRK,DISP=(NEW,DELETE), 00880000
// UNIT=SYSDA, 00890000
// SPACE=(CYL,50) 00900000
//SYSIN DD * 00910000
COPY OUTDD=BACKUP,INDD=INPDS 00920000
/* 00930000
//**********************************************************************00940000
//STEP0600 EXEC PGM=IEBCOPY 00941000
//SYSOUT DD SYSOUT=* 00942000
//SYSUDUMP DD SYSOUT=* 00943000
//SYSPRINT DD SYSOUT=* 00944000
//INPDS DD DSN=DOESTAX.PROD.BATCH.LOADLIB,DISP=SHR 00945000
//BACKUP DD DSN=DOESTAX.PROD.BKUP.BATCH.LOADLIB(+1), 00946001
// DISP=(,CATLG,DELETE), 00947000
// UNIT=SYSDA, 00948000
// SPACE=(8000,(2000,500,500)), 00949001
// DCB=(SYS3.MODEL,RECFM=U,LRECL=0,BLKSIZE=13030) 00949200
//SYSUT3 DD DSN=&&TEMPWRK,DISP=(NEW,DELETE), 00949300
// UNIT=SYSDA, 00949400
// SPACE=(CYL,50) 00949500
//SYSIN DD * 00949600
COPY OUTDD=BACKUP,INDD=INPDS 00949700
/* 00949800
// 00949903
//**********************************************************************01141000
//STEP0700 EXEC PGM=IEBCOPY 01142000
//SYSOUT DD SYSOUT=* 01143000
//SYSUDUMP DD SYSOUT=* 01144000
//SYSPRINT DD SYSOUT=* 01145000
//INPDS DD DSN=DOESTAX.PROD.CICS.LOADLIB,DISP=SHR 01146000
//BACKUP DD DSN=DOESTAX.PROD.BKUP.CICS.LOADLIB(+1), 01147001
// DISP=(,CATLG,DELETE), 01148000
// UNIT=SYSDA, 01149000
// SPACE=(8000,(2000,500,500)), 01149101
// DCB=(SYS3.MODEL,RECFM=U,LRECL=0,BLKSIZE=13030) 01149300
//SYSUT3 DD DSN=&&TEMPWRK,DISP=(NEW,DELETE), 01149400
// UNIT=SYSDA, 01149500
// SPACE=(CYL,50) 01149600
//SYSIN DD * 01149700
COPY OUTDD=BACKUP,INDD=INPDS 01149800
/* 01149900
//********************************************************************* 01151400
//********************************************************************* 01160000
// 01170000