Erro ACBrNFSeX1.ConsultarLoteRps(Protocolo, NumeroLote);

[Rogério Xavier]

Saudações a todos,

estou com problema ao ler o retorno de um RPS enviado. Quando tenta ler a data da competência, através da function LerDatas que está na unit ACBrXmlBase, está sendo passado como parâmetro o valor 20220120 (a data original é 20/01/2022) e dentro da função vai para linha 454 que tem o seguinte conteúdo:

 

        Result := EncodeDate(StrToInt(copy(xData, 7, 4)),
                             StrToInt(copy(xData, 4, 2)),
                             StrToInt(copy(xData, 1, 2)));

 

e aí da o erro "Project xxxx.exe raised exception class EConvertError with message 'Invalid argument to date encode'."

Debugando, vi que tenta converter para a data 20/20/20,

 

esta é a parte do xml onde consta a data

 

 

-<Rps xmlns="http://www.abrasf.org.br/nfse.xsd">
-<InfDeclaracaoPrestacaoServico Id="Dec_6671">
-<Rps>
-<IdentificacaoRps>

<Numero>667</Numero>

<Serie>1</Serie>

<Tipo>1</Tipo>

</IdentificacaoRps>

<DataEmissao>2022-01-20</DataEmissao>

<Status>1</Status>

</Rps>

<Competencia>2022-01-20</Competencia>
-<Servico>

 

 

Alguém já passou por este problema?

[Italo Giurizzato Junior]

Bom dia Rogério,

Ao debugar qual é o conteúdo da variável xData da função LerDatas ?

O XML que você esta lendo é da NFS-e ou Rps?

Qual é o provedor?

Esta com todos os fontes de todas as pastas atualizados?

[Rogério Xavier]

Bom dia Ítalo,

 

o valor da xData é 20220120

o xml é do RPS

o provedor é SigCorp

 

Atualizei os fontes esta semana, até então utilizava o componente antigo de NFSe, com a atualização migrei para o NFSeX.

 

[Italo Giurizzato Junior]

Rogério,

Já inclui na minha lista de tarefas. TK-2294

[Italo Giurizzato Junior]

Boa tarde Rogério,

Favor atualizar os fontes e faça novos testes.

[Rogério Xavier]

Boa tarde Ítalo,

 

tenho que atualizar tudo?

[Italo Giurizzato Junior]

Rogério,

Sim, sempre atualize todos os fontes de todas as pastas e reinstale o ACBr.

[Rogério Xavier]

Boa noite Ítalo,

agora deu certo, muito obrigado

[Italo Giurizzato Junior]

Obrigado por reportar.

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