Xbase++

Find XML Element where Attribute = Value

See more XML Examples

Finds an XML element at a particular location where an attribute has a specified value. Xbase++

LOCAL nSuccess
LOCAL oXml
LOCAL cNotUsed

nSuccess := 0

//  We have the following XML and wish to find the value of the time attribute where msg = "alert-from".

//  <cdr id="4e5d3e7f41bf6201ad81000c29703270" e164="6207">
//      <user>
//          <grp name="wfln" mode="active"/>
//      </user>
//      <event msg="setup-to" time="287069" e164="5034"/>
//      <event msg="alert-from" time="287069" e164="5034"/>
//      <event msg="rel-to" time="287079" e164="5034"/>
//  </cdr>

//  First, build the above XML:

oXml := CreateObject("Chilkat.Xml")
oXml:Tag := "cdr"
oXml:AddAttribute("id", "4e5d3e7f41bf6201ad81000c29703270")
oXml:AddAttribute("e164", "6207")
oXml:UpdateAttrAt("user|grp", 1, "name", "wfln")
oXml:UpdateAttrAt("user|grp", 1, "mode", "active")
oXml:UpdateAttrAt("event", 1, "msg", "setup-to")
oXml:UpdateAttrAt("event", 1, "time", "287069")
oXml:UpdateAttrAt("event", 1, "e164", "5034")
oXml:UpdateAttrAt("event[1]", 1, "msg", "alert-from")
oXml:UpdateAttrAt("event[1]", 1, "time", "287069")
oXml:UpdateAttrAt("event[1]", 1, "e164", "5034")
oXml:UpdateAttrAt("event[2]", 1, "msg", "rel-to")
oXml:UpdateAttrAt("event[2]", 1, "time", "287079")
oXml:UpdateAttrAt("event[2]", 1, "e164", "5034")

//  Show that we have the above XML
? oXml:GetXml()

//  Find the element where msg = "alert-from"
//  This updates the xml object's reference to the found element (if successful).
cNotUsed := oXml:ChilkatPath("/A/event,msg,alert-from|$")
IF (oXml:LastMethodSuccess == 0)
    ? "Not found."
    oXml:destroy()
    RETURN
ENDIF

//  Get the value of the "time" attribute.
? "time = " + oXml:GetAttrValue("time")

//  Restore the xml object's internal reference to the root of the XML document
oXml:GetRoot2()

oXml:destroy()