Código Numérico Invalido, Chave não Gerada

[Ailton Branco]

Migrei minha aplicação do delphi 2010 para XE10.3, atualizei os componentes ACBr mas na hora de validar a nota fiscal (Que estava Funcionando) gerou um erro que não consegui entender.

Código Numérico Invalido, Chave não Gerada

na linha 165 da unit ACBrDFeUtil sendo que está chegando na variavel ACodigo e  ANumero  Está chegando o numero da nota fiscal "Que no meu caso e 58220"  

Empresa de MS e Cliente de MS

 

function GerarChaveAcesso(AUF: Integer; ADataEmissao: TDateTime; const ACNPJ: String;
                          ASerie, ANumero, AtpEmi, ACodigo: Integer; AModelo: Integer): String;
var
  vUF, vDataEmissao, vSerie, vNumero, vCodigo, vModelo, vCNPJ, vtpEmi: String;
begin
  // Se o usuario informar um código maior que zero validar o mesmo //
  if ACodigo > 0 then
    if not ValidarCodigoDFe(ACodigo, ANumero) then
      raise EACBrDFeException.Create('Código Numérico inválido, Chave não Gerada');

  // Se o usuario informar um código inferior ou igual a -2 a chave não será gerada //
  if ACodigo <= -2 then
    raise EACBrDFeException.Create('Código Numérico inválido, Chave não Gerada');

 

...

 

[Gr@c@]

Veja como está carregando o XML para o componente

NotasFiscais.LoadFromFile(<xml>, True) <--- com True pode dar o erro

Experimente colocar NotasFiscais.LoadFromFile(xml) que já passa False como parâmetro

[Italo Giurizzato Junior]

Boa noite Ailton,

Por favor leia essa noticia: Código numerico invalido, chave não gerada.

[Ailton Branco]

exatamente, foi perfeito, obrigado

[Juliana Tamizou]

Obrigado por reportar.

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