Jump to content

dev botao

Boleto Santander


Luiz Carlos de Lima
Go to solution Solved by Victor H. Gonzales - Panda,
  • Este tópico foi criado há 1137 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Boa tarde,

Estou passando a carteira  >   Carteira := 5, então é chamado a rotina

procedure TACBrTitulo.SetCarteira(const AValue: String);
var
  aCarteira: Integer;
begin
   if fCarteira = AValue then             >  Valores   fCarteira = '' e AValue  = 005
      exit;

   with ACBrBoleto.Banco do
   begin
      aCarteira:= StrToIntDef(trim(AValue),0);

      fCarteira:=  AValue;

      if aCarteira < 1 then
         exit;

      fCarteira:= IntToStrZero(aCarteira,TamanhoCarteira);

   end;
end;

Até aí tudo bem, mas quando chama a ACBrBoleto.Imprimir, ele chama novamente a TACBrTitulo.SetCarteira(const AValue: String); e muda a carteira para 101  ( fCarteira = 005 e  AValue  = 101)

Já debuguei e não consigo descobrir onde esta carregando o 101 e porque disso.

Link to comment
Share on other sites

  • Consultores
  • Solution

Boa noite,

Conforme pode verificar nas instruções abaixo conforme o manual do Santander, informar no arquivo de registro o valor 5 para cobrança simples rápida com registro, mas na ficha de pagamento e linha digitável o valor da mesma é 101, por isso a conversão que você está vendo, no arquivo de registro 5 e na ficha de compensação 101.

Onde me recordo, utilizava no Santander carteira direto como 101

Manual CNAB de Registro ::

image.png

Manual da Ficha de Compensação ::

image.png

Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

Link to comment
Share on other sites

  • 2 weeks later...
  • Administradores

Obrigado por reportar.

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

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 to comment
Share on other sites

  • Este tópico foi criado há 1137 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.