Erro: "input is not proper utf-8" ao carregar xml do provedor BHISS em Homologação

Tiago Ropke · 2 Maio, 2022

Na hora de carregar um XML (ACBrNFSe1.NotasFiscais.LoadFromFile) emitido com sucesso em homologação no Provedor BHISS Porto Alegre dá o erro: "input is not proper utf-8". O erro acontece porque em homologação o xml retornado vem com a seuginte tag preenchida assim:

Citar

<OutrasInformacoes>NFS-e gerada em ambiente de teste. NÃO TEM VALOR JURÍDICO NEM FISCAL.</OutrasInformacoes>

Se retirar o acento dessas palavras o carregamento funciona.

Fiz a seguinte alteração na unit BHISS.LerXml de

Citar

function TNFSeR_BHISS.NormatizarXml(const aXml: string): string;
begin
Result := StringReplace(aXml, '&>', ' ', [rfReplaceAll]);
end;

para:

Citar

function TNFSeR_BHISS.NormatizarXml(const aXml: string): string;
begin
Result := StringReplace(aXml, '&>', ' ', [rfReplaceAll]);
Result := TiraAcentos(Result);
end;

Fiz essa alteração e funcionou. Acho que pode ser um jeito de resolver esse problema.