Lua
Lua
Move XML Subtree to Another XML Document
Demonstrates using the InsertChildTreeBefore method to move a fragment of XML from one document to another.Chilkat Lua Downloads
local chilkat = require("chilkat")
-- Source XML is this:
-- <?xml version='1.0' encoding='UTF-8'?>
-- <soapenv:Envelope xmlns:"soapenv="http://schemas.xmlsoap.org/soap/envelope/">
-- <soapenv:Header/>
-- <soapenv:Body>
-- <GetCustomerResponse xmlns="http://www.midoco.de/crm" xmlns:tns="http://www.midoco.de/ws">
-- <CrmCustomer addresseeLine1="Max Mustermann" addresseeLine2="" changingUser="123456" >
-- <CrmAddress addressId="2225355" addressTypeId="1" checkStatus="O" city="Wien" countryCode="AT" customerId="000071"/>
-- <CrmPerson birthDay="30" birthMonth="8" birthYear="1977" birthday="1977-08-30T00:00:00.000+02:00" birthdayNotProvided="false"/>
-- </CrmCustomer>
-- </GetCustomerResponse>
-- </soapenv:Body>
-- </soapenv:Envelope>
-- Build the source XML.
local srcXml = chilkat.Xml.new()
srcXml.tag = "soapenv:Envelope"
srcXml:add_attribute("xmlns:soapenv", "http://schemas.xmlsoap.org/soap/envelope/")
srcXml:update_child_content("soapenv:Header", "")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse", true, "xmlns", "http://www.midoco.de/crm")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse", true, "xmlns:tns", "http://www.midoco.de/ws")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer", true, "addresseeLine1", "Max Mustermann")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer", true, "addresseeLine2", "")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer", true, "changingUser", "123456")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress", true, "addressId", "2225355")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress", true, "addressTypeId", "1")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress", true, "checkStatus", "O")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress", true, "city", "Wien")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress", true, "countryCode", "AT")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress", true, "customerId", "000071")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson", true, "birthDay", "30")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson", true, "birthMonth", "8")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson", true, "birthYear", "1977")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson", true, "birthday", "1977-08-30T00:00:00.000+02:00")
srcXml:update_attr_at("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson", true, "birthdayNotProvided", "false")
-- Destination XML is this:
-- <?xml version="1.0" encoding="utf-8"?>
-- <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
-- <SOAP-ENV:Header>
-- <m:Credentials xmlns:m="http://www.midoco.de/system">
-- <m:Login>User</m:Login>
-- <m:Password>Pass</m:Password>
-- <m:OrgUnit>ABC</m:OrgUnit>
-- <m:Locale>de_DE</m:Locale>
-- </m:MidocoCredentials>
-- </SOAP-ENV:Header>
-- <SOAP-ENV:Body>
-- <SaveCustomerRequest>
-- </SaveCustomerRequest>
-- </SOAP-ENV:Body>
-- </SOAP-ENV:Envelope>
local destXml = chilkat.Xml.new()
destXml.tag = "SOAP-ENV:Envelope"
destXml:add_attribute("xmlns:SOAP-ENV", "http://schemas.xmlsoap.org/soap/envelope/")
destXml:add_attribute("xmlns:SOAP-ENC", "http://schemas.xmlsoap.org/soap/encoding/")
destXml:add_attribute("xmlns:xsi", "http://www.w3.org/2001/XMLSchema-instance")
destXml:add_attribute("xmlns:xsd", "http://www.w3.org/2001/XMLSchema")
destXml:update_attr_at("SOAP-ENV:Header|m:Credentials", true, "xmlns:m", "http://www.midoco.de/system")
destXml:update_child_content("SOAP-ENV:Header|m:Credentials|m:Login", "User")
destXml:update_child_content("SOAP-ENV:Header|m:Credentials|m:Password", "Pass")
destXml:update_child_content("SOAP-ENV:Header|m:Credentials|m:OrgUnit", "ABC")
destXml:update_child_content("SOAP-ENV:Header|m:Credentials|m:Locale", "de_DE")
destXml:update_child_content("SOAP-ENV:Body|SaveCustomerRequest", "")
-- We want to move the "CrmCustomer" subtree in the source XML to inside the "SaveCustomerRequest" element in the destination.
-- Navigate to CrmCustomer
local crmCust = srcXml:find_child("soapenv:Body|GetCustomerResponse|CrmCustomer")
if not srcXml.last_method_success then
print("Failed to find CrmCustomer element.")
return
end
-- Navigate to SaveCustomerRequest
local crmSaveCust = destXml:find_child("SOAP-ENV:Body|SaveCustomerRequest")
if not destXml.last_method_success then
print("Failed to find SaveCustomerRequest element.")
return
end
-- Move CrmCustomer tree to SaveCustomerRequest.
crmSaveCust:insert_child_tree_before(0, crmCust)
-- Look at the resulting destXml. You can see the CrmCustomer subtree moved to underneath SaveCustomerRequest.
print(destXml:get_xml())
-- <?xml version="1.0" encoding="utf-8"?>
-- <SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
-- <SOAP-ENV:Header>
-- <m:Credentials xmlns:m="http://www.midoco.de/system">
-- <m:Login>User</m:Login>
-- <m:Password>Pass</m:Password>
-- <m:OrgUnit>ABC</m:OrgUnit>
-- <m:Locale>de_DE</m:Locale>
-- </m:Credentials>
-- </SOAP-ENV:Header>
-- <SOAP-ENV:Body>
-- <SaveCustomerRequest>
-- <CrmCustomer addresseeLine1="Max Mustermann" addresseeLine2="" changingUser="123456">
-- <CrmAddress addressId="2225355" addressTypeId="1" checkStatus="O" city="Wien" countryCode="AT" customerId="000071"/>
-- <CrmPerson birthDay="30" birthMonth="8" birthYear="1977" birthday="1977-08-30T00:00:00.000+02:00" birthdayNotProvided="false"/>
-- </CrmCustomer>
-- </SaveCustomerRequest>
-- </SOAP-ENV:Body>
-- </SOAP-ENV:Envelope>
-- Look at the resulting srcXml. The CrmCustomer subtree was removed.
print(srcXml:get_xml())
-- <?xml version="1.0" encoding="utf-8"?>
-- <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
-- <soapenv:Header/>
-- <soapenv:Body>
-- <GetCustomerResponse xmlns="http://www.midoco.de/crm" xmlns:tns="http://www.midoco.de/ws"/>
-- </soapenv:Body>
-- </soapenv:Envelope>