Multa e Juros Sicoob

[Claudiomir]

Saudações

Na hora da Remessa, Banco Sicoob, estou informando assim:

      Titulo.EspecieDoc := 'DM';
      Titulo.EspecieMod := '';
      Titulo.Carteira := self.ctactacarteira.AsString;
      Titulo.ValorDocumento := StrToCurr(self.gcrecrevalor.AsString);
      Titulo.LocalPagamento := ctalocalpagamento.AsString;
      Titulo.CodigoMoraJuros := cjValorDia;
      Titulo.DataMoraJuros := (self.gcrecrevencimento.AsDateTime) + 1;
      Titulo.ValorMoraJuros := StrToCurrDef('0', self.gcrecremoradia.AsFloat);
      Titulo.ValorDesconto := StrToCurrDef('0', 0);
      Titulo.ValorAbatimento := StrToCurrDef('0', 0);
      Titulo.PercentualMulta := fprinci.cfgcfgmultadiaria.AsFloat;

O Banco diz que eu não estou informando os valores corretamente, por isso não está cobrando juros no boleto.

Alguém pode me orientar onde estou errando?

Claudiomir

[Claudiomir]

17 minutos atrás, Claudiomir disse:

Saudações

Na hora da Remessa, Banco Sicoob, estou informando assim:

      Titulo.EspecieDoc := 'DM';
      Titulo.EspecieMod := '';
      Titulo.Carteira := self.ctactacarteira.AsString;
      Titulo.ValorDocumento := StrToCurr(self.gcrecrevalor.AsString);
      Titulo.LocalPagamento := ctalocalpagamento.AsString;
      Titulo.CodigoMoraJuros := cjValorDia;
      Titulo.DataMoraJuros := (self.gcrecrevencimento.AsDateTime) + 1;
      Titulo.ValorMoraJuros := StrToCurrDef('0', self.gcrecremoradia.AsFloat);
      Titulo.ValorDesconto := StrToCurrDef('0', 0);
      Titulo.ValorAbatimento := StrToCurrDef('0', 0);
      Titulo.PercentualMulta := fprinci.cfgcfgmultadiaria.AsFloat;

O Banco diz que eu não estou informando os valores corretamente, por isso não está cobrando juros no boleto.

Alguém pode me orientar onde estou errando?

Claudiomir

OBS..: O Banco me enviou imagem dos dados, para comprovação.

O interessante é que eu fui parando a cada ponto, e os dados são gerados. Abrindo o arquivo enviado, recebi isso do banco.

 

[José M. S. Junior]

Boa tarde

Certifique se realmente está sendo passado ValorMoraJuros, os demais campos só serão preenchidos se esse campo for maior que 0.

[Claudiomir]

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

Boa tarde

Certifique se realmente está sendo passado ValorMoraJuros, os demais campos só serão preenchidos se esse campo for maior que 0.

Eu verifiquei. Está gerando com o valor.

[BigWings]

Tente informar também:

Titulo.CodigoMora := '1';