Ir para conteúdo
  • Cadastre-se

dev botao

Banco Safra - 240 - Retorno


Guess
Ver Solução Respondido por José M. S. Junior,
  • Este tópico foi criado há 1498 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa Tarde, 

Homologamos a remessa do banco safra cnab 240 posições, porem ao fazer a leitura do arquivo do retorno o acbr informou que a rotina não esta implementada.
porem existe a procedure lerretorno240 dentro do Acbr.
gostaria que verificasse por favor.
 

anexo, o arquivo de retorno utilizado.

RETORNO_500JJEMPREE0055822843.txt

Link para o comentário
Compartilhar em outros sites

  • Administradores

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

O Layout remessa esta 240, inclusive como citei a remessa já foi homologada também no 240.

Identifiquei o seguinte no código-fonte, 

existem 2 tipos de layout para o banco safra.

são eles: cobbancosafra(estou usando esse) e cobsafrabradesco.
porem ao ler o retorno, esta entrando na rotina do cobsafrabradesco.

sendo que esta configurado em meu sistema cobbancosafra

unction TACBrBoleto.GetTipoCobranca(NumeroBanco: Integer; Carteira: String = ''): TACBrTipoCobranca;
begin
  case NumeroBanco of
    001: Result := cobBancoDoBrasil;
    003: Result := cobBancoDaAmazonia;
    004: Result := cobBancoDoNordeste;
    008,033,353: Result := cobSantander;RETORNO_500JJEMPREE0055822843.txt
    021: Result := cobBanestes;
    041: Result := cobBanrisul;
    070: Result := cobBRB;
    091: Result := cobUnicredRS;
    097: Result := cobCrediSIS;
    099: Result := cobUniprime;
    104: Result := cobCaixaEconomica;
    136: Result := cobUnicredES;
    237: Result := cobBradesco;
    341: Result := cobItau;
    389: Result := cobBancoMercantil;
    748: Result := cobSicred;
    756: Result := cobBancoob;
    399: Result := cobHSBC;
    422: Result := cobSafraBradesco;
    085: Result := cobBancoCECRED;
    047: Result := cobBanese;
    745: Result := cobCitiBank;
    246: Result := cobBancoABCBrasil;
    707: Result := cobDaycoval;
    084: Result := cobUniprimeNortePR;
    643: begin
          if StrToInt(Carteira) = 9 then
             Result := cobBancoPineBradesco
           else
             Result := cobBancoPine;
         end;
  else
    raise Exception.Create('Erro ao configurar o tipo de cobrança.'+
      sLineBreak+'Número do Banco inválido: '+IntToStr(NumeroBanco));
  end;

 

 

como devo proceder?

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
  • Solution

Bom dia @Guess,

Creio que essa chamada da função GetTipoCobranca possa ser alterada para cobBancoSafra até mesmo porque aparentemente correspondente SafraBradesco não está sendo mais homologado.

Mas note pelo código, que essa rotina é chamada apenas quando o código do banco especificado no componente não é o mesmo do arquivo Retorno. Realizando um teste com seu arquivo aqui, leu normalmente na classe correta: BancoSafra, basta setar antes no componente o Banco correto.

ex:

ACBrBoleto1.Banco.TipoCobranca:= cobBancoSafra;

  • Curtir 1
Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...
  • Moderadores
32 minutos atrás, Guess disse:

Fiz a troca da chamada para cobbancosafra e funcionou.
então esta incorreto no arquivo.
faço o commit ou envio aqui a alteracao?

foi basicamente a alteracao q voce solicitou.
 

Favor anexar a Unit alterada para validação e atualização no SVN.

Consultor SAC ACBr

José Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.