//TAPEMAN JOB (0),'RESTORE TAPEMAN',CLASS=A,MSGCLASS=A //* //* THIS JOB RESTORES DOWN THE SIX DATASETS FROM THE .AWS TAPE. //* YOU NEED TO CUSTOMISE THE NEWPREF AND DESTVOL BELOW //* THE DESTINATION VOLUME SHOULD REMAIN A 3350 AS THAT IS WHAT //* THE LINK LIBRARY WAS BACKED UP OFF (WILL SAVE YOU RELINKING). //* //* NOTE: TO USE THIS TOOLKIT YOU MAST HAVE 'DIAG8CMD ENABLE' IN //* YOUR HERCULES CONFIGURATION FILE, THAT IS USED TO //* ISSUE THE COMMANDS TO MOUNT THE TAPES REQUESTED BY THE OS. //* //* THE FILES RESTORED ARE //* .TAPEMAN.CONTROL - Jobs to manage the databases //* .TAPEMAN.LINKLIB - Compiled objects including HERCCMD //* .TAPEMAN.SRC - Source for my programs, not for //* HERCCMD as I never had that source. //* .TAPEMAN.DOC - Documentation on TAPEMAN installation //* customisation of IEECVXIT and on how //* to use the utilities to maintain the //* tape volser database. //* .TAPEMAN.INSTALL - Installation jobs //* .TAPEMAN.SAMPLIB - Sample backup jobs, the SYSBJKOB //* shows how to request and automatically //* mount a scratch tape for a batch job //* when automation is shutdown. Samples //* use my listvtoc output scan program //* to dynamically build a backup job //* deck (which places the dataset list //* of files backed up and their attributes //* onto both the tape and to a disk file). //* My listvtoc parsing program and other //* programs I use are provided as source //* in this member. //* .TAPEMAN.CLIST - work in progress, a clist front end //* controlled by clist TAPEMENU. This //* is still a work in progress. //* //RESTPROC PROC LABEL='1', // NEWPREF='INSTALL', <=== CHANGE ME // DESTVOL='SYS002', <=== CHANGE ME // T1=5,T2=5,D=5, // DNAME='' //* //* --- NOTHING BELOW HERE SHOULD CHANGE --- //* //RESTSTEP EXEC PGM=IEBCOPY,COND=(0,NE) //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=UTILS.&DNAME, // DISP=OLD, // UNIT=TAPE, // VOL=(,RETAIN,SER=TAPEMN), // LABEL=(&LABEL,SL) //SYSUT2 DD DSN=&NEWPREF..&DNAME, // VOL=SER=&DESTVOL, // DISP=(NEW,CATLG,DELETE),UNIT=3350, // SPACE=(TRK,(&T1,&T2,&D)), // DCB=*.SYSUT1 //SYSIN DD DUMMY // PEND //* //STEP1 EXEC RESTPROC,LABEL=1,T1=25,DNAME='TAPEMAN.LINKLIB' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //STEP2 EXEC RESTPROC,LABEL=2,T1=5,DNAME='TAPEMAN.CONTROL' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //STEP3 EXEC RESTPROC,LABEL=3,T1=15,DNAME='TAPEMAN.SRC' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //STEP4 EXEC RESTPROC,LABEL=4,T1=10,DNAME='TAPEMAN.DOC' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //STEP5 EXEC RESTPROC,LABEL=5,T1=5,T2=1,DNAME='TAPEMAN.INSTALL' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //STEP6 EXEC RESTPROC,LABEL=6,T1=10,D=15,DNAME='TAPEMAN.SAMPLIB' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //STEP7 EXEC RESTPROC,LABEL=7,T1=5,D=10,DNAME='TAPEMAN.CLIST' //SYSIN DD * COPY INDD=SYSUT1,OUTDD=SYSUT2 /* //