Desconto - Banco Santander

[Giulia Carlini]

Bom dia, 

Ao implementar o desconto condicional no boleto do Banco Santander com o código do desconto = 1, que seria o valor fixo até a data informada, não obtive sucesso, pois a ACBR não possui nenhuma propriedade sobre o mesmo (Código do Desconto), sempre considerando o boleto com o código do desconto = 2 caso eu passe alguma data de desconto no boleto, sendo que essa propriedade é para Percentual de Desconto, e não valor fixo.

Segue informações retiradas do layout de remessa CNAB 240:

Nota 23: CÓDIGO DO DESCONTO
0 = ISENTO
1 = Valor fixo ate a data informada – Informar o valor no campo “valor de desconto a ser concedido”.
2 = Percentual ate a data informada – Informar o percentual no campo “percentual de desconto a ser concedido”
3 = Valor por antecipação por dia corrido - Informar o valor no campo “valor de desconto a ser concedido”
4 = Valor por antecipação dia útil - Informar o valor no campo “valor de desconto a ser concedido”

Código do ACBrBancoSantander.pas:

    if ValorDesconto > 0 then
    begin
      sTipoDesconto := '1'; // Valor fixo ate a data informada – Informar o valor no campo “valor de desconto a ser concedido”.
      if DataDesconto <> 0 then
      begin
        sDataDesconto := FormatDateTime('ddmmyyyy', DataDesconto);
        sTipoDesconto := '2';
      end
      else
      begin
        sTipoDesconto := '0'; // ISENTO
        sDataDesconto := PadLeft('', 8, '0');
      end;
    end
    else
    begin
      sTipoDesconto := '0'; // ISENTO
      sDataDesconto := PadLeft('', 8, '0');
    end;

Gostaria de uma ajuda com este problema, se possível.

Agradeço desde já pela atenção!

[Juliomar Marchetti]

Chegou a dar uma pesquisada nos posts antigos aqui do sub forum do boleto?

[Giulia Carlini]

Juliomar,

Sim, já efetuei pesquisas, porém não encontrei nada sobre o assunto.

Att.

[Juliana Tamizou]

Boa tarde.

Conforme sua análise dos fontes, serão necessários ajustes para tratar o desconto conforme você precisa, fique a vontade para realizar a alteração e postar as possíveis dúvidas aqui.

Att.

[Zoe Tecnologia]

Olá Juliana,

Assim como a Giulia, também me deparei com o mesmo problema.

Acredito que propriedade ACBrTitulo.TipoDesconto pode tratar a questão, porém ela não é usada no código. 

Desta forma, minha sugestão de mudança no código é a seguinte:

    // 0 = ISENTO
    // 1 = Valor fixo ate a data informada – Informar o valor no campo “valor de desconto a ser concedido.
    // 2 = Percentual ate a data informada – Informar o percentual no campo “percentual de desconto a ser concedido
    // 3 = Valor por antecipação por dia corrido - Informar o valor no campo “valor de desconto a ser concedido
    // 4 = Valor por antecipação dia útil - Informar o valor no campo “valor de desconto a ser concedido
    case ACBrTitulo.TipoDesconto of
         tdNaoConcederDesconto: sTipoDesconto := '0';
         tdValorFixoAteDataInformada: sTipoDesconto := '1';
         tdPercentualAteDataInformada: sTipoDesconto := '2';
    end;

    if ValorDesconto > 0 then
    begin
      if DataDesconto <> 0 then
        sDataDesconto := FormatDateTime('ddmmyyyy', DataDesconto)
      else
        sDataDesconto := PadLeft('', 8, '0');
    end
    else
       sDataDesconto := PadLeft('', 8, '0');

 

Obrigado,