ValidarCodigoDFE

[Riquena]

Bom dia Amigos.

Atualizei os fontes e está com erro na AcbrDfeUtil. Está com chamada em uma função que segundo o comentário foi excluída;

function GerarCodigoDFe(AnDF: Integer): integer;
var
 ACodigo: Integer;
begin
  Repeat
    ACodigo := Random(99999999);
  Until ValidarCodigoDFe(ACodigo, AnDF);

  Result := ACodigo;
end;

Abraço;

 

[Riquena]

Erro meu. Fontes Parcialmente atualizados.

Obrigado.

[Felipe E. Resende Mesquita]

Obrigado por reportar.

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