Jump to content

2 Dia do ACBr

O Dia da Automação Comercial está chegando!
Inscreva-se

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

edvaniojancy

Problema na homologação Banco do Nordeste

Recommended Posts

Não tem nada de errado com o pas do ACBr. Eu trabalho com o bnb e tudo certo. Você está fazendo confusão com Carteira e Tipo de Operação. Isso é uma chatice mesmo no bnb. A carteira no caso é 4 e o Tipo de Operação é 21. É só você colocar no seu sistema carteira 4 que o ACBr faz o resto. Já na impressão do boleto, o boleto pede Carteira (que seria 4), mas o banco quer que imprima na verdade o Tipo de Operação (21), aí você edita o boleto que você trabalha. Cria uma função para converter a Carteira em Tipo de Operação e chama ela lá em before print do MasterData. Tipo assim:

procedure MDOnBeforePrint(Sender: TfrxComponent);
begin
  // Banco 004 (Banco do Nordeste) - Imprime o Tipo de Operação no lugar da Carteira
  TituloCarteira.Text  := IIF(<Banco."Numero"> = '004', CarteiraToTipoOperacao(<Titulo."Carteira">),  <Titulo."Carteira">);
end;

function CarteiraToTipoOperacao(const Carteira: string): String;
begin
  if Carteira = '4' then
    Result:= '21'
  else if Carteira = '5' then
    Result:= '41'
  else if Carteira = '6' then
    Result:= '31'
  else if Carteira = 'I' then
    Result:= '51'
  else result:= Carteira                                                       
end;

Share this post


Link to post
Share on other sites

Boa noite.

Houve uma alteração recente no ACBrBoletoFCFortes para incluir a função citada.

Em 01/07/2016 at 09:44, Luciano Rodrigues Pereira disse:

Cria uma função para converter a Carteira em Tipo de Operação e chama ela lá em before print do MasterData

Att.


Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites

Boa tarde!

Como na ultima revisão ainda não tem esta alteração para o Fast Report, anexei a unit alterada com a sugestão do colega @Henrique Paraiba.

Alterado a linha 606:

Field_Carteira.AsString := ListadeBoletos[iFor].Carteira;

para:

Field_Carteira.AsString := Banco.MontarCampoCarteira(ListadeBoletos[iFor]);

Por favor sendo possível adicione ao repositório.

Obrigado!

 

ACBrBoletoFCFR.pas

Edited by Patrick Alves

Share this post


Link to post
Share on other sites
Em 30/08/2016 at 14:29, Patrick Alves disse:

Boa tarde!

Como na ultima revisão ainda não tem esta alteração para o Fast Report, anexei a unit alterada com a sugestão do colega @Henrique Paraiba.

Alterado a linha 606:

Field_Carteira.AsString := ListadeBoletos[iFor].Carteira;

para:

Field_Carteira.AsString := Banco.MontarCampoCarteira(ListadeBoletos[iFor]);

Por favor sendo possível adicione ao repositório.

Obrigado!

 

ACBrBoletoFCFR.pas

Boa tarde

enviei a alteração ao svn!

favor testar

 

  • Like 2

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar  telegram: juliomar
http://www.juliomarmarchetti.com.br
Embarcadero MVP

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...