PureBasic

Handling Namespaces in XML Tags

See more XML Examples

Demonstrates new features added in Chilkat v9.5.0.77 for helping with namespace prefixed tags. PureBasic

IncludeFile "CkXml.pb"

Procedure ChilkatExample()

    ; First create some XML using namespace prefixed tags.

    ; Create this XML. 
    ; Use this online tool to generate the code from sample XML: 
    ; Generate Code to Create XML

    ; <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"
    ;    xmlns:scm="http://www.springcm.com/atlas/webservices/v201308/scm/">
    ;    <soapenv:Header/>
    ;    <soapenv:Body>
    ;       <scm:AccountGetCurrent>
    ;          <scm:token>123</scm:token>
    ;       </scm:AccountGetCurrent>
    ;    </soapenv:Body>
    ; </soapenv:Envelope>

    xml.i = CkXml::ckCreate()
    If xml.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkXml::setCkTag(xml, "soapenv:Envelope")
    CkXml::ckAddAttribute(xml,"xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
    CkXml::ckAddAttribute(xml,"xmlns:scm","http://www.springcm.com/atlas/webservices/v201308/scm/")
    CkXml::ckUpdateChildContent(xml,"soapenv:Header","")
    CkXml::ckUpdateChildContent(xml,"soapenv:Body|scm:AccountGetCurrent|scm:token","123")

    ; Go to the "Body" tag, regardless of namespace prefix.
    xmlBody.i = CkXml::ckFindChild(xml,"*:Body")
    If CkXml::ckLastMethodSuccess(xml) <> 1
        Debug "Body child not found."
        CkXml::ckDispose(xml)
        ProcedureReturn
    EndIf

    ; Get the full tag w/ namespace prefix:
    ; Output is "soapenv:Body"
    Debug CkXml::ckTag(xmlBody)

    ; Get the namespace prefix:
    ; Output is "soapenv"
    Debug CkXml::ckTagNsPrefix(xmlBody)

    ; Get the unprefixed tag:
    ; Output is "Body"
    Debug CkXml::ckTagUnprefixed(xmlBody)

    ; Check to see if the unprefixed tag equals "Body"
    isBodyTag.i = CkXml::ckTagUnpEquals(xmlBody,"Body")
    Debug "isBodyTag = " + Str(isBodyTag)

    ; Check to see if the namespace prefix equals "soapenv";
    isSoapenv.i = CkXml::ckTagNsEquals(xmlBody,"soapenv")
    Debug "isSoapenv = " + Str(isSoapenv)

    ; Change just the namespace prefix of the tag
    CkXml::setCkTagNsPrefix(xmlBody, "se")
    ; The tag has changed from "soapenv:Body" to "se:Body"
    Debug CkXml::ckTag(xmlBody)

    ; Change the unprefixed part of the tag.
    CkXml::setCkTagUnprefixed(xmlBody, "Bodie")
    ; The tag has changed from "se:Body" to "se:Bodie"
    Debug CkXml::ckTag(xmlBody)

    CkXml::ckDispose(xmlBody)



    CkXml::ckDispose(xml)


    ProcedureReturn
EndProcedure