PH67860: IGZXAPI FUNCTION CODE =1 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 =1 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 'File information query' (fc=1). *
  ****************************************************************
  * 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 a 'File information query' (fc=1),  *
  *                      the request is processed successfully,  *
  *                      and the routine returns with a          *
  *                      return code of 0.                       *
  *                                                              *
  *                      However, after the successful           *
  *                      completion of the IGZXAPI               *
  *                      'File information query' request,       *
  *                      accessing XDDNAME field led to an       *
  *                      0C4 ABEND.                              *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  When the COBOL Runtime routine IGZXAPI was called for
  'File information query' 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 'File information
  query' has 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 in the DSA chain.
  
          3) No COBOL 5/6 DSA was found in the DSA chain.
  
  
  The 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:

  UO05963 UO05966 UO05967

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.