03.03.2015 Views

CA Dynam for VSE User Guide

CA Dynam for VSE User Guide

CA Dynam for VSE User Guide

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Direct Access File Independence Facility (VCKD)<br />

DATAPE<br />

FBADISK<br />

- TLBL name <strong>for</strong> the backup tape.<br />

- DLBL name <strong>for</strong> the DA file on the FBA disk.<br />

Device Assignments<br />

• SYS002 must be assigned to the tape.<br />

• The EXTENT statement can reflect any SYS number <strong>for</strong> the CKDDISK and<br />

FBADISK files.<br />

Examples<br />

Backs up a CKD disk file to tape and restores it to an FBA disk using various<br />

options.<br />

// JOB VCKDBK BACKUP CKD DISK TO TAPE AND RESTORE ON AN FBA DISK<br />

// TLBL DATAPE,'CKD.DA.TAPE'<br />

// DLBL CKDDISK,'CKD.FILE',2099/365,DA<br />

// EXTENT SYS003,CKDDSK,1,0,19,10<br />

// ASSGN SYS003,DISK,VOL=CKDDSK,SHR<br />

// ASSGN SYS002,X'281'<br />

// EXEC VCKDBKRS<br />

BACKUP=3330,CLEAR=X'FF',MAP=T,EOF=Y,RESTORE,MAXSIZE=650<br />

/*<br />

/&<br />

Backs up a variable-length CKD disk file and restores it on an FBA disk.<br />

// JOB VCKDBKRS BACKUP CKD DISK TO TAPE/RESTORE FBA DISK<br />

// TLBL DATAPE,'CKD.DA.TAPE'<br />

// DLBL FBADISK,'FBA.FILE',2099/365,DA<br />

// EXTENT SYS001,FBA300,1,0,100,200<br />

// DLBL CKDDISK,'CKD.FILE',2099/365,DA<br />

// EXTENT SYS003,CKDDSK,1,0,19,10<br />

// ASSGN SYS003,DISK,VOL=CKDDSK,SHR<br />

// ASSGN SYS002,X'281'<br />

// ASSGN SYS001,DISK,VOL=FBA300,SHR<br />

// EXEC VCKDBKRS<br />

BACKUP=3330,MAXSIZE=122,RESTORE<br />

/*<br />

/&<br />

Restores the backup tape to an FBA disk.<br />

// JOB VCKDBKRS RESTORE TAPE TO FBA DISK<br />

// TLBL DATAPE,'CKD.DA.TAPE'<br />

// DLBL FBADISK,'FBA.FILE',2099/365,DA<br />

// EXTENT SYS001,FBA300,1,0,100,200<br />

// ASSGN SYS002,X'281'<br />

// ASSGN SYS001,DISK,VOL=FBA300,SHR<br />

Chapter 6: Controlling File Independence 6–49

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!