A fix is available
APAR status
Closed as program error.
Error description
Protection exception in IGZXPRS error message
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Enterprise COBOL V5 users running COBOL V5 * * programs that are statically called by * * assembler programs (that have the LE CEEPIPI * * CALLSUB) and also statically CALL assembler * * programs under LE pre-initialized * * environment. * * * **************************************************************** * PROBLEM DESCRIPTION: Incorrect output due to the runtime * * incorrectly re-initializing the * * WORKING-STORAGE data items. This * * problem occurs only when the COBOL V5 * * program is statically linked with the * * assembler program which starts the LE * * pre-initialized environment. The * * problem doesn't occur if the COBOL * * program is loaded and then call. * * * **************************************************************** * RECOMMENDATION: Apply provided service. * * * **************************************************************** COBOL V5 program running under LE pre-initialized environment using CALLSUB may reinitialize the WORKING-STORAGE section in every call.
Problem conclusion
The COBOL runtime library is fixed to handle CEEPIPI CALLSUB correctly.
Temporary fix
Comments
APAR Information
APAR number
PI33688
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
780
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2015-01-28
Closed date
2015-02-19
Last modified date
2015-03-03
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
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