PH31526: CMQV COPYBOOK CORRECTION

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The CMQV copybook contains the following definition:
  10 MQHC-DEF-HCONN PIC S9 (9) BINARY VALUE 0.
  
  By specifying BINARY, the handling of the content is subject to
  the Cobol Compile Options.
  MQ occasionally delivers connection handles in the 10-digit
  range, which leads to aborts with RC2018, because the incorrect
  definition in the copybook and the associated compile setting
  lead to truncated connection handles:
  Connection handle 1487112936 becomes 487112936
  

Local fix

• Declare a dedicated HCONN as a local variable in the working
  storage of the application, e.g.:
  01  W03-HCONN                   PIC S9(9) COMP-5.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of IBM MQ for z/OS Version 9       *
  *                 Release 1 Modification 0 and                 *
  *                 Release 2 Modification 0.                    *
  ****************************************************************
  * PROBLEM DESCRIPTION: MQRC_HCONN_ERROR (MQRC 2018) is         *
  *                      returned to COBOL batch applications    *
  *                      compiled with TRUNC(STD) or TRUNC(OPT). *
  ****************************************************************
  In rare cases the value returned for an hconn on MQCONN is
  larger than a PIC S9(9) can contain. When the hconn is
  subsequently used its value is truncated and an invalid value
  is passed to the queue manager.
  

Problem conclusion

• cmqc.h is changed to define MQHC* as PIC S9(9) COMP-5
  
  The MQ z/os samples written in cobol are updated to use
  PIC S9(9) COMP-5 for hconn variables.
  
  The Knowledge Center is updated as follows:
  https://www.ibm.com/docs/en/ibm-mq/
                            9.2?topic=types-cobol-declarations
  The table entry for MQHCONN is changed from :
  "PIC S9(9) BINARY"
  to
  "On z/OS
  PIC S9(9) COMP-5"
  On other platforms
  PIC S9(9) BINARY
  "
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UI77144 UI77147

Modules/Macros

• CMQSTRC  CMQV     CSQ4BVA1 CSQ4BVJ1 CSQ4BVK1 CSQ4BVP1 CSQ4BVP2
  CSQ4CVB1 CSQ4CVB2 CSQ4CVB3 CSQ4CVB4 CSQ4CVB5 CSQ4CVC1 CSQ4CVCT
  CSQ4CVD1 CSQ4CVD2 CSQ4CVD3 CSQ4CVD4 CSQ4CVD5 CSQ4CVEV CSQ4CVJ1
  CSQ4CVK1 CSQ4CVPT CSQ4CVRG CSQ4TVD1 CSQ4TVD2 CSQ4TVD4 CSQ4TVD5
  CSQ4TVH1 CSQ4TVH2 CSQ4TVH3 CSQ4VD2  CSQ4VD3  CSQCBE30 CSQV
  

Fix information

• Fixed component name

  IBM MQ Z/OS V9

• Fixed component ID

  5655MQ900

Applicable component levels

• R100 PSY UI77147

     UP21/09/29 P F109

• R200 PSY UI77144

     UP21/09/29 P F109

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.