PI97717: Detect invalid DSA word zero signature during COBOL dynamic call

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• If an application has overwritten word zero of the caller's save
  area, an 0C4 may ensue during a dynamic call. This change will
  produce a diagnostic message instead.
  

Local fix

• Correct the overwrite.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5.1 and later     *
  *                 releases compiling and running programs      *
  *                 that use dynamic CALL.                       *
  ****************************************************************
  * PROBLEM DESCRIPTION: ABEND 0C4 during runtime when the       *
  *                      COBOL program is using dynamic CALL.    *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  New Function. If control information in the stack of a COBOL
  program is corrupted, and the program calls a sub-program using
  dynamic CALL, the call cannot be completed properly. A new
  diagnostic check is added to the COBOL Library to catch the
  error.
  

Problem conclusion

• New Function.  The COBOL Library has added a diagnostic check
  when setting up dynamic CALL, and emits message IGZ0347 to
  indicate error if control information in the stack is corrupted.
  

Temporary fix

Comments

APAR Information

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

  PI97414

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

Modules/Macros

• IGZBALCT IGZCEV4  IGZCMGEN IGZCMGJA IGZCMGUE IGZEDCCT IGZIBMCT
  IGZIGZCT IGZLLIBV IGZX2BIN IGZX2HEX IGZXAPI  IGZXBU2L IGZXBU2P
  IGZXBU2S IGZXBU2W IGZXCDA  IGZXD24  IGZXDMR  IGZXFBIN IGZXFHEX
  IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF
  IGZXLPKG IGZXNE3N IGZXPK2  IGZXREVT
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7B0 PSY UI55861

     UP18/06/01 P F805

• R7BJ PSY UI55862

     UP18/06/01 P F805

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.