Nova sugestão boleto hibrido Sicoob

[carlitomorais]

Quanto ao Envio para Registro está funcionando e o pix esta retornando legal.... so tem um problema....quando nao informa o valor ou percentual de juros....tipo juros zero..... ele retorna (Json) que o tipo de juros e obrigado..estao e preciso mudar pra poder quandor for juros zero informar tipo de juros zero.

if (aTitulo.ValorMoraJuros > 0) then
      begin

        if ATitulo.CodigoMora = '' then
        begin
          case aTitulo.CodigoMoraJuros of
            cjValorDia   : aTitulo.CodigoMora := '1';
            cjTaxaMensal : aTitulo.CodigoMora := '2';
            cjIsento     : aTitulo.CodigoMora := '0';
          end;
        end;

        case (StrToIntDef(aTitulo.CodigoMora, 0)) of
          0:    // Isento
            begin
              AJson.Add('tipoJurosMora').Value.AsInteger :=  0;
              AJson.Add('valorJurosMora').Value.asNumber := 0;
              AJson.Add('valorJurosMora').Value.asNumber := 0;
            end;
          1:     // Dia
            begin
             // AJson.Add('taxa').Value.asNumber := aTitulo.ValorMoraJuros;
              AJson.Add('tipoJurosMora').Value.AsInteger :=  Integer(aTitulo.CodigoMoraJuros);
              AJson.Add('dataJurosMora').Value.asString := DateTimeToDateBancoob(aTitulo.DataMulta);
              AJson.Add('valorJurosMora').Value.asNumber := aTitulo.ValorMoraJuros;
            end;
          2: // Mês
            begin
              AJson.Add('tipoJurosMora').Value.AsInteger :=  Integer(aTitulo.CodigoMoraJuros);
              AJson.Add('dataJurosMora').Value.asString := DateTimeToDateBancoob(aTitulo.DataMulta);
              AJson.Add('valorJurosMora').Value.asNumber := aTitulo.ValorMoraJuros;
            end;
         end;
      end
     else
      begin
       AJson.Add('tipoJurosMora').Value.AsInteger :=  0;
       AJson.Add('valorJurosMora').Value.asNumber := 0;
       AJson.Add('valorJurosMora').Value.asNumber := 0;
      end;

 

desse jeito acima fica show....se juros for zero registrará 100%

acredito entao que so a questao da consulta mesmo...

[Juliana Tamizou]

@carlitomorais movi para um novo tópico sua postagem para que fique um pouco mais organizado para todos.

 

Tópico original

 

[Juliana Tamizou]

TK-3892

[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