DBMS_XMLDOM - add namespaces attributes and prefix

Question

Hi,
try to add a prefix and a namespace to the root node of an XML structure. Have tried the following code but i failed to add both.
XML-structure before:
<PERSON>
<NAME>something</NAME>
</PERSON>
XML-structure desired:
<pk:PERSON xmlns:pk="http://www.test.com">
<NAME>something</NAME>
</pk:PERSON>
Any help is greatly appreciated.
THX
--------------- BEGIN ---------------------------
declare
var XMLType;
buf clob;
l_xmldoc dbms_xmldom.DOMDocument;
l_docelem dbms_xmldom.DOMElement;
l_root dbms_xmldom.DOMNode;
l_attr dbms_xmldom.DOMAttr;
begin
var := xmltype('<PERSON> <NAME>something</NAME> </PERSON>');
-- Create DOMDocument handle:
l_xmldoc := dbms_xmldom.newDOMDocument(var);
l_docelem := DBMS_XMLDOM.getDocumentElement(l_xmldoc);
-- set prefix
l_root := dbms_xmldom.makenode(l_docelem);
DBMS_XMLDOM.setPrefix(l_root, 'pk');
l_docelem := DBMS_XMLDOM.makeElement(l_root);
dbms_output.put_line('Prefix: '||dbms_xmldom.getPrefix(l_root));
dbms_output.put_line('l_root: '||dbms_xmldom.getNodeName(l_root));
dbms_output.put_line('-----');
-- add namespace attribute
l_attr := DBMS_XMLDOM.createAttribute(l_xmldoc, 'xmlns:pk');
DBMS_XMLDOM.setValue(l_attr, 'http://www.test.com');
l_attr := DBMS_XMLDOM.setAttributeNode(l_docelem, l_attr);
-- after
dbms_xmldom.writetobuffer(l_xmldoc, buf);
dbms_output.put_line('OUT:');
dbms_output.put_line(buf);
end;
--- OUTPUT ----- OUTPUT ----- OUTPUT --
Prefix: pk
l_root: pk:PERSON
OUT:
<PERSON xmlns:pk="http://www.test.com">
<NAME>something</NAME>
</PERSON>
------------------- END -----------------------

Answer 1

Seems to me you're hitting bug 2904964. I have the same problem using these functions.