apos update do svn erro no ACBrHTMLtoXML

[Rafael jorge]

Apos update no svn no dia 19/02/2018 tudo ok com a instalacao do svn.
so que quando eu vou copilar qualquer projeto que tem acbrnfe ele da pau no ACBrHTMLtoXML
nas linhas
107  NFe.Ide.cNF       := RetornarCodigoNumerico(NFe.infNFe.ID,NFe.infNFe.Versao);
erro de nao achar a rotina RetornarCodigoNumerico

123  NFe.Ide.modelo        := StrToInt(copy(SomenteNumeros(NFe.infNFe.ID), 21, 2));
erro da rotina SomenteNumeros nao localizada

124  NFe.Ide.serie         := StrToInt(copy(SomenteNumeros(NFe.infNFe.ID), 23, 3));
mesmo erro.

[Rafael jorge]

desculpe. projeto com acbrnfe nao. com o recupera xml

[Juliomar Marchetti]

Bom dia

essa unit não faz parte do projeto acbr

[Rigotti]

Boa tarde, dá uma olhada:

 

[Elizeu]

so coloque a função no inicio da unit

 

function RetornarCodigoNumerico(Chave: string; Versao: real): integer;
begin
  chave := OnlyNumber(chave);
  if versao < 2 then
     result := StrToInt(copy(chave, 35, 9))
  else
     result := StrToInt(copy(chave, 36, 8));
end;