How can I create a job to restore a member from Panvalet library running under a VSE operating system?

book

Article ID: 5018

calendar_today

Updated On:

Products

CA Database Analyzer (IMS Tools) CA Mainframe Configuration Manager for IMS for z/OS IMS TOOLS - MISC CA Compress Data Compression (IMS Tools) CA Database Analyzer for IMS for z/OS CA Database Copier for IMS for z/OS CA Database Organizer for IMS for z/OS CA Mainframe Extended Terminal Manager (IMS Tools) CA High Performance Recovery for IMS for z/OS CA Database Organizer (IMS Tools) CA Mainframe Program Restart Manager for IMS for z/OS CA Secondary Index Builder for IMS for z/OS CA Secondary Index for IMS for z/OS CA JARS CA JARS Resource Accounting CA JARS SMF Director CA JMR CA MIM Resource Sharing (MIM) CA MIM Data Sharing (MII) CA MIM Tape Sharing (MIA) CA MIM Message Sharing (MIC) MIM BASE Nastel AutoPilot for WebSphere MQ CA Panvalet CA QuickFetch CA Raps VSE CA Scheduler VSE CA SMR CA SOLVE:Operations Automation SOLVE:Access Session Management CA SOLVE:CA Mainframe Connector CA SOLVE:FTS CA SYSVIEW Performance Management NXBRIDGE - SYSYVIEW/ENDEVOR CA SOLVE

Issue/Introduction

How can I create a job to restore a member from Panvalet library running under a VSE operating system?

 

 

 

Environment

Panvalet 14.4 VSE

Resolution

Here is a VSE JCL example - Change the job card, the USERID, loadlib and the PANLIB library names: 
* * * Top of File * * * 
* $$ JOB JNM=USERID,CLASS=0,DISP=D,PRI=3,NTFY=(*,USERID) 
* $$ PRT CLASS=X,DISP=D,RBM=(6000,10000),RBS=400,DEST=(*,USERID) 
* $$ LST CLASS=A,DEST=(*,USERID),DISP=D,JSEP=0 
* $$ PUN DEST=(*,USERID),DISP=D,JSEP=0 
// JOB PANREST 
// OPTION DUMP JCANCEL 
// DLBL CAILIB,'PANVALET.V14R4.PRODUCT.LIBRARY' 
// EXTENT ,LCSSYS,1,0,2765,200 
// LIBDEF PHASE,SEARCH=(CAILIB.BASE) 

// ASSGN SYS006,DISK,VOL=LCSSYS,SHR 
// DLBL PANDD1,'YOUR.V14R4.PANLIB',,DA 
// EXTENT SYS006,LCSSYS 

// ASSGN SYS004,DISK,VOL=LCSSYS,SHR 
// DLBL PANDD3,'YOUR.INPUT.PROTECTION.FILE',,SD 
// EXTENT SYS004,LCSSYS,1,0,3570,25 
// EXEC PGM=PAN#2,SIZE=256K 
++RESTORE member 
/* 
/& 
* $$ EOJ 
* * * End of File * * * 

 

 

 

 

 

 

 

 

 

 

 

 

 

Additional Information

Please refer to the Systems Management Guide 14.4 for VSE Chapter 5 - PAN#2 Library Protection