Gerar autenticação token Santander

[DanielOliver]

Bom dia, estou com uma pequena dúvida que deve ser sanada bem fácil, consegui fazer toda autenticação do santander, certificado, id tudo, minha única dúvida está nessa linha de código

 

function TOAuth.GerarToken: Boolean;
var
  LToken : String;
  LExpire: TDateTime;
begin

  //if (Assigned(FACBrBoleto.OnAntesAutenticar)) then
  //begin
    CarregaCertificados;
    FACBrBoleto.OnAntesAutenticar(LToken, LExpire);
    FToken  := LToken;
    FExpire := LExpire;
  //end;

  if (Token <> '') and (CompareDateTime(Expire, now) = 1) then //Token ja gerado e ainda válido
    Result := true
  else //Converte Basic da Autenticação em Base64
    Result := Executar('Basic ' + String(EncodeBase64(AnsiString(ClientID + ':' + ClientSecret))));

  if (Assigned(FACBrBoleto.OnDepoisAutenticar)) then
    FACBrBoleto.OnDepoisAutenticar(Token, Expire);
end;

end.


Nessa parte 
  //if (Assigned(FACBrBoleto.OnAntesAutenticar)) then

Não sei como alimentar isso, aí estava testando não carregava os certificados e dava erro de credencial, só comentei a linha funcionou. Só não tenho como deixar assim porque vou implementar outros bancos e aí pode dar problema com algum que não precise certificado. 

[Juliomar Marchetti]

Acho que deveria ter uma negação ai

ou melhor esse carregar deveria de estar fora se ele já não carrega em outros lugares

[DanielOliver]

Obrigado, é um código que está dentro da fonte do acbr por isso estranhei, mas vou arrumar dessa forma que você falou, Valeu. 

[SG Sistemas]

Bom dia, estou com esse mesmo problema. Vc teve alguma solução?

[Juliomar Marchetti]

3 horas atrás, SG Sistemas disse:

Bom dia, estou com esse mesmo problema. Vc teve alguma solução?

só por desencargo. está atualizado o ACBR e rodado o isntalador?

também alimentou o componente conforme os tópicos e o exemplo pra gerar? 

seguiu um tópico que tem sobre o santander?

[SG Sistemas]

Oi Juliomar, 
Sim para todas as perguntas.

Já avançamos desse ponto aqui.

Obrigado pelo retorno!

 

Editado 1 Julho, 2025 por SG Sistemas
Erro de português.

[Juliomar Marchetti]

Ok. tu comentou a linha falada acima e funcionou?: