10. Februar 2009 15:37
<soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:urn="urn:mko-stads">
<soapenv:Header/>
<soapenv:Body>
<urn:select soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
<in0 xsi:type="msg:thisFunction" xmlns:msg="http://msg.soap.sla">
<Id xsi:type="dtyp:AN15Type" xmlns:dtyp="http://dtyp.soap.sla">10000</Id>
<otherId xsi:type="dtyp:CS840018Type" xmlns:dtyp="http://dtyp.soap.sla">2</otherId >
</in0>
</urn:select>
</soapenv:Body>
</soapenv:Envelope>
IF ISCLEAR(locautSoapHttpConnector) THEN CREATE(locautSoapHttpConnector);
locautSoapHttpConnector.Property('EndPointURL', 'TheWebServiceIP');
locautSoapHttpConnector.Connect;
locautSoapHttpConnector.Property('AuthUser', 'test');
locautSoapHttpConnector.Property('AuthPassword', 'test');
locautSoapHttpConnector.Property('Timeout', 5 * 1000);
locautSoapHttpConnector.Property('SoapAction', '"');
IF ISCLEAR(locautSoapSerializer) THEN CREATE(locautSoapSerializer);
locautSoapHttpConnector.BeginMessage;
locautSoapSerializer.Init(locautSoapHttpConnector.InputStream);
locautSoapSerializer.StartEnvelope('soapenv', 'STANDARD');
locautSoapSerializer.SoapNamespace('xsi', 'http://www.w3.org/2001/XMLSchema-instance');
locautSoapSerializer.SoapNamespace('xsd', 'http://www.w3.org/2001/XMLSchema');
locautSoapSerializer.SoapNamespace('urn', 'mko-stads');
locautSoapSerializer.StartHeader;
locautSoapSerializer.EndHeader;
locautSoapSerializer.StartBody;
locautSoapSerializer.StartElement('select', 'http://schemas.xmlsoap.org/soap/encoding/', 'urn');
// ???
locautSoapSerializer.EndElement;
locautSoapSerializer.EndBody;
locautSoapSerializer.EndEnvelope;
locautSoapHttpConnector.EndMessage;
23. Februar 2009 09:37
23. Februar 2009 10:02
23. Februar 2009 17:25
24. Februar 2009 11:55
24. Februar 2009 16:06