UTL_DBWS, XML Document as a parameter

Question

I'm struggling with using a fully formed xml document as a parameter to a web service.
Using this code I'm able to connect to the web service and sans the arg1 argument everything works.
When I as in the code below use xmltype.toStringValue() or xmltype.toClobValue() charachters like < and > is replaced with the html encoded version (&lt; and &gt;) which does'nt work very well with the recieving web service.
All three parameters is defined as string on the recieving web service.
I've been searching this forum and using google, but can't find any examples doing something like this.
Any help or pointers appreciated.
procedure forwardToQueue is
svc_ sys.utl_dbws.service;
call_ sys.utl_dbws.call;
svc_qname sys.utl_dbws.qname;
response sys.xmltype;
request sys.xmltype;
utMelding sys.xmltype;
t1 sys.xmltype;
t2 sys.xmltype;
doc xmldom.DomDocument;
fListe xmldom.DOMNodeList;
tmpL xmldom.DOMNodeList;
fElement xmldom.domNode;
tmp xmldom.domNode;
meldingId strliten;
arg0_node xmldom.domnode;
arg0_elmt xmldom.domelement;
arg0_text xmldom.domtext;
arg1_node xmldom.domnode;
arg1_elmt xmldom.domelement;
arg1_text xmldom.domtext;
arg2_node xmldom.domnode;
arg2_elmt xmldom.domelement;
arg2_text xmldom.domtext;
child_doc xmldom.domdocument;
main_node xmldom.domnode;
root_node xmldom.domnode;
root_elmt xmldom.domelement;
x sys.xmltype;
c varchar2(32000);
bs_chr strmax;
l_service sys.UTL_DBWS.service;
l_call sys.UTL_DBWS.call;
l_result ANYDATA;
l_wsdl_url strmax := 'http://salah-test.sismo.local:8080/SIMSEJB/SIMSFacadeBean?wsdl';
l_namespace strmax := 'http://salah-test.sismo.local:8080/SIMSEJB/SIMSFacadeBean';
l_service_qname sys.utl_dbws.qname;
begin
procName := 'hentQueue';
pl('*************** '||procName||' ***************');
svc_qname := sys.utl_dbws.to_qname(null, 'SIMSFacadeBeanService');
svc_ := sys.utl_dbws.create_service(svc_qname);
call_ := sys.utl_dbws.create_call(svc_);
sys.utl_dbws.set_target_endpoint_address(call_, 'http://salah-test.sismo.local:8080/SIMSEJB/SIMSFacadeBean');
sys.utl_dbws.set_property(call_, 'SOAPACTION_USE', 'TRUE');
sys.utl_dbws.set_property(call_, 'SOAPACTION_URI', 'sendMessage');
sys.utl_dbws.set_property(call_, 'OPERATION_STYLE', 'document');
x := genererSvar;
doc := xmldom.newDOMDocument;
main_node := xmldom.makeNode(doc);
root_elmt := xmldom.createelement(doc, 'q0:sendMessage');
xmldom.setattribute(root_elmt, 'xmlns:q0', 'si.sims.intern.service');
root_node := xmldom.appendChild(main_node, xmldom.makeNode(root_elmt));
-- Adding arg 0 as a string
arg0_elmt := xmldom.createelement(doc, 'arg0');
arg0_node := xmldom.appendchild(root_node, xmldom.makenode(arg0_elmt));
arg0_text := xmldom.createtextnode(doc, '2');
arg0_node := xmldom.appendchild(arg0_node, xmldom.makenode(arg0_text));
               -- Adding arg 1 as a string
arg1_elmt := xmldom.createelement(doc, 'arg1');
arg1_node := xmldom.appendchild(root_node, xmldom.makenode(arg1_elmt));
arg1_text := xmldom.createtextnode(doc, x.getClobVal());
arg1_node := xmldom.appendchild(arg1_node, xmldom.makenode(arg1_text));
-- Adding arg 2 as a string
arg2_elmt := xmldom.createelement(doc, 'arg2');
arg2_node := xmldom.appendchild(root_node, xmldom.makenode(arg2_elmt));
arg2_text := xmldom.createtextnode(doc, 'false');
arg2_node := xmldom.appendchild(arg2_node, xmldom.makenode(arg2_text));
request := xmldom.getxmltype(doc);
pl('Request:');
pl(request.getStringVal());
response := sys.utl_dbws.invoke(call_, request);
pl('Showing respons');
pl(response.getStringVal());
doc := DBMS_XMLDOM.newDomDocument(response);
sys.utl_dbws.release_call(call_);
sys.utl_dbws.release_service(svc_);
end forwardToQueue;

Answer 1

Is the Document well defined via schema? You might be able to use the autotype
ant task to generate a serializer.
Otherwise, serialize the document to a string, then wrap it in <[CDATA[...]]>
on the return. The calling app will need to understand that the string is xml,
and then desrailize it manually.
Mike
"Surya" <[email protected]> wrote:
>
I have web service which has to retuen an XML document (org.w3c.dom.Document)
as
a paramter. Since this is not a supported data type for in-out paramaters,
I will
have to serialize and write my own converter. What is the best solution?
Is there
any class/library that can convert the document into String which I can
return
as a parameter and again get create a XML document in the client side.
Thanks -Surya