remessa banco Safra

[Fernando Rodrigo]

estou validando o banco safra e encontrei um problema na instrução bancaria

na linha 716 da unit do safra esta calculando o campo Instrucao1 como 0 não protestar, so que no layout é codigo 3 para não protestar, veja o layout

C026
Código para Protesto
Código adotado pela FEBRABAN para identificar o tipo de prazo a ser considerado para o protesto.
Domínio:
'1' = Protestar Dias Corridos
'2' = Protestar Dias Úteis
'3' = Não Protestar
‘4’ = Protestar Fim Falimentar - Dias Úteis
‘5’ = Protestar Fim Falimentar - Dias Corridos
‘8’ = Negativação sem Protesto
'9' = Cancelamento Protesto Automático
(somente válido p/ CódigoMovimento Remessa = '31' - Descrição C004)

Sabe se ja tem correção desse problema ?

 

Linha 716 da unit ACBrBancoSafra.pas

  {Código para Protesto}
    case TipoDiasProtesto of
       diCorridos       : ACodProtesto := '1';
       diUteis          : ACodProtesto := '2';
    else
       ACodProtesto := '0';
    end;

    if ((DataProtesto <> 0) and (DiasDeProtesto > 0)) then
    begin
      if not MatchText(Instrucao1, ['0', '1', '2', '3', '9']) then
        Instrucao1 := ACodProtesto;
      // Dias para protesto
      sDiasProtesto := PadLeft(IntToStr(DiasDeProtesto), 2, '0');
    end
    else
    begin
      Instrucao1 := '0';  // Não protestar
      SDiasProtesto := '00';
    end;
 

 

[Fernando Rodrigo]

Em 17/02/2022 at 16:05, Fernando Rodrigo disse:

estou validando o banco safra e encontrei um problema na instrução bancaria

na linha 716 da unit do safra esta calculando o campo Instrucao1 como 0 não protestar, so que no layout é codigo 3 para não protestar, veja o layout

C026
Código para Protesto
Código adotado pela FEBRABAN para identificar o tipo de prazo a ser considerado para o protesto.
Domínio:
'1' = Protestar Dias Corridos
'2' = Protestar Dias Úteis
'3' = Não Protestar
‘4’ = Protestar Fim Falimentar - Dias Úteis
‘5’ = Protestar Fim Falimentar - Dias Corridos
‘8’ = Negativação sem Protesto
'9' = Cancelamento Protesto Automático
(somente válido p/ CódigoMovimento Remessa = '31' - Descrição C004)

Sabe se ja tem correção desse problema ?

 

Linha 716 da unit ACBrBancoSafra.pas

  {Código para Protesto}
    case TipoDiasProtesto of
       diCorridos       : ACodProtesto := '1';
       diUteis          : ACodProtesto := '2';
    else
       ACodProtesto := '0';
    end;

    if ((DataProtesto <> 0) and (DiasDeProtesto > 0)) then
    begin
      if not MatchText(Instrucao1, ['0', '1', '2', '3', '9']) then
        Instrucao1 := ACodProtesto;
      // Dias para protesto
      sDiasProtesto := PadLeft(IntToStr(DiasDeProtesto), 2, '0');
    end
    else
    begin
      Instrucao1 := '0';  // Não protestar
      SDiasProtesto := '00';
    end;
 

 

segue arquivo alterado a linha para codigo 3 conforme layout acima

 

C026
Código para Protesto
Código adotado pela FEBRABAN para identificar o tipo de prazo a ser considerado para o protesto.
Domínio:
'1' = Protestar Dias Corridos
'2' = Protestar Dias Úteis
'3' = Não Protestar
‘4’ = Protestar Fim Falimentar - Dias Úteis
‘5’ = Protestar Fim Falimentar - Dias Corridos
‘8’ = Negativação sem Protesto
'9' = Cancelamento Protesto Automático
(somente válido p/ CódigoMovimento Remessa = '31' - Descrição C004)

 

ACBrBancoSafra.pas

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

TK-2410

[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