xmlrpc::respond (private)

 xmlrpc::respond data

Defined in packages/xml-rpc/tcl/xml-rpc-procs.tcl

Format a success response to an XML-RPC request

Parameters:

data (required)

data to be returned to the client

Returns:

data encoded in a properly formed XML-RPC response

Testcases:

xml_rpc_respond

Source code:

    set result "<?xml version=\"1.0\"?><methodResponse><params><param><value>"
    append result [xmlrpc::construct {} $data]
    append result "</value></param></params></methodResponse>"

    # now re-parse and then re-extract to make sure it's well formed
    set doc [xml_parse -persist $result]
    if { [catch {xml_doc_render $doc} result] } {
        return -code error  "xmlrpc::respond XML is not well formed. err = $result"
    }
    xml_doc_free $doc
    return $result

XQL Not present:

Generic, PostgreSQL, Oracle