Erro(s): Código : X999 Mensagem: Erro de Conexão: Input is not proper UTF-8, indicate encoding ! Bytes: 0xE1 0x20 0x69 0x6E

[Antonio Paulo Mangili]

boa noite a todos estou recebendo esse erro ao enviar a RPS para o provedor Fiorilli. Mas isso esta acontecendo nessa RPS, pois já emitie varias e deu tudo certo

para esse mesmo provedor.

alguem poderia me dar uma ajuda por favor.

vou anexar os xml aqui

obrigado

69010716-env-lot-sinc.xml 69010716-env-lot-sinc-soap.xml 69010716-lista-nfse-sinc-soap.xml 3523020357163700012656000000000007093-rps.xml

[Italo Giurizzato Junior]

Bom dia Antonio,

Por favor verifique se na unit Fiorilli.Provider na function TratarXmlRetornado esta da seguinte forma:

function TACBrNFSeXWebserviceFiorilli200.TratarXmlRetornado(
  const aXML: string): string;
begin
  Result := inherited TratarXmlRetornado(aXML);

  if UTF8Decode(Result) = '' then
    Result := NativeStringToUTF8(Result);

  Result := StringReplace(Result, '
', '\s\n', [rfReplaceAll]);
  Result := StringReplace(Result, ''#$A'', '\s\n', [rfReplaceAll]);
  Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf});
  Result := RemoverPrefixosDesnecessarios(Result);
  Result := RemoverCaracteresDesnecessarios(Result);
  Result := StringReplace(Result, '&', '&', [rfReplaceAll]);
end;

Se não estiver, favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e certifique que agora esta.

Por fim repita os testes.

[Antonio Paulo Mangili]

15 minutos atrás, Italo Giurizzato Junior disse:

Bom dia Antonio,

Por favor verifique se na unit Fiorilli.Provider na function TratarXmlRetornado esta da seguinte forma:

function TACBrNFSeXWebserviceFiorilli200.TratarXmlRetornado(
  const aXML: string): string;
begin
  Result := inherited TratarXmlRetornado(aXML);

  if UTF8Decode(Result) = '' then
    Result := NativeStringToUTF8(Result);

  Result := StringReplace(Result, '
', '\s\n', [rfReplaceAll]);
  Result := StringReplace(Result, ''#$A'', '\s\n', [rfReplaceAll]);
  Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf});
  Result := RemoverPrefixosDesnecessarios(Result);
  Result := RemoverCaracteresDesnecessarios(Result);
  Result := StringReplace(Result, '&', '&', [rfReplaceAll]);
end;

Se não estiver, favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e certifique que agora esta.

Por fim repita os testes.

bom dia

em meu arquivo esta assim:

function TACBrNFSeXWebserviceFiorilli200.TratarXmlRetornado(
  const aXML: string): string;
begin
  Result := inherited TratarXmlRetornado(aXML);

  if UTF8Decode(Result) = '' then
    Result := NativeStringToUTF8(Result);

  Result := StringReplace(Result, '
', '\s\n', [rfReplaceAll]);
  Result := StringReplace(Result, ''#$A'', '\s\n', [rfReplaceAll]);
  Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf});
  Result := RemoverPrefixosDesnecessarios(Result);
  Result := RemoverCaracteresDesnecessarios(Result);
  Result := StringReplace(Result, '&', '&', [rfReplaceAll]);
end;

 

esta igual ao que vc me passou

 

[Antonio Paulo Mangili]

realizei o atualização novamente, reinstalei o abcr removendo os arquivos. e fiz os teste e continua o mesmo problema

vou anexar arqui os arquivos

 

obrigado

 

34437631-env-lot-sinc.xml 34437631-env-lot-sinc-soap.xml 34437631-lista-nfse-sinc-soap.xml 3523030357163700012656000000000007100-rps.xml

[Antonio Paulo Mangili]

o que é estranho é que é algumas rps, e algumas dão certo. hoje mesmo já tirei varias e quando do nada da esse erro em uma e não vai

 

[Antonio Paulo Mangili]

Olha só. o que esta acontecendo. quando dá esse erro a prefeitura esta processando e acatando a nota.

mas no retorno da nota para o sistema dá esse erro. eu descobri porque fui no site e a nota que estava dando erro estava lá. ai eu peguei o XML direto da prefeitura e gerei o PDF, e sai com alguns caracteres estranho mesmo, na leitura do XML. vou anexar aqui.

 

 

3523030357163700012656000000000008022-nfse.pdf NFSe8022.xml

me parece que é quando o componente vai tratar o arquivo de retorno do provedor

[Italo Giurizzato Junior]

Boa tarde Antonio,

Comente as linhas:

  if UTF8Decode(Result) = '' then
    Result := NativeStringToUTF8(Result);

Reinstale o ACBr e faça novos testes.

[Antonio Paulo Mangili]

1 minuto atrás, Italo Giurizzato Junior disse:

Boa tarde Antonio,

Comente as linhas:

  if UTF8Decode(Result) = '' then
    Result := NativeStringToUTF8(Result);

Reinstale o ACBr e faça novos testes.

isso esta no svn, ou vou fazer em meu repositorio da minha maquina????

[Antonio Paulo Mangili]

comentei, reinstalei e deu o mesmo erro:

Erro(s):
Código  : X999
Mensagem: Erro de Conexão: Input is not proper UTF-8, indicate encoding !
Bytes: 0xE1 0x20 0x69 0x6E

Correção: 
---------

segue anexo os XML

 

48667066-env-lot-sinc.xml 48667066-env-lot-sinc-soap.xml 48667066-lista-nfse-sinc-soap.xml 3523030357163700012656000000000007100-rps.xml

[Italo Giurizzato Junior]

Antonio,

Comente somente o IF deixa ele executar o NativeStringToUTF8.

[Antonio Paulo Mangili]

11 minutos atrás, Italo Giurizzato Junior disse:

Antonio,

Comente somente o IF deixa ele executar o NativeStringToUTF8.

tendi. vou fazer

 

[Antonio Paulo Mangili]

Italo boa noite fazendo isso que vc sugeriu de comentar somente o IF deu certo.

Voce vai enviar isso ao SVN, para um update e reinstalarão do acbr??

obrigado

Paulinho

[Italo Giurizzato Junior]

Bom dia Paulo,

Já esta no SVN.

[Antonio Paulo Mangili]

7 minutos atrás, Italo Giurizzato Junior disse:

Bom dia Paulo,

Já esta no SVN.

ok obrigado. poderia fechar o topico por favor

[Diego Foliene]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.