Inconsistência na informação da multa no banco Unicred ES (Valor Fixo ou Percentual) no arquivo de remessa

[PbNew_Sistemas]

Bom dia pessoal, tudo bem?
Fui realizar uma homologação para o banco UnicredES e recebi um apontamento de divergência entre a impressão do boleto e o arquivo de remessa.
O que ocorreu foi o seguinte: Meu cliente optou por trabalhar com a multa valor fixo, e analisando o método GerarRegistroTransacao400 da unit ACBrBancoUnicredES, percebi que existe uma variável sTipoMulta (que está correta), porém na instrução { 095 a 104      Valor/Percentual da Multa    010 } está fixo percentual.
No meu entender, deveria ser feito um teste para montar a instrução conforme a variável sTipoMulta, mais ou menos assim:
IfThen(sTipoMulta = '1', IntToStrZero( Round(100 * TruncTo((ValorDocumento*( 1+ PercentualMulta/100)-ValorDocumento),2)), 10) , IntToStrZero(Round(PercentualMulta * 100), 10) ) +{ 095 a 104      Valor/Percentual da Multa    010 }

Segue em anexo o fonte para análise.

 

ACBrBancoUnicredES.pas

[Victor H. Gonzales - Panda]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[José M. S. Junior]

#TK-2207

[Victor H. Gonzales - Panda]

Boa noite @prevedello_sistemas

Por favor, teste com a unit em anexo

ACBrBancoUnicredES.pas

Boa noite @prevedello_sistemas

Por favor, teste com a unit em anexo

ACBrBancoUnicredES.pas

[PbNew_Sistemas]

Boa tarde Pessoal.

Efetuei os testes e identifiquei uma inconsistência.

Pelo que analisei foi usado um Round no cálculo do valor da multa, porém eu creio que o correto seria usar o TruncTo, tendo em vista que no TACBrBoleto.AdicionarMensagensPadroes é usado TruncTo e dessa forma o valor no arquivo de remessa está ficando diferente do valor na impresso. (No meu sistema também usamos Trunc no cálculo)

No exemplo que mandei no arquivo da abertura do tópico, eu copiei a fórmula do cálculo do TACBrBoleto.AdicionarMensagensPadroes.

Testei um boleto com ValorDocumento = 39,11 e PercentualMulta = 2,55, e o resultado deveria ser 99, mas com o Round está ficando 100.

[José M. S. Junior]

Vamos verificar...

[Victor H. Gonzales - Panda]

Por favor atualize seus fontes, pelo SVN do ACBr... 

Já subimos para o nosso repositório de fontes, modificações que podem corrigir algum dos itens referentes a esse tópico...

Por favor atualize seus fontes, faça testes, e se possível comente em uma nova resposta, se o problema foi resolvido...

Dúvidas, sobre o uso do SVN ?  Clique aqui e veja um vídeo

[PbNew_Sistemas]

Bom dia.

Efetuei os testes e agora está ok.

Obrigado

[Italo Giurizzato Junior]

Obrigado por reportar.

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