How can I do a mass change on Panlib members?

book

Article ID: 49573

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) Nastel AutoPilot for WebSphere MQ CA PanApt CA PanAudit CA Panvalet CA QuickFetch CA Raps VSE CA Scheduler VSE CA SMR CA SOLVE:Operations Automation SOLVE:Access Session Management CA SOLVE:FTS CA SYSVIEW Performance Management NXBRIDGE - SYSYVIEW/ENDEVOR CA 2E CA SOLVE

Issue/Introduction

Description:

Some PAN#n utility commands, such as STATUS, can only modify one member at a time. Read on to expedite the process for multiple items.

Solution:

To automate the process, use the PGP (Panvalet Group Processor) feature which is documented in the Extended Features Guide. PGP is an exit program linked at
installation time and does not require you to do any linking. Use the name PGP to invoke the feature as a transient exit with USING.

Wildcarding can be used on the PRINT command which controls the filtering.

Here we will create a punch file with a command line of

++STATUS memname,INACTIVE
for each member starting with ABC:

  //STEP1 EXEC PGM=PAN#2  
  //PANDD1 DD DISP=SHR,DSN=your.PANLIB  
  //PANDD2 DD DUMMY  
  //PANDD3 DD DUMMY  
  //SYSPRINT DD SYSOUT=*  
  //SYSPUNCH DD DISP=(,CATLG,DELETE),DSN=punch.file,  
  // UNIT=SYSDA,SPACE=(TRK,(1,1)),  
  // DCB=(LRECL=80,BLKSIZE=80)  
  //SYSIN DD *  
  ++USING PGP  
  +-STATUS ,INACTIVE  
  ++PRINT 0-UP,NAME=ABC  
  /*  
  // 

If you want all members in the PANLIB, just remove the NAME= qualification
from the PRINT command.

Environment

Release: PVALET00200-14.5-Panvalet
Component: