ALERT: Some images may not load properly within the Knowledge Base Article. If you see a broken image, please right-click and select 'Open image in a new tab'. We apologize for this inconvenience.

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

book

Article ID: 5719

calendar_today

Updated On:

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 */

 

/*