Banco Sisprime 084 - Falha na validação dos dias de protesto/negativação

[Ronaldo.Bispo]

Olá pessoal, tudo bem com vocês?

Estou gerando o arquivo de remessa bancária de envio do banco Sisprime 084 (antigo uniprime) e estou com alguns problemas com os dias de protesto.

Quando eu deixo sem dias de protesto/negativação é gerado a exception:

Citar

"O número de dias a protestar / negativar deve ser mínimo 05 a máximo 55 dias"

porém eu não gostaria de informar protesto.

No manual diz que posso utilizar a indicação 03 que é 'Sem Protesto / Negativação', e também diz que se indicação for 01,02,07 deve preencher os dias a protestar sendo de 5 a 55 dias.

Então me ocorreu que a validação no método TACBrUniprimeNortePR.GerarRegistroTransacao400(ACBrTitulo :TACBrTitulo; aRemessa: TStringList) não está sendo verificado se a indicação é diferente de 3 e 99.

então alterei o código na unit ACBrUniprimeNortePR.pas de:

if (StrToIntDef(aIdentificacaoOcorrencia,0) < 5) or (StrToIntDef(aIdentificacaoOcorrencia,0) > 55) then
  raise Exception.Create(ACBrStr('O número de dias a protestar / negativar '+
      'deve ser mínimo 05 a máximo 55 dias'));

para:

if (
  (iInstrucao1 <> 3) and (iInstrucao1 <> 99) and
  (StrToIntDef(aIdentificacaoOcorrencia,0) < 5) or (StrToIntDef(aIdentificacaoOcorrencia,0) > 55)
) then
  raise Exception.Create(ACBrStr('O número de dias a protestar / negativar '+
      'deve ser mínimo 05 a máximo 55 dias'));

A princípio seriam essas alterações

 

Desde já, muito obrigado 

 

ACBrUniprimeNortePR.pas Manual_de_CobranA34a_-_Layout_CNAB_400_Atualizado.pdf

[Ronaldo.Bispo]

Apenas pra reportar,

Foi corrigido no commit 30235 dia 1-agosto..

Muito obrigado.

[Alexandre de Paula]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.