Stand Alone init and restore ZOS saved full DASD volumes
Contents:
1. Prepare two Stand Alone IPL tapes
2. Initialize in Stand Alone the DASD volume
3. Restore in Stand Alone the saved backup volume
4. Restore in z/OS system saved backup volumes
When the IPL or another system DASD volume of z/OS is destroyed or damaged and it is not possible to IPL z/OS system, you need a procedure to be restored the necessary saved volumes in Stand Alone environment. Here the preparation of two Stand Alone IPL tapes is described – one to initialize any DASD volume and other – to restore DASD volume from DFSMSdss backup tape. The process of Stand Alone initializing and restoring is shown in detail with working examples. If you have an available running z/OS system you can restore from full DASD tape copy any damaged or changed disk volume when necessary.
1. Prepare two Stand Alone IPL tapes (containing instructions necessary to load and store itself during IPL from tape drive address)
Two Stand Alone tapes are necessary to be created for Stand Alone init and restore of ZOS volumes using source JCL member SAUBLD in library BC2A.ZOS140.OPER.LIB: SAUDSK – to initialize any DASD volume and ADRSA – to restore DASD volume from DFSMSdss backup tape (created by source member WBC2MCC in library BC2A.ZOS140.OPER.LIB – WBC2MCC_Aksakov.doc).
To create stand-alone IPL tapes use job in SAUBLD.txt that creates 2 non-label tapes:
//SAUBLD JOB (),’OPERATOR’,
// CLASS=A,
// MSGCLASS=X,
// MSGLEVEL=(1,1),
// NOTIFY=,
// TIME=1440
//* /
//*
//*
//* LIB: CORNERST.ZOS140.OPER.LIB
//* DOC: THIS JOB CREATES 2 NON-LABELED TAPES
//* TAPE NLTAP1 IS CALLED SAUDSK
//* CONTAINING THE STAND-ALONE VERSION OF DEVICE SUPPORT
//* FACILITY (ICKSADSF) AND DATA FACILITY DATA SET
//*
//* TAPE NLTAP2 IS CALLED ADRSA CONTAINING THE STANDALONE
//* VERSION OF ADRDMPRS.
//*
//SAUBLD1 EXEC PGM=IEBGENER,REGION=4096K
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DSN=SYS1.SAMPLIB(ICKSADSF),
// DISP=SHR
//SYSUT2 DD DSN=SAUDSK,
// DISP=SHR,
// UNIT=301,VOL=SER=CB0981,
// LABEL=(1,NL),
// DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SAUBLD2 EXEC PGM=ADRDSSU,PARM=’UTILMSG=YES’,REGION=8M
//SAMODS DD DSN=SYS1.SADRYLIB,DISP=SHR
//TAPEDD DD DSN=ADRSA,UNIT=301,LABEL=(1,NL),
// DISP=(NEW,KEEP),VOL=SER=CB0982,
// DCB=(DSORG=PS,RECFM=U,BLKSIZE=32760,LRECL=32760)
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
BUILDSA –
INDD(SAMODS) –
OUTDD(TAPEDD) –
IPL(TAPE)
/*
1.1. DSN=SAUDSK on tape CB0981 – to IPL and initialize DASD volumes /CONTAINING THE STAND-ALONE VERSION OF DEVICE SUPPORT FACILITY (ICKSADSF) AND DATA FACILITY DATA SET/.
1.2. DSN=ADRSA on tape CB0982 – to IPL and restore DASD volumes from DFSMSdss backup tapes./ CONTAINING THE STANDALONE VERSION OF ADRDMPRS/
2. Initialize in Stand Alone the DASD volume (if necessary before restoring the saved backup volume in Stand Alone)
If it is necessary to initialize any DASD volume before restore backup tape of volume BC2MCC with DSN = BACKUP.WBC2MCC do the following:
In a stand-alone environment, you must IPL ICKDSF from the prepared stand-alone IPL tape SAUDSK /CB0981/ installed on tape device with address 300. For that you have to set IPL address 300 on HMC menu and press enter.
The program on stand-alone IPL tape SAUDSK /CB0981/ contains the instructions necessary to load and store itself in the lower addresses of main storage. When the program has completely loaded, the processor enters the WAIT state. At this time, you continue by identifying the console, the input device, and the output device. You identify the console to the program by pressing the ENTER key at the console.
Messages ICK005E and ICK006E prompt you to specify
the input and output devices and its address as follws:
ICK005E DEFINE INPUT DEVICE:
‘dddd,cuu’ or ‘CONSOLE’ – {press the Enter key}
ICK006E DEFINE OUTPUT DEVICE:
‘dddd,cuu’ or ‘CONSOLE’ – {press the Enter key}
The date and time of day are automatically picked up from the TOD (time of
day) clock of the processing unit.
The following command shows how to initialize volume on address 1840 as TRNB01 with the ICKSADSF (Stand-Alone version of ICKDSF /Device Support Facilities/) by writing the volume label TRNB01 and volume table of contents (VTOC).
INIT UNITADDRESS(1840) VOLID(TRNB01),VTOC(0,1,195) –
VALIDATE VERIFY(TRN027) or NOVERIFY
VTOC parameter causes a volume table of contents to be created at cylinder 0, track 1. The VTOC occupies 195 tracks. Because the volume is being reinitialized in the Stand-Alone version of ICKDSF, all existing data is purged, regardless of whether it is unexpired or password protected.
3. Restore in stand-alone the saved backup volume
To restore in stand-alone environment (with no z/OS running) on any initialized DASD volume the backup tape CB0146 of saved IODF system volume BC2MCC with DSN = BACKUP.WBC2MCC you should have prepared tape CB0146 with full disk dump JCL as follows:
//WBC2MCC JOB (9999,IPO,10,10),
// ‘CORNERSTONE’,
// CLASS=I,
// MSGCLASS=X,
// MSGLEVEL=(1,1),
// TIME=30
//DUMP1 EXEC PGM=ADRDSSU,REGION=8M
//SYSPRINT DD SYSOUT=*
//DASD1 DD DISP=OLD,UNIT=3390,VOL=SER=BC2MCC
//BACKUP DD DSN=BACKUP.WBC2MCC,
// DISP=(,KEEP),VOL=SER=CB0146,
// UNIT=300,
// LABEL=(1,SL),DCB=(BLKSIZE=32000)
//SYSIN DD *
DUMP INDDNAME(DASD1) –
OUTDDNAME(BACKUP) OPT(4) FULL COM RESET –
ALLDATA(*) ALLEXCP
IF LASTCC = 0 –
THEN WTO ‘DUMP OF BC2MCC TO TAPE COMPLETED SUCCESSFULLY’
ELSE WTO ‘DUMP OF BC2MCC TO TAPE WAS UNSUCCESSFUL’
The IPL ADRSA tape CB0982 is mounted on tape device with address 300 and backup tape CB0146 of volume BC2MCC with DSN = BACKUP.WBC2MCC is mounted on tape device with address 301. Than set IPL address 300 on HMC menu and press enter. Go to the operator console and create an interrupt (hit enter)
The following messages appears: ________________________________________________________________________
| |
| ADRY005E DEFINE INPUT DEVICE, REPLY ‘DDDD,CCUU’ OR ‘CONSOLE’ |
| ENTER INPUT/COMMAND: |
| {press the Enter key} – OK |
| |
| ADRY006E DEFINE OUTPUT DEVICE, REPLY ‘DDDD,CCUU’ OR ‘CONSOLE’ |
| ENTER INPUT/COMMAND: |
| {press the Enter key} – OK |
| |
| SA/XA/ESA 5695-DF1 DFSMSDSS STAND-ALONE V1.3.0 |
| TIME: 16:36:23 06/07/95 |
|
| ENTER INPUT/COMMAND: |
| restore frmdv(tape) frmadr(0301) toadr(1904) vfy(sp1904) – OK |
| |
| RESTORE FRMDV(TAPE) FRMADR(0301) TOADR(1904) VFY(SP1904) |
| ADRY0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 – OK |
| 16:38:05 mm/dd/yy |
| ENTER INPUT/COMMAND: |
|________________________________________________________________________|
After successful restore do IPL for LPAR BC2A having BC2MCC IODF DASD volume on address 1904 with IPL parameters 1900/19042B (In this case IPL device is on address 1900 and IODF device is on address 1904 using IODF2B that is on volume BC2MCC).
4. Restore in z/OS system saved backup volumes
After the successful IPL and available running z/OS system you can restore from full DASD tape copy any damaged or changed disk volume (LOGR1C) on the same disk volume or on spare disk volume in z/OS system environment using the following JCL:
//RESTVOL1 JOB ‘CRDI- SYSTEMS’,CLASS=A,MSGCLASS=X
//DFDSS EXEC PGM=ADRDSSU,REGION=0M,TIME=1440
//SYSPRINT DD SYSOUT=*
//BACKUP DD DSN=BACKUP.WLOGR1C,
// DISP=SRH,VOL=SER=(CB0147),
// UNIT=(301,,DEFER),
// LABEL=(1,SL)
//DASD1 DD DISP=OLD,UNIT=3390,VOL=SER=SP1999
//SYSIN DD *
RESTORE INDDNAME(BACKUP) OUTDDNAME(DASD1) FILE( ) PURGE
To restore next full DASD volume on spare disk volume in z/OS system environment changing only the parameters in //restore statement, use the JCL with internal PROC bellow:
//RESTVOL JOB ‘CRDI- SYSTEMS’,CLASS=A,MSGCLASS=X
//RESTORE PROC DVOL=DDDDDD,TVOL=TTTTTT,SPARE=SSSSSS
//CRESYSIN EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT2 DD DISP=(,PASS),SPACE=(TRK,1),RECFM=F,LRECL=80
//SYSUT1 DD *,LRECL=80
RESTORE INDDNAME(TAPE1) OUTDDNAME(DASD1) PURGE
/*
//DFDSS EXEC PGM=ADRDSSU,REGION=0M,TIME=1440
//SYSPRINT DD SYSOUT=*
//SYSIN DD DISP=(OLD,PASS),DSN=*.CRESYSIN.SYSUT2
//DASD1 DD DISP=OLD,UNIT=3390,VOL=SER=&SPARE
//TAPE1 DD DISP=SHR,DSN=BACKUP.W&DVOL,
// UNIT=(301,,DEFER),LABEL=(1,SL),VOL=SER=(&TVOL)
// PEND
//*
//RESTORE EXEC RESTVOL,DVOL=LOGR1C,TVOL= CB0147,SPARE=SP1999 <== CHANGE
If you wish to restore more full disk volumes with one job in z/OS system environment use the next JCL:
//RPRD001 JOB ‘CRDI- SYSTEMS’,CLASS=A,MSGCLASS=X
//DFDSS EXEC PGM=ADRDSSU,REGION=0M,TIME=1440
//SYSPRINT DD SYSOUT=*
//TAPE DD DSN=BACKUP.WPRD001,
// DISP=SHR,VOL=SER=(CB0037),
// UNIT=(300,,DEFER),
// LABEL=(1,SL)
//DASD1 DD DISP=OLD,UNIT=3390,VOL=SER=PRD001
//SYSIN DD *
RESTORE INDDNAME(TAPE) OUTDDNAME(DASD1) PURGE
//RPRD002 JOB ‘CRDI- SYSTEMS’,CLASS=A,MSGCLASS=X
//DFDSS EXEC PGM=ADRDSSU,REGION=0M,TIME=1440
//SYSPRINT DD SYSOUT=*
//TAPE DD DSN=BACKUP.WPRD002,DISP=SHR,
// VOL=SER=(CB0038),
// UNIT=(300,,DEFER),
// LABEL=(1,SL)
//DASD1 DD DISP=OLD,UNIT=3390,VOL=SER=PRD002
//SYSIN DD *
RESTORE INDDNAME(TAPE) OUTDDNAME(DASD1) PURGE
Tapes CB0037, CB0038 …… etc should be installed and arranged in the above sequence on the same tape device with address 300 for automatic loading.
Incoming search terms:
- gdps standalone dump volumes
Comments
No comments yet, be the first to add one!