Carteira BNB

[emanuels_ces]

Pessoal, Bom dia!

Estou homologando Boleto e Remessa BNB para Carteira 21, onde informei no Titulo.Carteira := 21, porém na impressão do Boleto só sai o 2, motivo pelo qual gerou a rejeição em anexo pelo banco.

Observei que na Linha 91 (fpTamanhoCarteira:= 1;) do ACBrBancoNordeste.pas o tamanho do carteira foi definido em uma posição, mas o pessoal do banco exige que na impressão fique 21 e não 2 como está acontecendo.

Como posso resolver ? Obrigado.

Linha 544

function TACBrBancoNordeste.CarteiraToTipoOperacao(const Carteira: string):String; 
begin
  if Carteira = '1' then
    Result:= '21'
  else if Carteira = '2' then
    Result:= '41'
  else 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;

 

[Luciano Rodrigues Pereira]

O Banco do Nordeste é chato mesmo. Eles tem uma coisa chamada Carteira, que é só uma posição (1, 2, 4, 5 ou I)  e tem o Tipo de Operação (21, 31, 41 ou 51). E na impressão do boleto onde se lê Carteira, eles querem que imprima o Tipo de Operação e não a carteira em si. Banco complicado. Muito fraco o pessoal de Ti deste banco.

No seu sistema informe a carteira '4', o ACBr na hora de gerar o arquivo de remessa não vai levar a Carteira (4) mas sim o Tipo de Operação (21), o que está correto.

Na impressão, no código do boleto do FastReport (ou outro) você faz a mesma coisa. Eu fiz assim...

[Juliana Tamizou]

Bom dia @emanuels_ces

Favor informar qual gerador de relatórios está utilizando.

Att.

[emanuels_ces]

@Juliana Tamizou, Utilizo o FastReport

Editado 31 Maio, 2016 por emanuels_ces

[Juliana Tamizou]

Bom dia.

Não utilizo este gerador, porém você pode checar nos fontes se a função MontarCampoCarteira() está sendo utilizada na impressão do relatório.

Att.

[Luciano Rodrigues Pereira]

É muito simples. Se você consegue trabalhar com o código no FastReport (a versão que vem no Delphi não permite), mas uma versão que você compra por aí (leia-se pi...), você trabalha com o código. Para mim mesmo seria impossível trabalhar no Fast sem o código, pois eu trabalho muito com os eventos do relatório.

Então no Código do boleto você mesmo cria a função. Vou lhe dar mastigado.

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 = '1' then
    Result:= '21'
  else if Carteira = '2' then
    Result:= '41'
  else 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;
 

[emanuels_ces]

Obrigado @Luciano Rodrigues Pereira e @Juliana Tamizou!!!

Funcionou perfeitamente.

[Juliana Tamizou]

Se possível anexe o arquivo alterado para ser adicionado ao svn.

Att.

[emanuels_ces]

@Juliana Tamizou, segue em anexo arquivo do FastReport alterado.

Boleto.fr3

[LEONARDO BELARMINO]

Juliana Tamazou: você gerou boleto Registrado para o Bnb e com arquivo de remessa?

[sismais]

Em 31/05/2016 at 11:39, Juliana Tamizou disse:

Se possível anexe o arquivo alterado para ser adicionado ao svn.

Att.

Pessoal, sei que já faz tempo. Mas precisei Homologar o Boleto do BNB aqui e me peguei nesta questão. Notei que não foi adicionado aos arquivos FastReport no SVN do projeto.

Como ficou esta questão?

 

Obs: Vi que se eu colocar apenas "21" na alimentação do ACBrBoleto ao invés do "4' como o colega exemplificou acima, dá certo (por que internamente o ACBr faz alguns tratamentos ), mas não seria o método correto (poderia ter problemas se novas implementações fossem efetuadas, sendo que "21" não é o Código da Carteira, e sim o "4", e deveria então ser feita a adaptação, tal como a sugerida para o FastReport (não sei se fui bem claro).

 

Gostaria de saber como os colegas tem conseguido resolver esta questão, e a opinião da Juliana.

[Juliana Tamizou]

Boa tarde.

Este tópico é antigo e será fechado.  Os fontes já sofreram muitas mudanças, caso seja necessário favor criar um novo tópico.

Att.