6. Juni 2018 08:29
lnetXmlDoc := lnetXmlDoc.XmlDocument();
lnetXmlDecl := lnetXmlDoc.CreateXmlDeclaration('1.0', 'UTF-8', '');
lnetXmlDoc.AppendChild(lnetXmlDecl);
lnetXmlElem1 := lnetXmlDoc.CreateElement('s', 'Envelope', 'http://schemas.xmlsoap.org/soap/envelope/');
lnetXmlDoc.AppendChild(lnetXmlElem1);
lnetXmlElem2 := lnetXmlDoc.CreateElement('s:Header');
lnetXmlElem1.AppendChild(lnetXmlElem2);
lnetXmlElem3 := lnetXmlDoc.CreateElement('Action');
lnetXmlElem3.SetAttribute('mustUnderstand', 'http://schemas.microsoft.com/ws/2005/05/addressing/none', '1');
lnetXmlElem3.InnerText := 'Test';
lnetXmlElem2.AppendChild(lnetXmlElem3);
6. Juni 2018 08:42
6. Juni 2018 12:00
lnetXmlDoc := lnetXmlDoc.XmlDocument();
lnetXmlDecl := lnetXmlDoc.CreateXmlDeclaration('1.0', 'UTF-8', '');
lnetXmlDoc.AppendChild(lnetXmlDecl);
lnetXmlElem1 := lnetXmlDoc.CreateElement('s', 'Envelope', 'http://schemas.xmlsoap.org/soap/envelope/');
lnetXmlDoc.AppendChild(lnetXmlElem1);
lnetXmlElem2 := lnetXmlDoc.CreateElement('s', 'Header', 'http://schemas.xmlsoap.org/soap/envelope/');
lnetXmlElem1.AppendChild(lnetXmlElem2);
lnetXmlElem3 := lnetXmlDoc.CreateElement('Action');
lnetXmlElem3.SetAttribute('mustUnderstand', 'http://schemas.xmlsoap.org/soap/envelope/', '1');
lnetXmlElem3.SetAttribute('xmlns', 'http://schemas.microsoft.com/ws/2005/05/addressing/none');
lnetXmlElem3.InnerText := 'http://pes-service.de/IEposInterface/GetEntities';
lnetXmlElem2.AppendChild(lnetXmlElem3);