Re: help with restoring a dasdi dump/restore tape
|
?//DSKDSNR? JOB?? (ACCT#),
?//???????? 'PGMRNAME',???????????????????????????????????????? /*OPER*/
?//???????? CLASS=A,?????????????????????????????????????????? /*JCLAS*/
?//???????? MSGLEVEL=(1,1),
?//???????? MSGCLASS=X,
?//???????? NOTIFY=,
?//???????? TIME=30,
?//???????? USER=,GROUP=,PASSWORD=????????????????????????????? /*RACF*/
?//*?????????????????????????????????????????????????????????? /*JCTRL*/
?//*
?//*
?//* LIB: IPO1.JCLLIB(DSKDSNR)
?//* GDE: CBIPO MVS CUSTOMIZATION
?//* DOC: THIS JOB WILL USE DFDSS TO RESTORE SELECTED DATA SETS
?//*????? FROM BACKUP TAPES TO DASD.? THIS JOB ALSO ILLUSTRATES
?//*????? THE POWERFUL COMMAND LANGUAGE OF DFDSS.
?//*
?//* NOTE: THIS JOB IS PROVIDED AS AN EXAMPLE. IT USES THE M42CAT
?//*?????? VOLUME AND A TAPE VOLID OF TAPE01. THIS JOB SHOULD BE
?//*?????? MODIFIED FOR YOUR OWN ENVIRONMENT.
?//*
?//*????? RESTOR1 - THIS STEP WILL RESTORE FROM TAPE TO VOLUME "M42CAT? "
?//*????????????? ALL DATA SETS THAT MEET THE FOLLOWING CRITERIA:
?//*
?//*????????????? A) DATA SETS MUST BEGIN WITH "IPO1."
?//*????????????? B) EXCLUDING THOSE ENDING WITH "DOCLIB"
?//*????????????? C) DATA SETS MUST HAVE THE "DSCHA" BIT ON IN DSCB
?//*????????????? D) DATA SETS MUST HAVE BEEN CREATED AFTER 1/1/86
?//*????????????? E) DATA SETS MUST HAVE AN EXPIRATION DATE EQUAL
?//*???????????????? TO OR LESS THAN 12/31/99
?//*????????????? F) DATA SETS MUST HAVE BEEN REFERENCED AFTER
?//*???????????????? 3/3/86
?//*
?//*????????????? IF A DATA SET BEING RESTORED ALREADY EXISTS ON THE
?//*????????????? DASD VOLUME, THE RENAME PARAMETER IS USED IN PLACE
?//*????????????? OF THE FIRST QUALIFIER OF THE DATA SET NAME TO
//*????????????? ALLOCATE A NEW DATA SET AND THEN RESTORE IT.
//*
//*
//RESTOR1 EXEC PGM=ADRDSSU,REGION=3072K
//SYSPRINT DD? SYSOUT=*
//DASD1??? DD? DISP=OLD,UNIT=3380,VOL=SER=M42CAT
//BACKUP?? DD? DSN=BACKUP1.BY.DATASET,DISP=OLD,
//???????????? UNIT=3400-6,VOL=SER=TAPE01,
//???????????? LABEL=(1,SL)
//SYSIN??? DD? *
?????? RESTORE INDDNAME(BACKUP) -
?????????????? OUTDDNAME(DASD1) -
?????????? DATASET(INCLUDE(IPO1.**)?? /* RESTORE ALL IPO1 DSNS? */???? +
?????????????????? EXCLUDE(IPO1.DOCLIB)?????? /* EXCEPT IPO1.DOCLIB??? +
????????????????????? BY((DSCHA,EQ,1)????? /* THAT HAVE BEEN CHANGED */+
???????????????????????? (CREDT,GT,86001)? /* CREATED AFTER 1/1/86?? */+
???????????????????????? (EXPDT,LE,99365)? /* EXPIRE BY 12/31/99 AND */+
???????????????????????? (REFDT,GT,86062))) /*REFERENCED AFTER 3/3/86*/+
????????????? RENAME(M42CAT)???????????? /* RENAME DUPLICATES????? */
/*
//*
On Tuesday, May 14, 2024 at 04:49:47 PM CDT, <mspitz@...> wrote:
I have a file, fairly old, that looks like it is a DASDI dump restore tape.? It is clearly an EBCIDIC tape.? I am not even sure what is on it as I probably received this in the late 1990's.?
I would like to restore it, if possible.? I'm guessing it is a dump of a 3330, but I don't know an do not know enough about the format of a DASDI dump/restore tape to figure it out.? Also I'm not sure what format it is in as the filetype says TAP.
So, how do I mount this on Hercules?? Just like any other tape (het or aws) or something else.
I'm presuming that once I get it mounted TAPEMAP will help me figure out what is on it and what DASD volume type I need to restore it.
If it is a DASDI dump tape, I guessing I can just IPL from it and restore it to DASD as I would have years ago, but that may not be a correct/best approach in this instance.
Guidance will be appreciated.
By the way here is a png of the first part of the file.
Thanks,
?- Mark
|
