<item xsi:type="ns1:Vt">
<vtid xsi:type="xsd:int">1</vtid>
<tid xsi:type="xsd:string">plus</tid>
<nid xsi:type="xsd:int">2</nid>
<pid xsi:type="xsd:int">6</pid>
<mkz xsi:type="xsd:float">0</mkz>
</item>
<item xsi:type="ns1:Vt">
<vtid xsi:type="xsd:int">2</vtid>
<tid xsi:type="xsd:string">minus</tid>
<nid xsi:type="xsd:int">2</nid>
<pid xsi:type="xsd:int">6</pid>
<mkz xsi:type="xsd:float">0</mkz>
</item>
<item xsi:type="ns1:Vt">
<vtid xsi:type="xsd:int">3</vtid>
<tid xsi:type="xsd:string">mal</tid>
<nid xsi:type="xsd:int">2</nid>
<pid xsi:type="xsd:int">6</pid>
<mkz xsi:type="xsd:float">0</mkz>
</item>
<item xsi:type="ns1:Vt">
<vtid xsi:type="xsd:int">4</vtid>
<tid xsi:type="xsd:string">durch</tid>
<nid xsi:type="xsd:int">2</nid>
<pid xsi:type="xsd:int">6</pid>
<mkz xsi:type="xsd:float">0</mkz>
</item>
<ArtKalkek xsi:type="urn:ArtKalkekList" soapenc:arrayType="urn:ArtKalkek[]">
locautSoapSerializer.startBody;
locautSoapSerializer.startElement('SetArtvks');
locautSoapSerializer.startElement('login');
locautSoapSerializer.writeString('XXX');
locautSoapSerializer.endElement;
locautSoapSerializer.startElement('password');
locautSoapSerializer.writeString('XXX');
locautSoapSerializer.endElement;
locautSoapSerializer.startElement('ArtKalkek');
locautSoapSerializer.startElement('Item');
//Artikelid
locautSoapSerializer.startElement('artid');
locautSoapSerializer.writeString('i');
locautSoapSerializer.endElement;
//EK Preis
locautSoapSerializer.startElement('vk');
locautSoapSerializer.writeString('10');
locautSoapSerializer.endElement;
//VK Brutto
locautSoapSerializer.startElement('eadavk');
locautSoapSerializer.writeString('11');
locautSoapSerializer.endElement;
//Gültig Ab Datum
locautSoapSerializer.startElement('abDatum');
locautSoapSerializer.writeString('20071001');
locautSoapSerializer.endElement;
locautSoapSerializer.endElement;
locautSoapSerializer.endElement;
locautSoapSerializer.endElement;
locautSoapSerializer.endBody;
Comments
I find that it's best to check out other Newsgroups and parts of the iNet (MSDN, Technet are good ones) to find solutions to errors with external controls.
Epimatic Corp.
http://www.epimatic.com
For the incomming Array:
XmlNode := SelectSingleNode('XYZ');
If XmlNode.hasChildNodes Then Begin
XmlNodeList := XmlNode.childNodes;
For X := 0 To XmlNodeList.length - 1 do
XmlNode1 := XmlNodeList(X);
….
end;
end;
For the outgoing data was it the correct code. The web services is case sensitive and I wrote "Item" instead of "item".
Since two Weeks I', looking for a good Book or artikel wich is explaning the MSXML.dll V5. can anyone give me a hint?
MrAbbey