Boleto Santander

[Luiz Carlos de Lima]

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.

[Victor H. Gonzales - Panda]

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

Manual da Ficha de Compensação ::

[Luiz Carlos de Lima]

Resolvido, Grato.

[Juliana Tamizou]

Obrigado por reportar.

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