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

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