A fix is available
APAR status
Closed as program error.
Error description
COBOL pgm, while doing a BIND with an INSERT from XMLTABLE and a hostvar in query is a CLOB type, results in SQLCODE171 from DSNXOTDA SQLCODE -171 SQLERRD1 -666 Both DB2 and COBOL compiler have code change to fix this problem, so there is also APAR PM43179 for DB2.
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V4 with programs * * that use the DB2 co-processor when declaring * * an XML host variable with SQL TYPE of XML AS * * CLOB-FILE, or BLOB-FILE or DBCLOB-FILE. * * * **************************************************************** * PROBLEM DESCRIPTION: SQLCODE -171 DSNXOTDA SQLERRD1 -666 * * during BIND for passing XML CLOB File * * reference variable to a XMLTABLE * * function as argument. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** The COBOL compiler was not setting the XML bit when large XML LOB file reference variables are used with XMLTABLE function.
Problem conclusion
The COBOL compiler is changed to now set the XML bit when XML LOB file reference variables are used with XMLTABLE function DB2 APAR PM43179 is also required to fix the problem.
Temporary fix
Comments
APAR Information
APAR number
PM43791
Reported component name
ENT COBOL FOR Z
Reported component ID
5655S7100
Reported release
420
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2011-07-15
Closed date
2011-08-22
Last modified date
2011-09-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PM45716 UK71078 UK71079
Modules/Macros
IGYTSQL
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655S7100
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.
[{"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":"4.2","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}}]
Document Information
Modified date:
01 September 2011