Alterações ACBrBancoBRB

[Fernando Kerber]

Bom dia pessoal!

Estava homologando a remessa e os boletos para o banco BRB e tive que fazer algumas mudanças no componente.

1º - Na procedure TACBrBancoBRB.GerarRegistroTransacao400 quando alimentava o CPF/CNPJ estava preenchendo com zeros a direita, quando eu informava um CPF que contém 11 dígitos ele completava com 3 zeros a direita para completar os 14 dígitos, estava assim no componente:

                 PadL(OnlyNumber(Sacado.CNPJCPF), 14, '0')                        + // Código do Sacado

Quando mandei a remessa para o banco me informaram que nos 3 dígitos que sobraram do CPF eu deveria preencher com espaços em branco, segue e-mail:

"13 á 26: Código do sacado se caso for CPF, será preenchidos as posições 13 á 23, as posições 24 á 26 ficam em branco."

Então alterei o código e o banco aceitou:

                 PadL(OnlyNumber(Sacado.CNPJCPF), 14, ' ')                        + // Código do Sacado

2º - Mandei novamente a remessa e o banco me retornou o seguinte:

"No arquivo de remessa nas posições 154 á 157 Número da agência cobradora, que é a agência do beneficiário no caso : 0050. "

no ACBrBancoBRB existia uma linha informando o seguinte:

                 '0000'                              + // Número da Agência Cobradora - Confirmar no suporte

Então alterei o código e passou:

                 '0050'                              + // Número da Agência Cobradora - Confirmar no suporte

3°- Pediram também para que mudasse a logo, em anexo a nova logo deles.

Vou colocar em anexo os arquivos do manual da remessa, logo e manual do boleto impresso que o banco me passou.

Espero ter colaborado.

Obrigado.

 

 

Arquivos BRB.rar

Editado 13 Agosto, 2015 por Ferdinan Marco

[Giuu]

Bom dia Ferdinan Marco.
Tentei homologar a remessa para o banco BRB e também surgiu algumas rejeições, abri a unit do ACBrBancoBRB e fiz as alterações citadas a cima, então corrigiu  a maioria dos meus problemas, agora só falta eu mudar a forma que estou alimentando o nosso numero e vai passar.
Vão liberar as mudanças na próxima atualização do ACBr?
Obrigado!

[Juliana Tamizou]

Boa noite.

Estas alterações estão na fila de análise e serão disponibilizadas assim que possível.

Att.

[Fernando Kerber]

Bom dia Juliana,

Muito obrigado pela atenção.

Att.

[Juliana Tamizou]

Boa noite.

Alteração disponível no svn.

Att.

[[email protected]]

O correto seria colocar PadLeft(Cedente.Agencia, 4, '0')

ao invés do valor fixo '0050' no número da agência cobradora. Senão fica incorreto! Tive de alterar localmente conforme pedido pelo BRB. Porém seria certo alterar no fonte SVN linha 321 de ACBrBancoBRB.pas

[Celso Marigo Junior]

Anexe arquivo .pas com a correção para analise. E anexe também o retorno do banco que pediu a alteração.

[[email protected]]

Arquivo com a correção anexo. Abaixo a mensagem do BRB. Note que algumas coisas já haviam sido corrigidas na versão corrente no ACBr. Também estão reclamando da falta do endereço do cedente impresso no boleto. Estou dando uma olhada para ver o que se trata também. Obrigado!

 

De: "//GEBAN - Cobrança BRB" <[email protected]>
Data: 26 de jan de 2017 14:31
Assunto: ENC: Homologação de boletos
Para: "[email protected]" <[email protected]>
Cc: 
 

Thiago, boa tarde.

 

 

Favor proceder com os seguintes ajustes:

 

1.       No arquivo remessa:

a)      Campo 13 a 26: inserir apenas os números referentes ao CPF ou CNPJ (ex. para o CPF inserido apenas 95018930144 sem os três zeros finais);

      Campo 123 a 135: inserir o "seu número" conforme número do boleto respectivo;

