Boleto - tipo CARNE sair o CNPJ do Beneficiário

[OlavoJr]

Segue abaixo a unit, referente a impressão do boleto do tipo CARNE, no FORTES, para impressão do CNPJ do Beneficiário, nos demais tipos este campo do beneficiário já saem como: Cedente.Nome+ ' - '+TipoDoc + Cedente.CNPJCPF; foi seguido o mesmo padrão.

 

Alteração foi em: procedure TACBrBoletoFCFortesFr.RLBand3BeforePrint

 

Sendo a declaração da variavel: TipoDoc

 

Seu valor como:

      case Cedente.TipoInscricao of
         pFisica   : TipoDoc:= 'CPF: ';
         pJuridica : TipoDoc:= 'CNPJ: ';
      else
         TipoDoc := 'DOC.: ';
      end;
 

E o valor do campo antes:

      txtNomeCedente.Caption          := Cedente.Nome;

Passa a ser:

      txtNomeCedente.Caption          := Cedente.Nome+ ' - '+TipoDoc + Cedente.CNPJCPF;
 

 

 

 

ACBrBoletoFCFortesFr.pas

Editado 3 Maio, 2016 por OlavoJr

[Juliana Tamizou]

Boa noite.

Alteração disponível  no svn.

Att.