Is there a fix for CA Panvalet that would allow the ++PRINT command to be issued without specifying the ++CONTROL card?

Products

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

Issue/Introduction

Is there a fix for CA Panvalet that would allow the ++PRINT command to be issued without specifying the ++CONTROL card?  

Environment

CA Panvalet 14.6

Resolution

There is a special USERMOD called $2SF077 located in member SPECLMVS in the CBA3SAMP library that needs to be received and applied. 

This special USERMOD $2SF077 is a zap that will allow you to issue the ++PRINT command without having to specify the ++CONTROL CARD.

 

You will use SMP/E to receive and apply this usermod. 

 

Example below:

//SMPEPTF EXEC PGM=GIMSMP,PARM='DATE=U',REGION=0M

//SMPCSI    DD DISP=SHR,DSN=YOUR.PANVALET.CSI

//SMPPTFIN DD *

++USERMOD($2SF077).       /*

  SPECIAL ZAP TO ALLOW ++PRINT TO NOT REQUIRE A ++CONTROL CARD.                  */

++VER(Z038)  FMID(CBA3E60).              /* CA-PANVALET BATCH        */

++ZAP(I2SF000).         /* MODIFY $2SF000           */

 NAME $2SF000

 IDRDATA $2SF077

 VER     000332 5BF2,E2C6,F0F7,F740,D540

 REP     000332 5BF2,E2C6,F0F7,F740,E840

/*

//SMPCNTL   DD *

  SET BDY(GLOBAL) .

  RECEIVE SELECT($2SF077) SYSMODS .  /* CHANGE TO MATCH ABOVE UMODID */

  SET BDY(CAIT0) .

  APPLY   SELECT($2SF077)  .         /* CHANGE TO MATCH ABOVE UMODID */

 

/*