Erro Xml Tag Outrasinformacoes Nfse

[Sulsoftware]

Bom dia pessoal,

 

Estou com erro na gravação do XML da NFS-e. Verifiquei que o XML é gravado na tag OutrasInformacoes desta maneira:

 

<OutrasInformacoes><br></OutrasInformacoes>

 

e no XML gravado pelo site da prefeitura (é utilizado o provedor IssNet) grava assim:

 

<OutrasInformacoes>&lt;br&gt;<OutrasInformacoes>

 

Ocorre que o browser não consegue abrir o XML errado.

 

Alguém teria uma luz ??

 

abraço a todos!!

 

Denis Monteiro

 

 

 

 

18-nfse.xml

18-nfse.xml

[Leonardo Gregianin]

O xml é retornado assim: <OutrasInformacoes>&lt;br&gt;<OutrasInformacoes>, porém antes de gravar o arquivo o ACBr utiliza a função "ParseText" que fica dentro do ACBrUtil que faz a conversão de "&lt;" para "<" e "&gt;" para ">" o que parece ser o certo.

 

Neste caso acho que é o provedor issnet que não deveria retornar informação nenhuma.
 

[Sulsoftware]

Olá lvr, grato pelo retorno...

 

mas será que altero no ACBr ou tento entrar em contato com o IssNet ?

 

T+

[Leonardo Gregianin]

O ideal seria algum administrador do ACBr te responder, também tenho algumas perguntas sem respostas...

 

Eu fiz da forma abaixo, se o campo só tem <br> então eu limpo a tag.

if ACBrNFSe1.NotasFiscais.Items[0].NFSe.OutrasInformacoes = '<br>' then
 ACBrNFSe1.NotasFiscais.Items[0].NFSe.OutrasInformacoes := '';

[Sulsoftware]

em qual procedure você colocou esta verificação ?? 

[Leonardo Gregianin]

No meu sistema, antes de imprimir ou carregar o xml para o TWebBrowser.

[Sulsoftware]

ok, valeu a força!!!

abraço!!

[Rafael Müler]

Acabei passando por esse mesmo problema com o provedor ISSNet, e mesmo tentando falar para eles que retornava um valor incorreto no xml (&lt;br&gt;) não alteraram nada, e meus clientes começaram a me pressionar para resolver, pois quem recebia o xml não conseguia abrir ele pela má formatação. Então fiz uma alteração na Unit ACBRNFSeWebService para tratar isso e limpar antes de salvar o xml:

if FProvedor = proISSNet then
  FRetNfse := AnsiString(StringReplace(String(NFSeRetorno.ListaNfse.CompNfse.Items[iNFRetorno].Nfse.XML), '<br>', '', [rfReplaceAll]))
else
  FRetNfse := ParseText(NFSeRetorno.ListaNfse.CompNfse.Items[iNFRetorno].Nfse.XML);

Acredito que isso resolveria esse problema. Em anexo a unit alterada

ACBrNFSeWebServices.pas

Editado 28 Agosto, 2014 por Rafael Müler

[Italo Giurizzato Junior]

Boa tarde Rafael,

 

Muito obrigado pela colaboração, já esta disponível.