(PowerBuilder) Remove an XML Subtree

Demonstrates how to remove an XML subtree from an XML document.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Xml
integer li_Success
oleobject loo_Xml2
string ls_NotUsed

loo_Xml = create oleobject
// Use "Chilkat_9_5_0.Xml" for versions of Chilkat < 10.0.0
li_rc = loo_Xml.ConnectToNewObject("Chilkat.Xml")
if li_rc < 0 then
    destroy loo_Xml
    MessageBox("Error","Connecting to COM object failed")
    return
end if

li_Success = loo_Xml.LoadXmlFile("qa_data/xml/osszes.xml")

// The XML file we're loading contains this:

// <?xml version="1.0" encoding="iso-8859-2" ?>
// <EXAMPLE>
//     <OSSZES>
//         <ROW TYPE="INS">477953
//             <NUMBER>05107003972</NUMBER>
//         </ROW>
//         <ROW TYPE="INS">477954
//             <NUMBER>05107001342</NUMBER>
//         </ROW>
//         <ROW TYPE="INS">477955
//             <NUMBER>05107001342</NUMBER>
//         </ROW>
//         <ROW TYPE="INS">477956
//             <NUMBER>05107000017</NUMBER>
//         </ROW>**
//         <ROW TYPE="INS">477957
//             <NUMBER>05107002182</NUMBER>
//         </ROW>
//     </OSSZES>
// </EXAMPLE>
// 

// We wish to remove this subtree:

// <ROW TYPE="INS">477956
//     <NUMBER>05107000017</NUMBER>
// </ROW>

// Get another reference to the XML document.
loo_Xml2 = loo_Xml.GetSelf()

// Navigate to the node that is the root of the subtree to be deleted.
// In this case, we wish to find the node having tag "ROW" with content "477956"
ls_NotUsed = loo_Xml2.ChilkatPath("OSSZES|/C/ROW,*477956*|$")

// Examine the xml2, it should be just the subtree.
Write-Debug loo_Xml2.GetXml()

// Now detach xml2 from the it's XML document.
// xml2 will now be it's own XML document.
loo_Xml2.RemoveFromTree()

// Examine our original XML document.  The subtree is removed:
Write-Debug loo_Xml.GetXml()

destroy loo_Xml2


destroy loo_Xml