Files
DUTAS/Procs/DESOLABK
2025-07-21 11:20:11 -04:00

19 lines
1.4 KiB
Plaintext

//***** 00010000
//* UI TAX OLA VSAM FILE BACKUP TO DASD FOR IMMEDIATE USE. 00030001
//***** 00052005
//DESOLABK PROC LVLNDIN='PROD',LVLNDOUT='PROD', 00060005
// BKUPGEN='(+1)' 00070005
//**** 00100001
//STEP0170 EXEC PGM=IDCAMS, /* SPEC OLA BACKUP 00570001
// COND=(0,LT) 00580000
//SYSPRINT DD SYSOUT=* 00590000
//INDD01 DD DSN=DOESTAX.&LVLNDIN..VSAM.OLA,DISP=SHR, 00600002
// AMP=('BUFNI=5,BUFND=30') 00610000
//OUTDD01 DD DSN=DOESTAX.&LVLNDOUT..BKP.EMTOLA&BKUPGEN., 00620002
// DISP=(,CATLG,DELETE), 00630000
// UNIT=SYSDA, 00640002
// SPACE=(32760,(1000,1000),RLSE), 00650004
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00670000
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00680000
//**** 00690002