search cancel

How to Restore a Panvalet member from Panvalet Protection file

book

Article ID: 5018

calendar_today

Updated On:

Products

Panvalet

Issue/Introduction

Need to restore some Panvalet members that were Disabled and then Deleted from the production PANLIB

 

 

 

Environment

Panvalet 14.6 z/OS

Panvalet 14.4 z/VSE

Resolution

Sample z/OS job - 

Change the STEPLIB and PANLIB library names: 

//PANVRSTR EXEC PGM=PAN#2                                    
//STEPLIB  DD DISP=SHR,DSN=your.PANV.V146.CBA3LINK
//SYSPRINT DD SYSOUT=*                                       
//PANDD1   DD DISP=SHR,DSN=your.PANLIB  
//PANDD2   DD  DUMMY                                         
//PANDD3   DD DISP=SHR,DSN=your.INPUT.PROTECTION.FILE
//SYSIN DD *                                                 
++RESTORE  member                                            
/*                                                           

 

 

Sample VSE job  -
 
Change the CAILIB and PANLIB library names, plus update the ASSIGN and EXTENT statements: 
 
// JOB PANVREST
// OPTION DUMP JCANCEL 
// DLBL CAILIB,'your.PANV.V144.PRODUCT.LIBRARY'
// EXTENT ,vvvvvv,1,0,sssss,nnn
// LIBDEF PHASE,SEARCH=(CAILIB.BASE) 

// ASSGN SYS006,DISK,VOL=vvvvvv,SHR 
// DLBL PANDD1,'your.PANLIB',,DA
// EXTENT SYS006,vvvvvv

// ASSGN SYS004,DISK,VOL=vvvvvv,SHR 
// DLBL PANDD3,'your.INPUT.PROTECTION.FILE',,SD
// EXTENT SYS004,vvvvvv,1,0,sssss,nnn
// EXEC PGM=PAN#2,SIZE=256K 
++RESTORE member 
/* 
/& 
* $$ EOJ