Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Visual FoxPro) Move XML Subtree to Another XML DocumentDemonstrates using the InsertChildTreeBefore method to move a fragment of XML from one document to another.
LOCAL loSrcXml LOCAL loDestXml LOCAL loCrmCust LOCAL loCrmSaveCust * 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. * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Xml') loSrcXml = CreateObject('Chilkat.Xml') loSrcXml.Tag = "soapenv:Envelope" loSrcXml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/") loSrcXml.UpdateChildContent("soapenv:Header","") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse",1,"xmlns","http://www.midoco.de/crm") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse",1,"xmlns:tns","http://www.midoco.de/ws") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer",1,"addresseeLine1","Max Mustermann") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer",1,"addresseeLine2","") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer",1,"changingUser","123456") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress",1,"addressId","2225355") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress",1,"addressTypeId","1") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress",1,"checkStatus","O") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress",1,"city","Wien") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress",1,"countryCode","AT") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmAddress",1,"customerId","000071") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson",1,"birthDay","30") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson",1,"birthMonth","8") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson",1,"birthYear","1977") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson",1,"birthday","1977-08-30T00:00:00.000+02:00") loSrcXml.UpdateAttrAt("soapenv:Body|GetCustomerResponse|CrmCustomer|CrmPerson",1,"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> * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Xml') loDestXml = CreateObject('Chilkat.Xml') loDestXml.Tag = "SOAP-ENV:Envelope" loDestXml.AddAttribute("xmlns:SOAP-ENV","http://schemas.xmlsoap.org/soap/envelope/") loDestXml.AddAttribute("xmlns:SOAP-ENC","http://schemas.xmlsoap.org/soap/encoding/") loDestXml.AddAttribute("xmlns:xsi","http://www.w3.org/2001/XMLSchema-instance") loDestXml.AddAttribute("xmlns:xsd","http://www.w3.org/2001/XMLSchema") loDestXml.UpdateAttrAt("SOAP-ENV:Header|m:Credentials",1,"xmlns:m","http://www.midoco.de/system") loDestXml.UpdateChildContent("SOAP-ENV:Header|m:Credentials|m:Login","User") loDestXml.UpdateChildContent("SOAP-ENV:Header|m:Credentials|m:Password","Pass") loDestXml.UpdateChildContent("SOAP-ENV:Header|m:Credentials|m:OrgUnit","ABC") loDestXml.UpdateChildContent("SOAP-ENV:Header|m:Credentials|m:Locale","de_DE") loDestXml.UpdateChildContent("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 loCrmCust = loSrcXml.FindChild("soapenv:Body|GetCustomerResponse|CrmCustomer") IF (loSrcXml.LastMethodSuccess <> 1) THEN ? "Failed to find CrmCustomer element." RELEASE loSrcXml RELEASE loDestXml CANCEL ENDIF * Navigate to SaveCustomerRequest loCrmSaveCust = loDestXml.FindChild("SOAP-ENV:Body|SaveCustomerRequest") IF (loDestXml.LastMethodSuccess <> 1) THEN ? "Failed to find SaveCustomerRequest element." RELEASE loSrcXml RELEASE loDestXml CANCEL ENDIF * Move CrmCustomer tree to SaveCustomerRequest. loCrmSaveCust.InsertChildTreeBefore(0,loCrmCust) RELEASE loCrmCust RELEASE loCrmSaveCust * Look at the resulting destXml. You can see the CrmCustomer subtree moved to underneath SaveCustomerRequest. ? loDestXml.GetXml() * <?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. ? loSrcXml.GetXml() * <?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> RELEASE loSrcXml RELEASE loDestXml |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.