* Is there a methodology to copy full volumes (whether z/VSE, z/VM or z/OS) directly from the
* mainframe into the emulated DASD format used by Hercules? or does a full volume backup need to
*
* be converted to an AWS tape; FTP transferred; then mounted as an input tape and restored on the
* Hercules system?
There is a program named cckddump (I think it may be on the CBT Mods tape if not on the Hercules site). It dumps a volume to the format Hercules expects. It has to run APF Authorized. This is the proc I use to do the dump and ftp it to a UNIX box. I did not get to follow the whole thread, so this may be redundant.
//DUMPVOL PROC VOL='?',
//* < VOLSER TO BACKUP >
//* < EG. ABC002 >
// TSOID=MYID123,
//* < ID FOR CATALOGED WORK DATASET >
//*
// WRKVOL=WRK013,
//* < WORK VOLUME (Different than VOL>
//*
// WRKSPAC='37500,500',
//* < WORK SPACE PRIMARY AND SEC >
//*
// FTPHOST='192.168.1.111',
//* < HOST IP FOR FTP >
//*
// L='?',
//* < LOGIN ID FOR FTP >
//*
// P='?',
//* < PASSWORD FOR FTP >
//*
// DIR='/home/herc'
//* < TARGET DIR ON FTP SITE >
//*
//KILL EXEC PGM=IEFBR14
//DD1 DD DSN=&TSOID..CCKD.DATA,
// UNIT=SYSDA,SPACE=(TRK,1),DISP=(MOD,DELETE)
//*
//DUMP EXEC PGM=CCKDDUMP,TIME=900
//STEPLIB DD DISP=SHR,DSN=HSS.MVS.LOADLIB
//SYSPRINT DD SYSOUT=*,RECFM=VB,LRECL=255,BLKSIZE=4096
//SYSUT1 DD DISP=OLD,UNIT=SYSDA,VOL=SER=&VOL
//SYSUT2 DD DISP=(NEW,CATLG),DSN=MYID123.CCKD.DATA,
// UNIT=SYSDA,SPACE=(TRK,(&WRKSPAC),RLSE),
// VOL=SER=&WRKVOL,
// LRECL=4096,BLKSIZE=4096,RECFM=F
//
//*
//CNTL01 EXEC PGM=SP3PARM,
// PARM='&L &P'
//STEPLIB DD DSN=EAXC.SUPPORT.LOADLIB.RELEASE,
// DISP=SHR
//OUT DD DSN=&&CTLIN,
// DISP=(NEW,PASS), UNIT=SYSDA,SPACE=(TRK,1),
// DCB=(LRECL=80,BLKSIZE=80,RECFM=FB)
//*
//PARM02 EXEC PGM=SP3PARM,PARM='binary'
//STEPLIB DD DSN=EAXC.SUPPORT.LOADLIB.RELEASE,
// DISP=SHR
//OUT DD DSN=&&CTLIN,DISP=(MOD,PASS)
//*
//PARM03 EXEC PGM=SP3PARM,
// PARM='PUT ''&TSOID..CCKD.DATA'' &DIR/CCKD.&VOL'
//STEPLIB DD DSN=EAXC.SUPPORT.LOADLIB.RELEASE,
// DISP=SHR
//OUT DD DSN=&&CTLIN,DISP=(MOD,PASS)
//*
//PARM04 EXEC PGM=SP3PARM,
// PARM='quit'
//STEPLIB DD DSN=EAXC.SUPPORT.LOADLIB.RELEASE,
// DISP=SHR
//OUT DD DSN=&&CTLIN,DISP=(MOD,PASS)
//*
//*
//PUT EXEC PGM=FTP,REGION=4000K,TIME=400,PARM='&FTPHOST'
//SYSPRINT DD SYSOUT=*
//SYSPUT DD SYSOUT=*,BLKSIZE=133
//INPUT DD DSN=&&CTLIN,DISP=(OLD,DELETE)
//*
Note, SP3PARM is is a simple minded program which dumps the parm string to DDNAME OUT. Left as an exercise for the reader ð