PI49902: THE IGZXFCA1 DYNAMIC CALL FASTPATH CODE UNDER CICS WITH CBLPSHPOP(OFF) FAILS TO SET THE EXPECTED R1 IN ITS SAVE AREA

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The dynamic call library routine IGZXFCA1 contains fast path
  logic for calls when under CICS and CBLPSHPOP(OFF).
  
  While this code passes the correct R1 to the callee, so the
  callee sees the parameters it expects, IGZXFCA1's save area
  doesn't reflect this R1 value. Any introspection code or person
  examining the IGZXFCA1 save area will see an inappropriate R1
  value.
  
  The R0 in the save area is also incorrect, though this generally
  doesn't cause immediate problems.
  

Local fix

• Check the initial caller's save area for the true R0, R1 values.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Enterprise COBOL V5 users running under CICS *
  *                 and using the CBLPSHPOP(OFF) runtime option. *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Incorrect results from tools that       *
  *                      follow the save area chain and need     *
  *                      Register 1 to be set correctly: When an *
  *                      Enterprise COBOL V5 program dynamically *
  *                      calls another COBOL V5 program under    *
  *                      CICS while the CBLPSHPOP runtime option *
  *                      is off, the dynamic call routine        *
  *                      IGZXFCA1 optimizes the call by skipping *
  *                      over the target program's bootstrap     *
  *                      code. While the caller's parameters are *
  *                      being passed correctly to the target    *
  *                      program in register R1, IGZXFCA1 missed *
  *                      saving the R1 value in its save area.   *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply provided service.                      *
  ****************************************************************
  The fastpath logic in IGZXFCA1 that handles calling COBOL V5
  programs under CICS with CBLPSHPOP(OFF) in effect is not
  correctly saving R1 in its save area.
  

Problem conclusion

• IGZXFCA1 is corrected to save R1 in its save area.
  

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:

  106PC1Ÿ

Modules/Macros

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI32124

     UP15/10/23 P F510

• R780 PSY UI32125

     UP15/10/23 P F510

• R790 PSY UI32126

     UP15/10/23 P F510

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.