A fix is available
APAR status
Closed as program error.
Error description
Translation of XML entities (eg. apostrophe to ') may result in XML-CODE=417 return from XML GENERATE, but more likely in an abend0c4 in outputTag_SBCS in IGZXLPKF, due to an unitialized entity escape table pointer when the input codepage is 930. The unintialized pointer is in automatic storage (ie. on the stack), so the residual value will vary depending on previous call activity. STORAGE(,,E2) for example, can be used to diagnose the problem, several registers will contain x'E2E2E2E2' at the point of error.
Local fix
The XML GENERATE can be wrapped in a separate compile unit and compiled with the default codepage.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 5.1 and later * * releases compiling and running programs * * with the COBEPAGE(930) compiler option in * * effect, and using XML GENERATE statement * * that contains the ENCODING phrase. * **************************************************************** * PROBLEM DESCRIPTION: XML generation may fail with XML-CODE * * 417 * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** The table used in XML GENERATE processing for supporting CODEPAGE(930) is not initialized correctly, leading to a failure when the table is accessed.
Problem conclusion
The COBOL library routine for supporting XML GENERATE has been corrected to initialize the table correctly.
Temporary fix
Comments
APAR Information
APAR number
PI87547
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
7B0
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2017-09-19
Closed date
2017-09-20
Last modified date
2017-10-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGZCEV4 IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI IGZXCDA IGZXD24 IGZXDMR 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
R7B0 PSY UI49631
UP17/09/28 P F709
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