Erro no Exemplo da NFe2

[LeoSlander]

Erro na Unit1 de exemplo da NFe2

linha de codigo

linha 930

Documento := Trim(NotaUtil.LimpaNumero(Documento));

Não existe a função LimpaNumero

se alguem souber o solução agradeço

[Italo Giurizzato Junior]

Boa tarde LeoSlander,

Acrescente no uses a unit ACBrDFeUtil e altere a linha para:

Documento := Trim(DFeUtil.LimpaNumero(Documento));

[LeoSlander]

Boa tarde LeoSlander,

Acrescente no uses a unit ACBrDFeUtil e altere a linha para:

Documento := Trim(DFeUtil.LimpaNumero(Documento));

ok Italo deu certo. Obrigado.

[Leao]

no fonte \ACBrNFeUtil.pas

estava comentada a função

//   class function LimpaNumero(AValue: String): String;

 

descomentei e na mesma também

class function NotaUtil.LimpaNumero(AValue: String): String;
var
  A : Integer ;
begin
  Result := '' ;
  For A := 1 to length(AValue) do
  begin
    {$IFDEF DELPHI12_UP}
    if CharInSet(AValue[A], ['0'..'9']) then
    {$ELSE}
    if (AValue[A] in ['0'..'9']) then
    {$ENDIF}
       Result := Result + AValue[A];
  end ;
end;
 

agora estar funcionando...

 

Leão

[Juliomar Marchetti]

Jovem foi feito um reformulação nas units com funções semelhantes, tente ao invés de descomentar

adicionar na uses a unit ACBrDFeUtil

[Italo Giurizzato Junior]

Bom dia Juliomar,

 

Algumas pessoas ficam dias e as vezes meses sem realizar atualização, e quando o faz é só da pasta que tem o componente que utiliza.

E quando vai compilar ocorrem erros.

 

Se todos procurassem atualizar diariamente de forma geral ou seja, todos os fontes de todos os componentes, exemplos, pacotes de instalação, etc não teriamos esses tipos de postagem.

[Juliomar Marchetti]

Bom dia Italo

Sim já percebi isso, outras coisas que falta é quando ocorrem erros comuns eles verificarem o básico, exemplos: pastas estão todas marcadas com icone verde ou estão em conflito, mais de uma pasta com os fontes e o delphi apontando pra elas, ou apagar os bpls e recompilar os pacotes usando o ACBrInstall, ou ainda casos de bpls espalhados por pastas do sistema (system32, windows)

 

se fosse prestado mais atenção a esses pequenos detalhes já seria suficiente para resolver situações inusitadas que ocorrem

[Jéter Rabelo Ferreira]

Bom dia.

 

Devido ao grande número de alterações/modificações e correções pelos mais variados motivos, principalmente devido as mudanças e exigências da legislação, eu não instalo mais nenhum dos componentes ACBr em meu Delphi.

 

Conforme a necessidade, eu os crio dinamicamente e seto os eventos e etc, tudo via código, nada visual.

 

Zerei esse tipo de problema. Pois, assim que um fonte é alterado, eu dou um Build na minha aplicação e pronto.

 

Nada de conflitos de BPL's e outras "cositas mas". 

 

Atenciosamente.

Jéter Rabelo Ferreira

[Daniel Simoes]

Acho que isso é desnecessário.. se o usuário usar o ACBrInstall ele cuida de todo o build das BPLs