Erro Na Impressão Cpf

[Ademir P. Voigt]

Bom dia a Todos!

 

Estou usando o ACBrNFeDANFeRL para impressão da danfe. Em anexo, tenho o print da visualização e da emissão com erro na mascara do CPF do destinatario. O que está aparecendo é a mascara do CNPJ e dai da uma truncada na informação.

 

Então, se for imprimir vai sair com o cpf com problemas, porem, se gerar o pdf sai formatado corretamente.

 

Em anexo arquivos para analise.

43141113795352000122550010000002821000002825-nfe.pdf

[André Ferreira de Moraes]

Onde está a mascara do CPF?

[Ademir P. Voigt]

Eu envio para o acbr CPF: 999.999.999-99 E CNPJ: 99.999.999/9999-99.

 

Pelo fato do PDf estar correto, pode ter algo na geração do preview.

 

Mas enfim, resolvi da seguinte forma:

 

Implementei uma função que remove os caracteres texto do documento e por hora está resolvido.

 

function SomenteNumeros(Texto: String): String;

var

  I: Integer;

  s: string;

begin

  s := '';

  for I := 1 To Length(Texto) Do

  begin

    if (Texto in ['0' .. '9']) then

    begin

      s := s + Copy(Texto, I, 1);

    end;

  end;

  result := s;

end;

 

Dest.CNPJCPF := SomenteNumeros(MyQrNFedest_cnpj.AsString);

Editado 21 Novembro, 2014 por CertaSolucoes

[André Ferreira de Moraes]

No ACBrUtil existe a função "OnlyNumber".