A fix is available
APAR status
Closed as program error.
Error description
A branch to low core can occur when a COBOL program calls an assembler routine which then calls another COBOL program, with the called COBOL program using XML. The branch to low core actually occurs out of CEESTART, due to the C run-time environment not being initialized. The environment is needed when using XML.
Local fix
Use one of the following: 1. Place a small COBOL stub program between the calling assembler prog and the COBOL one with the XML verb. Then have that stub do a dynamic call to the one with the XML verb. 2. Change the assembler to be LE-enabled, and use the CEEFETCH macro to load the COBOL program. 3. Linkedit CEESG003 from library SCEELKED with the main COBOL program.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V4R2 compiler * * using XML GENERATE under CICS. * **************************************************************** * PROBLEM DESCRIPTION: S0C1 ABEND during XML GENERATE * * processing in IWZCXGF. This only * * happens when a COBOL program calls * * a program written in ASSEMBLER which * * in turn, calls a COBOL program coded * * with XML GENERATE. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** COBOL program with XML GENERATE requires supports from the C runtime library. This S0C1 ABEND is caused by the C runtime library not being initialized. FIXCAT keyword: COB0501T/K COB0502T/K COB0601T/K COB0602T/K
Problem conclusion
The initialize sequence of COBOL program under CICS has been updated to check if the program requires C runtime library, and would initialize it if necessary.
Temporary fix
Comments
APAR Information
APAR number
PH06613
Reported component name
LE COBOL LIB
Reported component ID
568819802
Reported release
7B0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2018-12-18
Closed date
2018-12-18
Last modified date
2019-02-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI60348
Modules/Macros
IGZ9DCM IGZ9INI IGZ9MSG IGZ9POP IGZ9SMG IGZ9TCL IGZ9TRM IGZ9TSU IGZCPCC IGZCSG5 IGZHEAI
Fix information
Fixed component name
LE COBOL LIB
Fixed component ID
568819802
Applicable component levels
R7B0 PSY UI60348
UP19/01/30 P F901
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":"LOB16","label":"Mainframe HW"},"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG27M","label":"APARs - z\/VM environment"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7B0"}]
Document Information
Modified date:
22 January 2021