CristiamAzambuja

Bom dia Leonardo, Sim é verdade, pensei nisso também. Porém vi que já é feito um tratamento através do método ParseText no recebimento do dados do Web Services e que na montagem do envelope soap a substituição dos caracteres "<" e ">" são feitos diretamente com o StringReplace naquele ponto. Minha ideia foi sugerir uma melhoria que manteria a abordagem do recebimento que já utiliza ParseText. []´s ____________________________ Cristiam Azambuja

Bom dia Jair, Também contornei o problema com uma solução parecida. Espero que eles resolvam o problema logo, pois realmente é muito chato conviver com ele.

Boa tarde! Ao enviar uma RPS para a prefeitura de Cachoeirinha/RS que tem como provedor Thema, recebi uma falha com a mensagem "Erro! Nao foi possivel converter os dados do XML enviado.". Depois de bater a cabeça tentando entender o que tinha dado errado, percebi que o motivo que estava levando ao problema era que o campo da Razão Social do Tomador tinha o caracter "&". Quando retirei para fazer um teste, a RPS foi processada com sucesso. Então sugiro aplicar um tratamento um pouquinho mais elaborado na montagem do Envelope SOAP dos métodos Web-Services. Exemplo: No método TProvedorThema.GeraEnvelopeRecepcionarLoteRPS temos: result := '<?xml version="1.0" encoding="UTF-8"?>' + '<S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/" ' + 'xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ' + 'xmlns:xsd="http://www.w3.org/2001/XMLSchema">' + '<S:Body>' + '<' + FMetodoRecepcionar + ' xmlns="' + URLNS + '">' + '<xml>' + '&lt;?xml version="1.0" encoding="UTF-8"?&gt;' + StringReplace(StringReplace(DadosMsg, '<', '&lt;', [rfReplaceAll]), '>', '&gt;', [rfReplaceAll]) + '</xml>' + '</' + FMetodoRecepcionar + '>' + '</S:Body>' + '</S:Envelope>'; Sugiro utilizar a função ACBrUtil.ParseText no lugar dos StringReplace, ficando assim: result := '<?xml version="1.0" encoding="UTF-8"?>' + '<S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/" ' + 'xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ' + 'xmlns:xsd="http://www.w3.org/2001/XMLSchema">' + '<S:Body>' + '<' + FMetodoRecepcionar + ' xmlns="' + URLNS + '">' + '<xml>' + '&lt;?xml version="1.0" encoding="UTF-8"?&gt;' + ParseText(DadosMsg, False) + '</xml>' + '</' + FMetodoRecepcionar + '>' + '</S:Body>' + '</S:Envelope>'; Com isso não haverá mais o problema dos "&" nos XML. Acredito que isso poderia se extender para todos os provedores, o que acham?

Boa tarde Jair! Também observei o problema das tags OptanteSimplesNacional e IncentivadorCultural virem zeradas. Depois de debugar bastante, conclui que o problema é com a prefeitura de Cachoeirinha/RS, ou melhor dizendo, com o provedor Thema. Entramos em contato com a prefeitura e pedimos para o Fiscal Fazendário abrir um chamado com a Thema para solução desse problema, pois apesar de enviarmos estas informações corretamente, na consulta do NFSe sempre vem errado estas flags pelo webservices de consulta, tanto pelo método consultarLoteRps e pelo consultarNfsePorRps.

Boa tarde!! Postei um tipo de solução, para o problema das mensagens em inglês do MSXML 5 no post Espero ter ajudado. ___________________________ Cristiam Silva Azambuja

Boa tarde!! Depois de pesquisar uma maneira de traduzir as mensagens de validação do XML, me deparei com um artigo que explica que o MSXML 5 foi lançado exclusivamente para o Office sendo a única versão com métodos para assinatura digital, distribuída a partir do Office 2003 até a versão 2007. Segue o artigo que explica: http://balaiotecnologico.blogspot.com.br/2012/07/assinando-documentos-xml-com-capicom-e.html). Então me ocorreu que em um Office em português essas DLLs do MSXML5 poderiam ser do mesmo idioma, e foi ai que eu me dei bem. Instalei um Office 2007 em Português e peguei a DLL "msxml5r.dll" (DLL de resource c/todas as mensagens) e deu certo. Só precisa desta, a outra eu mantive igual a que está no SVN, pois a versão era mais recente. Em anexo a DLL "msxml5r.dll". Espero ter ajudado. _____________________________ Cristiam Silva Azambuja msxml5r.7z msxml5r.7z

Passei por este problema quando eu havia esquecido de informar o CNPJ no componente antes de executar o download, como por exemplo: ACBrNFe.DownloadNFe.Download.CNPJ := 'xx.xxx.xxx/xxxx-xx'; ACBrNFe.DownloadNFe.Download.Chaves.Clear; ACBrNFe.DownloadNFe.Download.Chaves.Add; ACBrNFe.DownloadNFe.Download.Chaves.Items[ACBrNFe.DownloadNFe.Download.Chaves.Count-1].chNFe := 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx'; ACBrNFe.Download;