Erro na Geração de Token - ACBrBoleto -API Sicoob [2]

[Eduardo Jose Bonfante]

Bom dia a todos
Estou com o mesmo problema relatado no link

https://www.projetoacbr.com.br/forum/topic/77351-erro-na-geração-de-token-acbrboleto-api-sicoob/

Erro:
'Expected "{" but found identifier (1, 10)'.

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

  if (Assigned(FACBrBoleto.OnAntesAutenticar)) then
  begin
    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
ERRO NESSA LINHA>>>>>>    Result := Executar('Basic ' + String(EncodeBase64(AnsiString(ClientID + ':' + ClientSecret))));

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

Como estou enviando...

    Boleto.Configuracoes.WebService.Ambiente := taProducao;
    Boleto.Cedente.CedenteWS.ClientID        := vAPI_SICOOB_PROD_CLIENT_ID;
    Boleto.Cedente.CedenteWS.ClientSecret    := vAPI_SICOOB_PROD_CLIENT_ID;
    Boleto.Cedente.CedenteWS.KeyUser         := ''; //Deixar em branco (Access token (Bearer) criado pela solucao ACBr)

    Boleto.Configuracoes.WebService.ArquivoKEY   := vAPI_SICOOB_PROD_ARQ_PRIVADA; //'c:\ChavePrivada.key';
    Boleto.Configuracoes.WebService.ArquivoCRT   := vAPI_SICOOB_PROD_ARQ_CERTIF;  //'c:\ChavePublica.pem';
    Boleto.Configuracoes.WebService.ChavePrivada := vAPI_SICOOB_PROD_CHAVEPIX;

    Boleto.Configuracoes.WebService.ArquivoKEY   := vAPI_SICOOB_PROD_ARQ_PRIVADA; //'c:\ChavePrivada.key';

    Boleto.Configuracoes.WebService.Certificado  := 'E:\Sistemas\****\Certificado\******************.pfx';
    Boleto.Configuracoes.WebService.Senha        := '*****************';

Algupem pode me ajudar?
 

[Juliomar Marchetti]

Hum não fique informando todos os campos.

veja se tem dados e dai partindo disso informa ao componente

acho que vai resolver

[Eduardo Jose Bonfante]

Tentei fazer isso e não obtive sucesso.

Esse é o retorno que tenho

01/10/24 16:13:44:747 - Autenticando Token... 
01/10/24 16:13:44:751 - Comando Enviar: TOAuth
01/10/24 16:13:44:751 - Header Envio:Authorization: Basic ZmQ2Nzg5MGYtNTQxMS00N2VjLThjNDQtZDI4YTJkNWQyZjI2OmZkNjc4OTBmLTU0MTEtNDdlYy04YzQ0LWQyOGEyZDVkMmYyNg==

01/10/24 16:13:44:751 - URL: [POST] https://auth.sicoob.com.br/auth/realms/cooperado/protocol/openid-connect/token
01/10/24 16:13:44:751 - Body Envio (Payload):client_id=************************************&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials
01/10/24 16:13:45:021 - Erro: HTTP_Code=400 Erro=Invalid client credentials
01/10/24 16:13:45:021 - Header Resposta:HTTP/1.1 400 Bad Request
Cache-Control: no-store
X-XSS-Protection: 1; mode=block
Pragma: no-cache
X-Frame-Options: SAMEORIGIN
Referrer-Policy: no-referrer
Date: Tue, 01 Oct 2024 19:06:01 GMT
Strict-Transport-Security: max-age=16070400; includeSubDomains
X-Content-Type-Options: nosniff
Content-Type: application/json
Content-Length: 80
 

[jefferson01]

Bom dia!

Também estou com problema ao gerar o token para o SIcoob. Segue baixo o log:

10/10/24 11:03:51:063 - Body Resposta (payload):client_id=XXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials
10/10/24 11:03:51:063 - Falha Envio: Falha na Autenticação: HTTP_Code=500 Erro=client_id=XXXXXXXXXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials
10/10/24 11:40:23:739 - Autenticando Token... 
10/10/24 11:40:23:747 - Comando Enviar: TOAuth
10/10/24 11:40:23:747 - Header Envio:Authorization: Basic MGI0MjU2ODMtNTQzZS00MWNlLTkxZDYtM2VjNjg2NTliNTkzOjBiNDI1NjgzLTU0M2UtNDFjZS05MWQ2LTNlYzY4NjU5YjU5Mw==

