A fix is available
APAR status
Closed as program error.
Error description
COBOL 5.1 MODULE CAUSES CEEPCALL TO ABEND WITH S0C1
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5.1 with COBOL * * programs invoked by assembler programs. * * * **************************************************************** * PROBLEM DESCRIPTION: When an assembler program is using * * LOAD to load a COBOL V5 program and * * then later calls it, the WSA address * * may not be set correctly when the * * COBOL V5 program returns. If the * * caller of the assembler program * * requires its own WSA, the WSA address * * may not be correct when control is * * returned back to the caller. * * * **************************************************************** The interface between the COBOL compiler and the COBOL run time library was not able to ensure that the WSA address is set correctly when a COBOL V5 program returns control to an assembler program, a new interface was needed.
Problem conclusion
The interface between the COBOL compiler and the COBOL run time library was changed to ensure that the WSA address is set correctly when a COBOL V5 program returns control to an assembler program.
Temporary fix
Comments
APAR Information
APAR number
PI28923
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2014-11-04
Closed date
2014-12-05
Last modified date
2015-01-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGYPACCP IGYPADAT IGYPADSB IGYPARTH IGYPASBB IGYPASFF IGYPASII IGYPASSL IGYPCALC IGYPCBB IGYPCCLB IGYPCDD IGYPCDNL IGYPCFF IGYPCLAS IGYPCLSI IGYPCMPR IGYPCNDX IGYPCNTL IGYPCPTR IGYPCTLS IGYPCXN IGYPDBUG IGYPDECL IGYPDELT IGYPDISP IGYPDVBB IGYPDVDE IGYPDVFF IGYPDVII IGYPDVSL IGYPERR IGYPEVAL IGYPEXPO IGYPEXSL IGYPFALF IGYPFDAT IGYPFLIB IGYPFMOR IGYPFMTH IGYPFNUM IGYPFRDM IGYPFSAM IGYPFUNC IGYPFUNI IGYPGNT IGYPGPFM IGYPINIT IGYPINI2 IGYPINSP IGYPINVK IGYPIOCM IGYPIPI IGYPLINK IGYPMAA IGYPMAAE IGYPMBB IGYPMBD IGYPMDB IGYPMEE IGYPMEI IGYPMERG IGYPMFF IGYPMFX IGYPMGX IGYPMHX IGYPMID IGYPMLND IGYPMNEN IGYPMNNE IGYPMOVE IGYPMQX IGYPMTHI IGYPMUNE IGYPMVV IGYPMVX IGYPMXF IGYPMXG IGYPMXH IGYPMXN IGYPMXQ IGYPMXV IGYPMZND IGYPNATC IGYPON IGYPOPCL IGYPREAD IGYPREWR IGYPSBSC IGYPSET IGYPSORT IGYPSRCH IGYPSRTM IGYPSRVE IGYPSTNG IGYPSTOR IGYPSTRT IGYPTEXT IGYPTIBB IGYPTIFF IGYPTIII IGYPTIMS IGYPTISL IGYPTMGT IGYPTSMG IGYPUCP IGYPUNST IGYPUSE IGYPVALU IGYPWRIT IGYPXGF IGYPXLDD IGYPXPS IGY1PTRC
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSN UI23730
UP14/12/13 P F412
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"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"510","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
11 November 2021