A fix is available
APAR status
Closed as program error.
Error description
When using CEEFETCH to load an Enterprise COBOL 5 or COBOL 6 program, there may be times when CEEFETCH returns the program's load address instead of the expected function pointer address.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V5 and later * * releases running programs that use * * CEEFETCH/CEERELES to fetch and release COBOL * * programs from assembler. * **************************************************************** * PROBLEM DESCRIPTION: S0C1 abend when the fetched * * program is called. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** When a COBOL program is fetched by CEEFETCH, and not called, and then released (by CEERELES), some internal cached information about the program may not be correct. This happens only if the program is never called and then released. Later if the program is fetched again, the function descriptor returned by CEEFETCH may not be correct. When the COBOL program is called by this function descriptor, s0C1 abend occurs. COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
Problem conclusion
The COBOL runtime library is fixed to handle fetch and release correctly.
Temporary fix
Comments
APAR Information
APAR number
PH36547
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
7C0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2021-04-21
Closed date
2021-05-19
Last modified date
2021-06-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI75479 UI75481
Modules/Macros
IGZCEV4 IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI IGZXCDA IGZXD24 IGZXDMR IGZXJNI2 IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG IGZXPK2
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.
[{"Line of Business":{"code":"LOB17","label":"Mainframe TPS"},"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":"7C0"}]
Document Information
Modified date:
03 June 2021