PAN#1 issued CC=4 with INCLUDE NOT PRODUCTION msg

Products

• Panvalet

Issue/Introduction

Executing the following PAN#1 ++WRITE WORK job and it is getting a CC=4 .
Trying to understand what the problem is.

Below is the output from the step:

                                                        CA-PANVALET              
                                         THE PROGRAM MANAGEMENT AND SECURITY SYSTEM  
               PROGRAMS AND ALL SUPPORTING MATERIALS COPYRIGHT 2010 BY CA.      
 ++OPTION OUTPUT,PDSOUT,B75G14                                                             
 ***** ABOVE ACTION SATISFACTORILY COMPLETED *****                              
 ++WRITE WORK,B75G14                                                                      LEVEL=004 DATE=01/23/19
        ++INCLUDE 6COMDATE                                               00227    INCLUDE NOT PRODUCTION          NEST 1 
 ***** ABOVE ACTION SATISFACTORILY COMPLETED *****                              
 

Environment

Release:
Component: PANVLT

Cause

The reason for the RC 4 in the Panvalet step is because the member being written out - B75G14 , is in Production Status - PAE
and the INCLUDE member - 6COMDATE   ,  is in Test Status - TAE.

In the Panvalet DocOps INCLUDE Command article -

https://docops.ca.com/ca-panvalet/14-6/en/using/pan-1-library-statements/include-command

In the Operations section, it explains:

".. .. .. If a member containing ++INCLUDE commands is in PRODuction status, all members included must also be in PRODuction status. However, members in TEST status can ++INCLUDE either PRODuction or TEST members."

 

Resolution

  Verify the Status of the members using a PAN#2 ++PRINT 1-UP report.

//PAN1UP EXEC PGM=PAN#2    
//SYSPRINT DD SYSOUT=*  
//SYSPUNCH DD SYSOUT=*  
//PANDD1 DD DISP=SHR,DSN=hlq.your.PANLIB   
//SYSIN DD *          
++PRINT 1-UP          
/* 
 

If 6COMDATE is in TAE status, we need to change the status of 6COMDATE to Production using PAN#1 ++STATUS job like this:

//PANSTAT EXEC PGM=PAN#1                           
//SYSPRINT DD SYSOUT=*                           
//SYSUDUMP DD SYSOUT=*                           
//PANDD1   DD DISP=SHR,DSN=hlq.your.PANLIB
//SYSIN DD *                                     
++STATUS 6COMDATE,PROD                              
/*                                               

Or apply special fix $2SF005
++USERMOD($2SF005)   REWORK(1995004).    /*                       
  SPECIAL ZAP TO PERMIT PRODUCTION STATUS MEMBERS TO INCLUDE TEST   STATUS MEMBERS.     

The Special fixes are in the SPECLMVS member in the CBA3SAMP library.