Retorno da Funçao PadLeft na montagem da ChaveASBACE - Boleto Bancário (Banco BRB)

[Douglas A R Lima]

Boa tarde, senhores.

Estou com uma diferença na Linha Digitável do Boleto Bancário (Banco BRB) entre o Trunk e o Trunk2.

Na função PadLeft do ACBrUtil, quando o valor da variável 'Tam' é maior que o valor do parâmetro 'nLen' o Result fica errado.

Exemplificando:

ACBrTitulo.NossoNumero = 000000002309

Ao utilizar a função PadLeft a variável 'Tam = 12' e o parâmetro 'Len = 6'.

A função esta retornando '000000', onde  o valor correto seria '002309'. Inclusive, por algum motivo, o método 'RightStr(AString,nLen)' esta comentado. 

[Daniel Simoes]

Apesar de ser o comportamento esperado... Não devemos mudar o funcionamento da PadLeft... isso pode quebrar muita coisa... Veja comentários na Unit teste de ACBrComum

O código poderia ser corrigido com:

PadLeft( RightStr( AString, Tamanho ), Tamanho)

 

[Douglas A R Lima]

Boa noite, Daniel.

Entendo perfeitamente! Vou fazer a correção local e testar.

Obrigado!
Douglas A R Lima