Re: LIBR BACKUP JCL

New Message Reply Date view Thread view Subject view Author view Other groups

Subject: Re: LIBR BACKUP JCL
Rbotsis@aol.com
Date: Wed Sep 24 2008 - 09:11:47 EDT


Paul,
 
<<So now I suppose in order to reorg  PRD1 and PRD2 it must be done in batch 
mode and I have to mess with  LIBDEF’s.>>
 
You don't have to MESS WITH NO  STINKIN LIBDEF's to restore PRD1 and/or PRD2.. 
The easiest and best place to do  what you want to do is during an IPL. As 
soon as you see BGINIT (or whatever the  first // JOB statement you have in 
$0JCL), startup enter PAUSE BG on the system  console. At the READY FOR 
COMMUNICATIONS prompt enter the  following:
 
0  libdrop *,search,perm
0  libdrop *,catalog,perm
 
>From here you can restore PRD1 and  PRD2 libraries by entering the following 
after you've mounted your backup tape  on an available tape drive, assumed to 
be 660 in the  following:
 
0  assgn syslst,ign
0  // tlbl uin <---needed only IF your backup tape was created with  TL=
0  exec libr,size=512k
0  restore l=prd1 tape=660 date=old r=yes tl=uin
 
When the restore has completed for  PRD1 enter the following
 
mtc rew,660
 
0  exec libr,size=512k
0  restore l=prd2 tape=660 date=old r=yes tl=uin
 
When the restore has completed for  PRD2 enter the following:
 
mtc run,660
reipl noprompt
 
 
Now I'm going to tell you how to  restore IJSYSRS without having to do so 
using SA-RESTORE. The following assumes  you've also placed IJSYSRS on the same 
tape as you placed PRD1 and PRD2  libraries. After backing up IJSYSRS, PRD1 and 
PRD2 libraries you should restore  IJSYSRS to IJSYSR1. IJSYSR1 is located on 
SYSWK1 as VTOC entry SYS.NEW.RES. I  would suggest you do this in your normal 
backup of IJSYSRS. More on this  later. Your restore statement should be as 
follows:
 
restore l=ijsysrs:ijsysr1 tape=660  date=old r=yes
 
If SYS.NEW.RES exists on  SYSWK1 respond to the following with DELETE:
 
BG 0000 4433D EQUAL FILE ID IN  VTOC  IJSYSR1  SYS253=201  SYSWK1
SYS.NEW.RES                                                  
 
Once you have done the above  shutdown your system and IPL from SYSWK1. Once 
again issue PAUSE BG immediately  upon seeing BGINIT. At the READY FOR 
COMMUNICATIONS prompt issue the  following:
 
 
0  assgn syslst,ign
0  // tlbl uin <---needed only IF your backup tape was created with  TL=
0  exec libr,size=512k
0  restore l=ijsysrs:ijsysr2 tape=660 date=old r=yes  tl=uin           
BG-0000  4433D EQUAL FILE ID IN VTOC  IJSYSR2  SYSCAT=200   DOSRES
VSE.SYSRES.LIBRARY  
0  delete
 
 
When the restore has completed  for IJSYSRS enter the following:
 
mtc run,660
 
At this point and if you wish you  can also restore PRD1 and PRD2 using the 
previous examples. If so issue the  following MTC command rather than the one 
above:
 
mtc rew,660
 
 
Now a word about IJSYSR1 on SYSWK1  (i.e. SYS.NEW.RES). 
 
When applying INDIRECT  SERVICE the apply jobs, created from the IUI dialogs, 
copy IJSYSRS to  IJSYSR1. In earlier releases of z/VSE IBM used to keep this 
library intact.  Then, for whatever reason, they trashed it during DTRMRG. 
Then, at some  point (I think z/VSE 4.1.1) they stopped doing this. The point of 
this is  that you do not want to be in a situation where indirect service was 
applied  and the contents of IJSYSR1 was trashed AFTER your restore job 
restored  IJSYSR1 from IJSYSRS because you will NOT be able to IPL from SYSWK1. To  
avoid this I recommend to invoke your backup job BEFORE doing any of the 
above.  I suspect you'd want to do this anyway to ensure you start with a current 
backup  of IJSYSRS, IJSYSR1, PRD1 and PRD2.
 
Another good reason to restore  IJSYSRS to IJSYSR1 is to have a backup of 
IJSYSRS so IF you screw up something  in IJSYSRS so badly that you can't IPL you 
may be able to IPL from  SYSWK1


 




**************Looking for simple solutions to your real-life financial 
challenges?  Check out WalletPop for the latest news and information, tips and 
calculators.      (http://www.walletpop.com/?NCID=emlcntuswall00000001)


New Message Reply Date view Thread view Subject view Author view Other groups

This archive was generated by hypermail 2b25 : Tue Sep 30 2008 - 23:50:12 EDT