Remessa Santander - Sugestão Para Correção de Rejeição

[Valdir Dill]

Boa tarde,

Estou tendo problema de rejeição de homologação no Santander.

A causa é um corte que o acbr acaba fazendo no texto de uma das mensagem no MontarInstrucoes2 da acbrBancoSantamder.pas.

A mensagem final fica assim: "Cobrar juros de R$ 0,01 por dia de atrasCobrar Multa de R$ 0,03 a partir 23/09/2". Note que na terceira mensagem falta os 3 últimos dígitos do ano. Isso gera rejeição da homologação pelo Santander.

O corte ocorre porque a function function MontarInstrucoes2: string; copia apenas 40 caracteres de cada mensagem e, como a mensagem tem mais de 40 caracteres...acaba cortando.

Aumentei o tamanho do copy dessa function para 45. Unit com a correção em anexo.

Não sei se é a melhor forma, mas para mim resolveu. Se possível, atualizem no svn.

Obrigado.

ACBrBancoSantander.pas

[José M. S. Junior]

Bom dia

Vamos verificar, obrigado!

[José M. S. Junior]

Boa tarde @valdirdill, analisando a sugestão de alteração, não resolveria o problema pois no layout de Remessa de todos os bancos o tamanho para cada mensagem é de 40 posições. Se aumentar, visivelmente no arquivo fica correto mas na leitura por parte do banco continuará cortando...

O estranho é que todos os bancos onde é enviado esse segmento, utilizam o mesmo padrão e aparentemente o pessoal não tem problemas para homologar quanto a isso... De qualquer forma para resolver precisamos analisar outra solução...

[Valdir Dill]

Em 11/09/2018 at 14:07, José M. S. Junior disse:

Boa tarde @valdirdill, analisando a sugestão de alteração, não resolveria o problema pois no layout de Remessa de todos os bancos o tamanho para cada mensagem é de 40 posições. Se aumentar, visivelmente no arquivo fica correto mas na leitura por parte do banco continuará cortando...

O estranho é que todos os bancos onde é enviado esse segmento, utilizam o mesmo padrão e aparentemente o pessoal não tem problemas para homologar quanto a isso... De qualquer forma para resolver precisamos analisar outra solução...

Boa tarde  @José M. S. Junior,

Realmente os bancos normalmente não analisam isso, até porque o que importa são os valores informados no arquivo remessa. Nesse texto não tem a menor importância no registro dos títulos. Mas esse banco/agência analisou.
O problema maior é que a impressão do boleto também fica errada.

Uma outra solução que talvez seja mais simples e não afete a geração do arquivo remessa seja esta abaixo:

Na linha 2064 da AcbrBoleto.pas eu mudei

De
       if DataMulta <> 0 then
          AStringList.Add(ACBrStr('Cobrar Multa de ' + FormatCurr('R$ #,##0.00',
            IfThen(MultaValorFixo, PercentualMulta, ValorDocumento*( 1+ PercentualMulta/100)-ValorDocumento)) +
                         ' a partir de '+FormatDateTime('dd/mm/yyyy',ifthen(Vencimento = DataMulta,
                                                                IncDay(DataMulta,1),DataMulta))))

Para                                                         
       if DataMulta <> 0 then
          AStringList.Add(ACBrStr('Cobrar Multa de ' + FormatCurr('R$ #,##0.00',
            IfThen(MultaValorFixo, PercentualMulta, ValorDocumento*( 1+ PercentualMulta/100)-ValorDocumento)) +
                         ' após '+FormatDateTime('dd/mm/yyyy',ifthen(Vencimento = DataMulta,
                                                                IncDay(DataMulta,1),DataMulta))))

Só alterado o "a partir de" por "após". Isso diminuiu alguns caracteres e resolveu o problema.
Em anexo a unit alterada caso queiram aplicar essa mudança oficialmente nos fontes.

Obrigado

ACBrBoleto.pas

[José M. S. Junior]

Bom dia, vamos avaliar. Obrigado!

[José M. S. Junior]

Realizado ajuste com outra alteração. Favor atualizar os fontes...

[Valdir Dill]

20 minutos atrás, José M. S. Junior disse:

Realizado ajuste com outra alteração. Favor atualizar os fontes...

Bom dia,

Perfeito. Testado e aprovado.

Obrigado!

[Juliana Tamizou]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.