Código de Protesto UnicredES

[automalog]

Boa Tarde a Todos ! Estou fazendo a homologação usando o layout UnicredES e ao enviar o arquivo de remessa para homologação no formato CNAB 240 tive o retorno que tinha um problema na posição 221 do segmento P onde estava sendo enviado 1 ( dias corridos ) ao invés de 3 ( não protestar )

Depurando o fonte ACBrBancoUnicredES percebi que na linha 382 da função GerarRegistroTransacao240 onde armazena o código de protesto estava chamando um método que resultava no código errado de protesto quando não se quer a instrução de protesto

{Código para Protesto}
    ACodProtesto := DefineTipoDiasProtesto(ACBrTitulo); // linha 382 errada
    ACodProtesto := DefineCodigoProtesto(ACBrTitulo); // linha 382 correta

 

O mesmo vale para a procedure GerarRegistroTransacao400;

{Pegando campo Intruções}
    sProtesto:= DefineTipoDiasProtesto(ACBrTitulo); //InstrucoesProtesto(ACBrTitulo); // linha 119 errada
    sProtesto:= DefineCodigoProtesto(ACBrTitulo); //InstrucoesProtesto(ACBrTitulo); // linha 119 correta

Qualquer dúvida estou a disposição

Att
Adriano

[Juliomar Marchetti]

https://acbr.sourceforge.io/ACBrMonitor/Particularidades.html

olha isso

[automalog]

Agradeço o material e vou usa-lo para futuras pesquisas mas não vi particularidade em relação a esse código de protesto na unicred ou qualquer outro cedente.

Até então eu não tive esse problema pois os outros clientes no qual homologuei a Unicred protestavam.

Esse como não protesta teve essa situação pois a função DefineTipoDiasProtesto nunca retorna '3' pois no tipo enumerado TACBrTipoDiasIntrucao só existe diCorridos e diUteis

  {TipoDiasIntrucao}
  TACBrTipoDiasIntrucao = (diCorridos, diUteis);
 

function TACBrBancoClass.DefineTipoDiasProtesto(const ACBrTitulo: TACBrTitulo): String;
begin
  with ACBrTitulo do
  begin
    case TipoDiasProtesto of
       diCorridos       : Result := '1';
       diUteis          : Result := '2';
    else
       Result := '3';
    end;
  end;

end;
 

Então aí que eu vi o correto me parecia ser a chamada em DefineCodigoProtesto ao invés de DefineTipoDiasProtesto para atribuir a variável ACodProtesto

Att
Adriano

[Juliana Tamizou]

Bom dia.

Você chegou a fazer alguma alteração e obteve o resultado esperado? Se sim, anexe o pas aqui por favor.

Att.

[automalog]

Boa Tarde ! Estou aguardando o retorno da homologação. Assim que tiver o retorno posto aqui

Att
Adriano

[automalog]

Boa Tarde ! Homologado pelo banco.

Segue arquivo em anexo

Att
Adriano

ACBrBancoUnicredES.pas

[Juliana Tamizou]

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

[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