Formatarcnpjcpf

[agssoftware]

alguem consegue me passar onde fica esta arquivo ACBrFDUtil.pas .pois segundo o post abaixo ele resolve o problema de formatacao do cpf/cnpj no cte.

 

 

Postado 01 October 2013 - 06:44 PM

Achei o problema, na linha 721 do ACBrFDUtil.pas a variavel AValue estava indo com 18 quando estava fazendo o preview, ous seja estava indo formatada,

resolvi aumentando a condição para     if (Length(AValue) = 14)or(Length(AValue) = 18)then

quando sair uma solução melhor atualizo.

 

Obrigado.

 

class function DFeUtil.FormatarCNPJCPF(AValue: String): String;

begin

  if Length(AValue) = 0 then

     Result := AValue

  else

   begin

    if (Length(AValue) = 14)or(Length(AValue) = 18)then

     Result := FormatarCNPJ(AValue)

    else

     Result := FormatarCPF(AValue);

   end;

end;

• Curtir

• Quote
• MultiQuote
•  
•  

[Juliomar Marchetti]

Acabei de responder no outro local onde você postou criando duas vezes a pergunta

 

 

leia as regras do fórum e poste em um único local que alguém irá responder sem precisar ficar criando posts repetidos!

[agssoftware]

me desculpem por postar 2 vezes achei que tivesse postado em local errado. Me desculpe e muito obrigado pela ajuda