Stand Alone init and restore ZOS saved full DASD volumes

Bottom

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.

End

Incoming search terms:

• gdps standalone dump volumes

Mar 24, 2014

• Posted by Stefan
• No comments
• General, System programming
• DFSMSdss backup tape, full DASD tape copy, initialize any DASD, IPL tape, restore DASD volume, saved backup volume, Stand Alone

Comments

No comments yet, be the first to add one!