Problema No Arquivo De Remessa Do Bb Com Multa

[leandroksc]

Olá pessoal.

 

Ao fazer a homologação do boleto de um cliente com o Banco do Brasil, foi retornado um problema pelo banco no arquivo de remessa, na posição 66 do segmento R.

 

O código original do ACBr segue abaixo:

{SEGMENTO R}
      Result:= Result + #13#10 +
               IntToStrZero(ACBrBanco.Numero, 3)                                       + // 1 - 3 Código do banco
               '0001'                                                                  + // 4 - 7 Número do lote
               '3'                                                                     + // 8 - 8 Tipo do registro: Registro detalhe
               IntToStrZero((3 * ACBrBoleto.ListadeBoletos.IndexOf(ACBrTitulo))+ 3 ,5) + // 9 - 13 Número seqüencial do registro no lote - Cada título tem 2 registros (P e Q)
               'R'                                                                     + // 14 - 14 Código do segmento do registro detalhe
               ' '                                                                     + // 15 - 15 Uso exclusivo FEBRABAN/CNAB: Branco
               ATipoOcorrencia                                                         + // 16 - 17 Tipo Ocorrencia
               padR('', 48, '0')                                                       + // 18 - 65 Brancos (Não definido pelo FEBRAN)
               IfThen((PercentualMulta <> null) and (PercentualMulta > 0), '2', '0')   + // 66 - 66 1-Cobrar Multa / 0-Não cobrar multa
               IfThen((PercentualMulta <> null) and (PercentualMulta > 0),
                  FormatDateTime('ddmmyyyy', DataMoraJuros), '00000000')               + // 67 - 74 Se cobrar informe a data para iniciar a cobrança ou informe zeros se não cobrar
               IfThen(PercentualMulta > 0, IntToStrZero(round(PercentualMulta * 100), 15),
                    padL('', 15, '0'))                                                 + // 75 - 89 Percentual de multa. Informar zeros se não cobrar
                    padL('',110,' ')                                                   + // 90 - 199
                    padL('',8,'0')                                                     + // 200 - 207
               padR('', 33, ' ');                                                        // 208 - 240 Brancos (Não definido pelo FEBRAN)


    

Como podemos ver, na linha que preenche a posição 66, é informado dois possíveis valores: '0' ou '2', sendo que o valor correto para quando há percentual de multa seria '1' e não '2'.

 

Esta informação procede? É possível corrigir no svn?

 

Obrigado!

[leandroksc]

Alguma novidade sobre este problema?

[leandroksc]

O tópico é antigo mas o problema ainda persiste, eu fiz a correção manualmente no arquivo. É possível fazer a correção no SVN?

 

Obrigado a todos!

[Juliomar Marchetti]

Boa tarde

sim é possível favor anexar a sugestão de correção para que o mantenedor veja o código

[leandroksc]

Segue arquivo em anexo.

ACBrBancoBrasil.pas

[Juliomar Marchetti]

Boa tarde

você consegue me confirmar pois olhando o manual eu vejo o seguinte:

 

CODIGO DA MULTA 66 66 1 -

1-VALOR FIXO

2-PERCENTUAL

[leandroksc]

Ah sim, então gerou uma pequena confusão nesta linha, pois me baseei na informação comentada ao lado informando "1-Cobrar Multa / 0-Não cobrar multa", sendo que na minha homologação estava sendo informado "2", e o banco não validou dizendo que deveria ser informado "1". Por este motivo achei que seriam "0" e "1" as opções válidas.

 

Acho interessante ajustar o comentário então, mudar de "1-Cobrar Multa / 0-Não cobrar multa" para "1-Valor Fixo / 2-Percentual".

 

Obrigado pela atenção!

[Alexsander]

IfThen((PercentualMulta <> null) and (PercentualMulta > 0), '2', '0') + // 66 - 66 1-Cobrar Multa / 0-Não cobrar multa?

Esta linha acima está no código. Está correto?

Aparentemente está mandando apenas 0 ou 2 (quando deveria ser 1=Valor Fixo e 2=Valor Percentual, conforme o manual da Febraban, item G073).

[Juliana Tamizou]

5 horas atrás, Alexsander disse:

Esta linha acima está no código. Está correto?

 

Aparentemente está mandando apenas 0 ou 2 (quando deveria ser 1=Valor Fixo e 2=Valor Percentual, conforme o manual da Febraban, item G073).

Boa noite.

Está sim correto, uma vez que como a propria propriedade diz é Percentual de Multa, logo se o mesmo for informado sempre será o código 2.

Att.

[Alexsander]

Eu propus uma solução no post abaixo (que inclui uma ACBrBoleto.pas em anexo):

A alternativa seria criar a propriedade "ValorMulta double" ao invés da "MultaValorFixo boolean" que criei no código em anexo lá no post.