A fix is available
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 number
PI97717
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
7B0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2018-05-08
Closed date
2018-05-15
Last modified date
2018-06-04
APAR is sysrouted FROM one or more of the following:
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
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.
[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSCVR7X","label":"Runtime"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 December 2020