PI76841: EXCEPTION IGZXPRS1 OFFSET X'3C8' USING PROCEDURE POINTER CALL

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• With a mix of COBOL V5 and pre-COBOL V5 programs, using a
  Procedure Pointer CALL may result in an s0c4 exception in
  IGZXPRS1.  Failing instruction is an OI (9601  E004) due to an
  invalid address in reg14.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Enterprise COBOL users compiling and         *
  *                 running programs that use PROCEDURE-POINTER  *
  *                 data items to point to COBOL V5+ programs.   *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Runtime ABEND S0C4. When a              *
  *                      PROCEDURE-POINTER to a COBOL V5+        *
  *                      program is setup using the literal      *
  *                      format of the "SET ... TO ENTRY ..."    *
  *                      statement, and the PROCEDURE-POINTER    *
  *                      is subsequently used in a different     *
  *                      program, an S0C4 ABEND may occur.       *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  The literal format of the "SET ... TO ENTRY ..." statement does
  not invoke the COBOL runtime, so the pointer is not a proper
  function descriptor that will handle locating the proper
  working-storage for the program.
  

Problem conclusion

• The COBOL V5+ bootstrap routines are enhanced to handle being
  called by PROCEDURE-POINTERs
  

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

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI45690

     UP17/03/31 P F703

• R790 PSY UI45691

     UP17/03/31 P F703

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.