Código Mora aceitos banrisul

[lbertuol]

Boa tarde Pessoal,

estou homologando boletos com o Banrisul e tive problemas com os códigos de mora aceitos, pelo seguinte: 

* Para o Banrisul segundo os valores contidos na property  ACBrBoleto.Banco.CodigosMoraAceitos seriam apenas 0 ou 1 (obtive estes valores debugando);

* Porém ao realizar a impressão no método  AdicionarMensagensPadroes, existe a validação abaixo. Onde é testado de forma fixa o CodigoMora = '2'; 

      if ValorMoraJuros <> 0 then

      begin

         if DataMoraJuros <> 0 then

            AStringList.Add(ACBrStr('Cobrar juros de '                        +

                            ifthen(CodigoMora = '2', FloatToStr(ValorMoraJuros) + '%',

                                   FormatCurr('R$ #,##0.00',ValorMoraJuros))         +

                             ' por dia de atraso para pagamento a partir de ' +

                             FormatDateTime('dd/mm/yyyy',ifthen(Vencimento = DataMoraJuros,

                                                                IncDay(DataMoraJuros,1),DataMoraJuros))))

         else

            AStringList.Add(ACBrStr('Cobrar juros de '                +

                                    ifthen(CodigoMora = '2', FloatToStr(ValorMoraJuros) + '%',

                                           FormatCurr('R$ #,##0.00',ValorMoraJuros))         +

                             ' por dia de atraso'));

      end;

 

* E se eu passar "2" para o código mora me retorna um erro devido a validação abaixo. Gostaria de saber como proceder para poder utilizar a mensagem de mora e juros no formato de Percentual. 

 

procedure TACBrTitulo.SetCodigoMora(AValue: String);

begin

  if fCodigoMora = AValue then

      exit;

 

  if Pos(AValue,ACBrBoleto.Banco.CodigosMoraAceitos) = 0 then

     raise Exception.Create( ACBrStr('Código de Mora/Juros informado não é permitido ' +

                                     'para este banco!') );

 

  fCodigoMora := AValue;

end;

Somente para complementar...

vi que no tópico abaixo, trata alguns problemas em relação ao código mora com o banrisul, mas estes já foram solucionados e liberados no svn