A fix is available
APAR status
Closed as program error.
Error description
Due to changes in the v5 compiler architecture, the compiler exits are now invoked via CEEPIPI call_sub, rather than relying on the RTEREUS run-time option for run-time performance. The shipped SIGYSAMP(MSGEXIT) is stale and still includes instructions for setting up RTEREUS, and a STOP RUN which is invalid in the CEEPIPI call_sub environment. Running the sample code as is will produce a IGYSI5301-U The compilation failed due to an internal error calling a compiler user exit. CEEPIPI returned error code 28.
Local fix
Change the STOP RUN to GOBACK; do not link in CEEUOPT with RTEREUS.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5.1 who compile * * programs using the MSGEXIT suboption of * * the EXIT option and who create their * * message exit program from the provided * * sample, IGYMSGXT. * * * **************************************************************** * PROBLEM DESCRIPTION: The compile operation fails with * * message IGYSI5301-U. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** STOP RUN was used in the message exit code, but STOP RUN can no longer be used in a message exit, starting with Enterprise COBOL V5.1. GOBACK must be used instead.
Problem conclusion
STOP RUN was used instead of GOBACK in the message exit program but STOP RUN is no longer supported in message exits starting with Enterprise COBOL V5.1.
Temporary fix
Comments
APAR Information
APAR number
PI38571
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2015-04-08
Closed date
2015-04-16
Last modified date
2015-05-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYMSGXT
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI26829
UP15/04/24 P F504
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":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.1","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.1","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
04 May 2015