c)       Campo 154 a 157: inserir o número da agência ( ex. 0043);

d)      Campo 188 a 195: Inserir data de venciemento válida (acima da data atual)

e)      Caso tenha juros, multa e desconto favor preencher os campos destinados.

 

 

2.       No recibo do pagador e no boleto:

 

 

 

Após ajustes enviar nova massa de testes.

 

 

Att.,
	André Costa da Silva DISEP/SUSEB/GEBAN - Gerência de Administração de Produtos e Serviços Bancários

 

 

ACBrBancoBRB.pas

[[email protected]]

A questão do endereço no boleto está correta no ACBr. Faltava informar em Cedente apenas. Fica a única correção até o momento a questão da agência enviada.

[[email protected]]

O BRB também exige que quando a data limite para o pagamento é a data do vencimento, que o código da instrução seja 13 (barrar pagamento de título após o vencimento).

Para isso tem de alterar:

      if (DataLimitePagto > 0) then
      begin
        wDiasPagto:= IntToStrZero(DaysBetween(Vencimento, DataLimitePagto),2);
        if (Instrucao1 = '00') then
         begin
          if Vencimento <> DataLimitePagto then
            Instrucao1:= '94'
          else
            Instrucao1 := '13';
          Prazo1 := wDiasPagto;
         end
        else if (Instrucao2 = '00') then
         begin
          if Vencimento <> DataLimitePagto then
            Instrucao2 := '94'
          else
            Instrucao2 := '13';
          Prazo2 := wDiasPagto;
        end
      end;

 

Anexo o arquivo alterado. Segue mensagem do BRB com a solicitação.

·        Forma correta:

 

Corrigir ainda no arquivo de remessa, as seguintes posições:

a.       188 a 195: inserir data maior ou igual a atual.

b.      276 a 277: inserir cód. 13 referente ao barramento do titulo após o vencimento (corrigir a data no boleto também).

 

Após as devidas correções, enviar a massa de testes novamente com os boletos e as suas respectivas remessas.

Atenciosamente,

Danielle dos Santos 
Equipe Cobrança BRB

BRB - Banco de Brasília S.A.

DISEP/ SUSEB/ GEBAN

* cobranca@brb.com.br

 

ACBrBancoBRB.pas

Também é necessária a seguinte alteração em ACBRBoleto.pas (arquivo alterado anexo).

 

      if DataLimitePagto <> 0 then
      begin
        if DataLimitePagto > Vencimento then
          AStringList.Add(ACBrStr('Não Receber após ' + IntToStr(DaysBetween(Vencimento, DataLimitePagto))+ ' dias'))
        else
          AStringList.Add(ACBrStr('Não Receber após o Vencimento'));
      end;

ACBrBoleto.pas

[Juliana Tamizou]

Boa tarde.

Qual a necessidade da alteração em ACBrboleto.pas? Na implementação atual ele vai imprimir a mensagem informando para não receber após a data informada (que se for o vencimento será ela própria).

Att.

[[email protected]]

Sem a alteração no arquivo ACBrBoleto.pas, quando o boleto só pode ser pago até o vencimento, é mostrado "Não Receber após 0 dias", que não é muito clara. "Não receber após o vencimento" seria uma mensagem mais correta neste caso.

 

At,

[Juliana Tamizou]

Boa tarde.

Alterações disponíveis no svn.

Att.

[[email protected]]

Obrigado! Porém faltaram as alterações em ACBrBancoBRB.pas, conforme solicitadas pelo próprio BRB, que exige o código 13 para "Não receber após o vencimento".

[leticiasilva]

Boa Tarde, 
Alterações disponíveis no SVN.

[RodrigoPalma]

Tem alguém emitindo boleto para o BRB? Pois a versão atual do AcBr para este banco esta bem defasada.

[Juliana Tamizou]

Boa tarde.

Caso tenha efetuado as alterações e queira disponibilizar, por favor anexe ao tópico.

Att.