PowerBuilder

HasChildWithTag using a Tag Path

Demonstrates calling HasChildWithTag with a tag path. PowerBuilder

integer li_rc
oleobject loo_Xml
integer li_HasChicago
integer li_HasNaperville
integer li_HasIllinois

loo_Xml = create oleobject
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

loo_Xml.Tag = "world"

loo_Xml.NewChild2("north_america|united_states|california|san_francisco","Silicon Valley")
loo_Xml.NewChild2("north_america|united_states|california|san_diego","Birthplace of California")
loo_Xml.NewChild2("north_america|united_states|illinois|chicago","Windy City")

Write-Debug loo_Xml.GetXml()

// Produces the following XML
// 
// 	<?xml version="1.0" encoding="utf-8" ?>
// 	<world>
// 	    <north_america>
// 	        <united_states>
// 	            <california>
// 	                <san_francisco>Silicon Valley</san_francisco>
// 	                <san_diego>Birthplace of California</san_diego>
// 	            </california>
// 	            <illinois>
// 	                <chicago>Windy City</chicago>
// 	            </illinois>
// 	        </united_states>
// 	    </north_america>
// 	</world>
// 

li_HasChicago = loo_Xml.HasChildWithTag("north_america|united_states|illinois|chicago")
Write-Debug "hasChicago = " + string(li_HasChicago)

li_HasNaperville = loo_Xml.HasChildWithTag("north_america|united_states|illinois|naperville")
Write-Debug "hasNaperville = " + string(li_HasNaperville)

li_HasIllinois = loo_Xml.HasChildWithTag("north_america|united_states|illinois")
Write-Debug "hasIllinois = " + string(li_HasIllinois)


destroy loo_Xml