How to read macros from a Panvalet library with option MACRO=PDS

Products

• PanAudit Plus
• Easytrieve Report Generator
• PAN/SQL

Issue/Introduction

Can we use MACRO=PDS and still read macros from a CA Panvalet library as well as from a PDS/PO data set?

 

Environment

Release: EDBMSU00200-6.4-Easytrieve-Report Generator-Option for DB2-MSU
Component:

Resolution

MACRO=PDS can be used and still read macros from a CA Panvalet library.

Add ",SUBSYS=PANV" to the DD card and the PANV subsystem must be active - see query commands below please.
 
These are the relevant options used for the following tests:
...
MACDDN=PANDD,  
MACRO=PDS,     
...
 
Now macros can either be read from a PANLIB or PDS, but not from both library types at the same time.
And, as mentioned already, ",SUBSYS=PANV" must be added to the PANDD DD when using a PANLIB.
 
This is an example using a PANLIB library:
...
//   SET STEPLIB1='your.EZTP64.CAILIB'                     
//   SET EZOPTBL1='your.EZTP64.EZTPOPT'                               
//   SET CAIMAC01='your.TEST.PANLIB'                                  
//*------------------------------------------------------------------* 
//COMPNGO  EXEC PGM=EZTPA00                                            
//STEPLIB  DD  DISP=SHR,DSN=&STEPLIB1                                   
//EZOPTBL  DD  DISP=SHR,DSN=&EZOPTBL1                                  
//PANDD    DD  DISP=SHR,DSN=&CAIMAC01,SUBSYS=PANV                      
//SYSPRINT DD  SYSOUT=*                                                
//SYSOUT   DD  SYSOUT=*                                                 
//SYSIN    DD  *                                                       
*                                                                      
JOB INPUT NULL                                                          
  DISPLAY 'START MACRO TEST'                                           
  %EZPANMAC                                                            
  DISPLAY 'END   MACRO TEST'                                            
STOP                                                                   
*                                                                       
 
result:
...
START MACRO TEST                                   
Display from macro EZPANMAC on your.TEST.PANLIB   
END   MACRO TEST                                   
...
 
This is an example using a PO data set:
...
//   SET STEPLIB1='your.EZTP64.CAILIB'                      
//   SET EZOPTBL1='your.EZTP64.EZTPOPT'                                 
//   SET CAIMAC01='your.EZTPLS.PDS'                                 
//*------------------------------------------------------------------*  
//COMPNGO  EXEC PGM=EZTPA00                                             
//STEPLIB  DD  DISP=SHR,DSN=&STEPLIB1                                   
//EZOPTBL  DD  DISP=SHR,DSN=&EZOPTBL1                                   
//PANDD    DD  DISP=SHR,DSN=&CAIMAC01   
//SYSPRINT DD  SYSOUT=*                                                 
//SYSOUT   DD  SYSOUT=*                                                 
//SYSIN    DD  *                                                        
*                                                                        
JOB INPUT NULL                                                          
  DISPLAY 'START MACRO TEST'                                            
  %EZPDSMAC                                                              
  DISPLAY 'END   MACRO TEST'                                            
STOP                                                                    
*                                                                        
 
result à
...
START MACRO TEST                                       
DISPLAY FROM MACRO EZPDSMAC ON your.EZTPLS.PDS     
END   MACRO TEST                                       
...

Additional Information

"%query init" and "%query state" is showing some information about the Panvalet subsystem on z/OS.
For instance "%query init":
...
08.50.16 TSU21944  %QUERY INIT                                                    
08.50.16 TSU21944  GSVX014I (ISPF.uid01) uid01 entered command MVS %QUERY INIT
08.50.16 TSU21944  PANV779I INITIALIZED USING MEMBER PANSYS00                     
08.50.16 TSU21944  PANV779I VERSION= 14.5A   SUBSYS NAME= PANV                     
08.50.16 TSU21944  PANV704I COMMAND EXECUTED                                       
...
and "%query state":
...
08.50.45 TSU21944  %QUERY STATE                                                   
08.50.45 TSU21944  GSVX014I (ISPF.uid01) uid01 entered command MVS %QUERY STATE
08.50.45 TSU21944  PANV775I SUBSYSTEM STATUS= ACTIVE                              
08.50.45 TSU21944  PANV704I COMMAND EXECUTED                                      
...