PH67861: IGZXAPI FUNCTION CODE =2 AND 4 RESULTS IN RETURN CODE =-4 WHEN NON-XL COBOL DSA IS PASSED AS INPUT

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• IGZXAPI function code =2 and 4 results in return code =-4 when
  non-XL COBOL DSA is passed as input
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 5 and later        *
  *                 releases calling COBOL Runtime routine       *
  *                 IGZXAPI for 'Runtime Information Query'      *
  *                 (fc=2) or 'File Status Update'(fc=4).        *
  ****************************************************************
  * PROBLEM DESCRIPTION: When a Dynamic Save Area (DSA)          *
  *                      from a COBOL 4 or earlier releases was  *
  *                      passed as input parameter (XDSA) to     *
  *                      the COBOL Runtime routine IGZXAPI for   *
  *                      'Runtime Information Query' (fc=2)      *
  *                      or 'File Status Update' (fc=4), the     *
  *                      request is processed successfully,      *
  *                      and the routine returns with a          *
  *                      return code of 0.                       *
  *                                                              *
  *                      However, after the successful           *
  *                      completion of the IGZXAPI               *
  *                      'Runtime Information Query'             *
  *                      or 'File Status Update' request,        *
  *                      accessing XDDNAME field led to an       *
  *                      0C4 ABEND.                              *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  When the COBOL Runtime routine IGZXAPI was called
  For 'Runtime Information Query' or 'File Status Update'
  with a COBOL 4 DSA, the routine returned a return code
  of 0 instead of -4.
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K
  COB0603T/K COB0604T/K COB0605T/K
  

Problem conclusion

• The COBOL Runtime routine 'IGZXAPI' for
  'Runtime Information Query' and 'File Status Update' have been
  updated to terminate with a return code of -4 under any of the
  following conditions:
  
         1) A COBOL 4 DSA was passed as an input parameter.
  
         2) A non-COBOL DSA was passed as an input
              parameter, and a COBOL 4 DSA was found before a
              COBOL 5/6 DSA.
  
         3) No COBOL 5/6 DSA was found during the backchain.
  
  
  Return code -4 indicates that the input DSA does not belong
  to a program compiled with COBOL 5 or later compilers.
  
  
  To find more about IGZXAPI return codes, please refer to
  z/OS Language Environment Vendor Interface:
  
  >z/OS Language Environment Vendor Interface
  
  >> Language Environment vendor interfaces for
       AMODE 31 / AMODE 24 applications
  
  >>> IGZXAPI - COBOL file and runtime information query routine
  

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:

Modules/Macros

• IGZAP03A IGZAP08A IGZAP08B IGZAP08C IGZAP08D IGZAP11A IGZAP12A
  IGZCER4  IGZCEV4  IGZCJNI2 IGZLLIBV IGZXAPI  IGZXCA31 IGZXCDA
  IGZXD24  IGZXDMR  IGZXJNI2 IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC
  IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG IGZXPK2
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7D0 PSY UO05963

     UP25/12/03 P F512

• R7E0 PSY UO05966

     UP25/12/03 P F512

• R7F0 PSY UO05967

     UP25/12/03 P F512

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.