Bancoob/Sicoob - Dígito Verificador

[Eduardo Muller]

Utilizo o componente do AcBR para os boletos do Bancoob/Sicoob (ACBrBancoBancoob) e ao homologar os boletos com o banco, está ocorrendo rejeição devido ao Dígito Verificador (DV) estar indo incorreto.

Na função MontarCampoCodigoCedente está utilizando o último dígito do cedente como DV. Porém, caso eu coloque o DV junto ao cedente, ocorre erro na linha digitável.

Como solução passei utilizar a função dessa forma:

function TACBrBancoob.MontarCampoCodigoCedente (
   const ACBrTitulo: TACBrTitulo ) : String;
begin
  Result := ACBrTitulo.ACBrBoleto.Cedente.Agencia + '/'+
            ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente + '-' +
            ACBrTitulo.ACBrBoleto.Cedente.ConvenioDigito;
end;

 

Mais alguém passou por esse caso?