#!/usr/bin/env qore

%new-style
%require-our
%strict-args
%enable-all-warnings

%requires xml
#%requires WSDL
%requires ./WSDL.qm

string req = ReadOnlyFile::readTextFile("test1.xml");

WebService ws(ReadOnlyFile::readTextFile("CC_SOAP_OdL_snd.wsdl"));
WSOperation op = ws.getOperation("MI_CRM_ODL_sync_outB");

hash<auto> soap_msg = WSDLLib::parseSOAPMessage(WSDLLib::parseMultiPartSOAPMessage({"_qore_orig_content_type": "application/soap+xml", "body": req}));
#printf("soap_msg: %N\n", soap_msg);
auto v = op.deserializeRequest(soap_msg);
printf("%N\n", v);