10/10/24 11:40:23:747 - URL: [POST] https://auth.sicoob.com.br/auth/realms/cooperado/protocol/openid-connect/token
10/10/24 11:40:23:748 - Body Envio (Payload):client_id=XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials
10/10/24 11:40:23:821 - Erro: HTTP_Code=500 Erro=client_id=XXXXXXXXXXXXXXXXXXXXXXXX&scope=boletos_inclusao boletos_consulta boletos_alteracao&grant_type=client_credentials
10/10/24 11:40:23:822 - Header Resposta:POST /auth/realms/cooperado/protocol/openid-connect/token HTTP/1.1
Host: auth.sicoob.com.br
Keep-Alive: 300
Connection: keep-alive
User-Agent: Mozilla/4.0 (compatible; Synapse)
Content-Type: application/x-www-form-urlencoded
Content-Length: 134
Authorization: Basic MGI0MjU2ODMtNTQzZS00MWNlLTkxZDYtM2VjNjg2NTliNTkzOjBiNDI1NjgzLTU0M2UtNDFjZS05MWQ2LTNlYzY4NjU5YjU5Mw==

 

Não sei o que estamos fazendo de errado. Se alguém puder orientar fico muito agradecido.

Att. Jefferson

[Juliomar Marchetti]

V2 ou V3 . lembre-se houve mudança e tem unit nova

[Eduardo Jose Bonfante]

V3

[jefferson01]

Aqui é V3 também!

[jefferson01]

Bom dia!

Verificando em debug, percebemos que na geração do token o retorno está sendo o mesmo valor enviado no Body. Não sabemos o que estamos fazendo de erro. Os testes estão sendo realizados no aplicativo de exemplo. Segue anexo do que observamos.

 

 

 

Editado 11 Outubro por jefferson01
As imagens estavam fora de ordem

[Juliomar Marchetti]

Então seus fontes estão bem desatualizados

essa unit ai não é mais usada. é outra

[jefferson01]

@Juliomar Marchetti, Obrigado pelo retorno.

Os fontes aqui estão atualizados.

Att. Jefferson

[Juliomar Marchetti]

Ao que tá parecendo em algum lugar tu tem setado o pathe e está usando a unit jsons

mas se notar no código do svn na parte do ACBrBoleto não tem mais o uso dessa unit por isso perguntei se está atualizado

[jefferson01]

@Juliomar Marchetti, se retiro json4delphi do path passa a apresentar erro em ACBrJSON. Diz que não encontrou Jsons.dcu.

Utilizamos o Delphi 7.

[Juliomar Marchetti]

es´ta estranho

vou pedir para ambos fazerem o seguinte.

primeiro eliminar a pasta toda do ACBR.

baixar ela novamente e rodar o instalador.

não faça backup e se existir outras exclua. também marque a opção remover tudo antes de instalar

 

[Eduardo Jose Bonfante]

@Juliomar Marchetti
Fiz tudo que sugeriu, mas infelizmente não consegui
Obrigado pela ajuda, e fico por aqui com esse assunto (o meu cliente trocou de banco e abortou esse  projeto de PIX/Boleto), não tenho mais como testar

[jefferson01]

Fiz o procedimento e continuo com o problema. O estranho é que utilizo a API do Banco Inter(V2 e V3 com PIX) e Itaú(Com PIX) sem problema nenhum.

[Daniel InfoCotidiano]

@jefferson01 @Eduardo Jose Bonfante
podem testar com o programa exemplo por favor, não temos relatos de erros semelhantes.
No D7 estamos com problemas com a consulta movimentação no sicoob por enq., mas inclusao, alteracao, consultaDetalhe nao temos relatos

[jefferson01]

Boa tarde, @Daniel InfoCotidiano

Os testes que eu fiz, foram realizados com o programa exemplo.

[Juliomar Marchetti]

Eu continuo achando que vocês tem local alteração ou está vendo pastas e copias de pastas e/ou fontes locais em seus projetos