load ./chilkat.dll
set xml [new_CkXml]
CkXml_put_Tag $xml "soapenv:Envelope"CkXml_AddAttribute $xml "xmlns:soapenv""http://schemas.xmlsoap.org/soap/envelope/"CkXml_AddAttribute $xml "xmlns""http://ws.pc.gif.com.br/"CkXml_AddAttribute $xml "xmlns:nfs""http://nfse.abrasf.org.br"CkXml_AddAttribute $xml "xmlns:ds""http://www.w3.org/2000/09/xmldsig#"CkXml_UpdateChildContent $xml "soapenv:Header"""CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe"1"versao""?"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|CNPJ""token string"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|chvAcessoNFS-e""string"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature"1"Id""?"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo"1"Id""?"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:CanonicalizationMethod"1"Algorithm""http://www.w3.org/TR/2001/REC-xml-c14n-20010315"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:SignatureMethod"1"Algorithm""http://www.w3.org/2000/09/xmldsig#rsa-sha1"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference"1"Id""?"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference"1"URI""?"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference"1"Type""?"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference|ds:Transforms|ds:Transform"1"Algorithm""?"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference|ds:Transforms|ds:Transform|ds:XPath""string"CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference|ds:DigestMethod"1"Algorithm""http://www.w3.org/2000/09/xmldsig#sha1"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignedInfo|ds:Reference|ds:DigestValue""BASE64_DATA"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:SignatureValue""..."CkXml_UpdateAttrAt $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:KeyInfo"1"Id""?"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:KeyInfo|ds:X509Data|ds:X509SubjectName""string"CkXml_UpdateChildContent $xml "soapenv:Body|obterNotaFiscalXmlRequest|pedidoNFSe|ds:Signature|ds:KeyInfo|ds:X509Data|ds:X509Certificate""BqozVXeZZg=="# In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required. CkXml_put_EmitXmlDecl $xml 0set soapRequestBody [CkXml_getXml $xml]
set endpoint "https://canoas-homol.infisc.com.br/services/nfse/ws/Servicos"set soapAction ""# For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"set contentType "text/xml"
set http [new_CkHttp]
CkHttp_ClearHeaders $http
CkHttp_SetRequestHeader $http "Content-Type" $contentType
CkHttp_SetRequestHeader $http "SOAPAction" $soapAction
# resp is a CkHttpResponseset resp [CkHttp_PostXml $http $endpoint $soapRequestBody "utf-8"]
if {[CkHttp_get_LastMethodSuccess $http] == 0} then {
puts [CkHttp_lastErrorText $http]
puts "Failed to send SOAP request."
delete_CkXml $xml
delete_CkHttp $http
exit
}
# Get the XML response body.
set responseXml [new_CkXml]
CkHttpResponse_GetBodyXml $resp $responseXml
set statusCode [CkHttpResponse_get_StatusCode $resp]
puts "response status code: $statusCode"
delete_CkHttpResponse $resp
# If the status code does not indicate succcess, then show the response XML,
# which probably contains error information.if {$statusCode != 200} then {
puts [CkXml_getXml $responseXml]
delete_CkXml $xml
delete_CkHttp $http
delete_CkXml $responseXml
exit
}
puts [CkXml_getXml $responseXml]
# Parse the successful SOAP response XML.# This is a sample of the response XML, but the namespace prefixes will be different.
# We can parse the result using "*" for the namespace prefixes (see below).set Envelope_xmlns [CkXml_getAttrValue $responseXml "xmlns"]
set resPedidoNFSe_versao [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|(versao)"]
set CNPJ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|CNPJ"]
set chvAcessoNFS_e [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|chvAcessoNFS-e"]
set dhRecbto [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|dhRecbto"]
set infNFSe_versao [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|(versao)"]
set cNFS_e [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|cNFS-e"]
set v_mod [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|mod"]
set serie [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|serie"]
set nNFS_e [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|nNFS-e"]
set dEmi [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|dEmi"]
set hEmi [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|hEmi"]
set tpNF [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|tpNF"]
set refNF [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|refNF"]
set tpImp [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|tpImp"]
set tpEmis [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|tpEmis"]
set cancelada [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|cancelada"]
set motCanc [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|motCanc"]
set dataCanc [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|dataCanc"]
set notaDebito [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|notaDebito"]
set notaSub [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|notaSub"]
set canhoto [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|canhoto"]
set ambienteEmi [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|ambienteEmi"]
set formaEmi [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|formaEmi"]
set empreitadaGlobal [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|empreitadaGlobal"]
set codRPS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|codRPS"]
set rps [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|rps"]
set serierps [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|serierps"]
set dataEmissaoRpsPapel [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|dataEmissaoRpsPapel"]
set enviarEmail [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|enviarEmail"]
set chaveAcessoSubstituida [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|Id|chaveAcessoSubstituida"]
set CNPJ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|CNPJ"]
set xNome [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|xNome"]
set xFant [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|xFant"]
set IM [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|IM"]
set xEmail [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|xEmail"]
set xSite [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|xSite"]
set xLgr [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|xLgr"]
set nro [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|nro"]
set xCpl [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|xCpl"]
set xBairro [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|xBairro"]
set cMun [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|cMun"]
set xMun [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|xMun"]
set UF [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|UF"]
set CEP [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|CEP"]
set cPais [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|cPais"]
set xPais [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|end|xPais"]
set fone [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|fone"]
set fone2 [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|fone2"]
set IE [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|IE"]
set regimeTrib [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|prest|regimeTrib"]
set CNPJ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|CNPJ"]
set xNome [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|xNome"]
set xLgr [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|xLgr"]
set nro [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|nro"]
set xCpl [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|xCpl"]
set xBairro [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|xBairro"]
set cMun [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|cMun"]
set xMun [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|xMun"]
set UF [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|UF"]
set CEP [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|CEP"]
set cPais [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|cPais"]
set xPais [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|ender|xPais"]
set xEmail [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|xEmail"]
set IE [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|IE"]
set IM [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|IM"]
set IME [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|IME"]
set fone [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|fone"]
set fone2 [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|TomS|fone2"]
set CNPJ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|intermediario|CNPJ"]
set xNome [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|intermediario|xNome"]
set IM [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|intermediario|IM"]
set cMun [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|intermediario|cMun"]
set xMun [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|intermediario|xMun"]
set UF [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|intermediario|UF"]
set protocoloObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|protocoloObra"]
set codigoVinculacao [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|codigoVinculacao"]
set xLogObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xLogObra"]
set xComplObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xComplObra"]
set vNumeroObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|vNumeroObra"]
set xBairroObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xBairroObra"]
set xCepObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xCepObra"]
set cCidadeObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|cCidadeObra"]
set xCidadeObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xCidadeObra"]
set xUfObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xUfObra"]
set cPaisObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|cPaisObra"]
set xPaisObra [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|xPaisObra"]
set numeroArt [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|numeroArt"]
set numeroCei [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|numeroCei"]
set numeroProj [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|numeroProj"]
set numeroMatri [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|dadosDaObra|numeroMatri"]
set xNomeTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xNomeTrans"]
set xCpfCnpjTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xCpfCnpjTrans"]
set xInscEstTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xInscEstTrans"]
set xPlacaTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xPlacaTrans"]
set xEndTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xEndTrans"]
set cMunTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|cMunTrans"]
set xMunTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xMunTrans"]
set xUfTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xUfTrans"]
set cPaisTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|cPaisTrans"]
set xPaisTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|xPaisTrans"]
set vTipoFreteTrans [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|transportadora|vTipoFreteTrans"]
set nItem [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|nItem"]
set cServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|cServ"]
set cLCServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|cLCServ"]
set xServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|xServ"]
set localTributacao [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|localTributacao"]
set localVerifResServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|localVerifResServ"]
set uTrib [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|uTrib"]
set qTrib [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|qTrib"]
set vUnit [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vUnit"]
set vServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vServ"]
set vDesc [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vDesc"]
set vDed [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vDed"]
set vBCISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vBCISS"]
set pISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|pISS"]
set vISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vISS"]
set vBCINSS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vBCINSS"]
set pRetINSS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|pRetINSS"]
set vRetINSS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRetINSS"]
set vRed [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRed"]
set vBCRetIR [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vBCRetIR"]
set pRetIR [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|pRetIR"]
set vRetIR [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRetIR"]
set vBCCOFINS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vBCCOFINS"]
set pRetCOFINS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|pRetCOFINS"]
set vRetCOFINS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRetCOFINS"]
set vBCCSLL [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vBCCSLL"]
set pRetCSLL [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|pRetCSLL"]
set vRetCSLL [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRetCSLL"]
set vBCPISPASEP [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vBCPISPASEP"]
set pRetPISPASEP [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|pRetPISPASEP"]
set vRetPISPASEP [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRetPISPASEP"]
set vRetOutrasRet [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|vRetOutrasRet"]
set totalAproxTribServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|totalAproxTribServ"]
set xPed [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|xPed"]
set nItemPed [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|serv|nItemPed"]
set vRedBCST [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|ISSST|vRedBCST"]
set vBCST [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|ISSST|vBCST"]
set pISSST [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|ISSST|pISSST"]
set vISSST [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|ISSST|vISSST"]
set xPlaca [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|estacionamento|xPlaca"]
set dDataInicial [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|estacionamento|dDataInicial"]
set hHoraInicial [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|estacionamento|hHoraInicial"]
set dDataFinal [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|estacionamento|dDataFinal"]
set hHoraFinal [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|estacionamento|hHoraFinal"]
set unidade [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|hospedagem|unidade"]
set qtdHospede [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|hospedagem|qtdHospede"]
set dDataEntrada [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|hospedagem|dDataEntrada"]
set hHoraEntrada [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|hospedagem|hHoraEntrada"]
set dDataSaida [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|hospedagem|dDataSaida"]
set hHoraSaida [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|hospedagem|hHoraSaida"]
set nome [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|dependente|nome"]
set cpf [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|dependente|cpf"]
set dataNascimento [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|dependente|dataNascimento"]
set nome [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|evento|nome"]
set tipo [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|evento|tipo"]
set dataInicioEvento [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|evento|dataInicioEvento"]
set dataFimEvento [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|det|evento|dataFimEvento"]
set nItemDesp [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|despesas|despesa|nItemDesp"]
set xDesp [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|despesas|despesa|xDesp"]
set dDesp [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|despesas|despesa|dDesp"]
set vDesp [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|despesas|despesa|vDesp"]
set nItem [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|nItem"]
set numeroTitulo [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|numeroTitulo"]
set descricao [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|descricao"]
set unidade [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|unidade"]
set quantidade [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|quantidade"]
set vRetencao [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|vRetencao"]
set vRepasseTerceiros [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|vRepasseTerceiros"]
set vDesc [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|vDesc"]
set vTotal [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|vTotal"]
set vLiq [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|vLiq"]
set tipoPagamento [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|tipoPagamento"]
set numeroLote [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|numeroLote"]
set codigoReembolso [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|codigoReembolso"]
set dataPagamento [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|reembolso|dataPagamento"]
set vServ [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vServ"]
set vReemb [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vReemb"]
set vRedBCCivil [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vRedBCCivil"]
set vDesc [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vDesc"]
set vDescCondicional [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vDescCondicional"]
set vDescICMS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vDescICMS"]
set vtDed [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vtDed"]
set vtNF [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vtNF"]
set vtLiq [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vtLiq"]
set totalAproxTrib [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|totalAproxTrib"]
set vRetIR [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|Ret|vRetIR"]
set vRetPISPASEP [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|Ret|vRetPISPASEP"]
set vRetCOFINS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|Ret|vRetCOFINS"]
set vRetCSLL [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|Ret|vRetCSLL"]
set vRetINSS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|Ret|vRetINSS"]
set vRetOutrasRet [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|Ret|vRetOutrasRet"]
set vtLiqFaturas [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vtLiqFaturas"]
set vtDespesas [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|vtDespesas"]
set vBCISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|ISS|vBCISS"]
set vISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|ISS|vISS"]
set vBCSTISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|ISS|vBCSTISS"]
set vSTISS [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|total|ISS|vSTISS"]
set nItem [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|faturas|fat|nItem"]
set nFat [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|faturas|fat|nFat"]
set dVenc [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|faturas|fat|dVenc"]
set vFat [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|faturas|fat|vFat"]
set tipoVencFat [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|faturas|fat|tipoVencFat"]
set descTipoVencFat [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|faturas|fat|descTipoVencFat"]
set infAdicLT [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|infAdicLT"]
set infAdicES [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|infAdicES"]
set infAdic [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|infAdic"]
set infAdicAT [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|infAdicAT"]
set NumVeiculo [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|NFS-e|infNFSe|NumVeiculo"]
set sit [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|sit"]
set mot [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|mot"]
set Signature_Id [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|(Id)"]
set SignedInfo_Id [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|(Id)"]
set CanonicalizationMethod_Algorithm [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:CanonicalizationMethod|(Algorithm)"]
set SignatureMethod_Algorithm [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:SignatureMethod|(Algorithm)"]
set Reference_Id [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|(Id)"]
set Reference_URI [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|(URI)"]
set Reference_Type [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|(Type)"]
set Transform_Algorithm [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|*:Transforms|*:Transform|(Algorithm)"]
set XPath [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|*:Transforms|*:Transform|*:XPath"]
set DigestMethod_Algorithm [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|*:DigestMethod|(Algorithm)"]
set DigestValue [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignedInfo|*:Reference|*:DigestValue"]
set SignatureValue [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:SignatureValue"]
set KeyInfo_Id [CkXml_chilkatPath $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:KeyInfo|(Id)"]
set X509SubjectName [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:KeyInfo|*:X509Data|*:X509SubjectName"]
set X509Certificate [CkXml_getChildContent $responseXml "*:Body|obterNotaFiscalXmlResponse|resPedidoNFSe|*:Signature|*:KeyInfo|*:X509Data|*:X509Certificate"]
delete_CkXml $xml
delete_CkHttp $http
delete_CkXml $responseXml