Ir para conteúdo
  • Cadastre-se

dev botao

PIX - Não muda chave no componente


Ver Solução Respondido por New Line System Desenvolvimento,

Recommended Posts

  • Fundadores

Verifique se você está atribuindo a nova chave ao componente ACBrPSPxxx que está ligado no componente ACBrPIXCD

Exemplo,para mudar a chave no Bradesco

  ACBrPSPBradesco1.ChavePIX := edBradescoChavePIX.Text;
  ACBrPSPBradesco1.ClientID := edBradescoClientID.Text;
  ACBrPSPBradesco1.ClientSecret := edBradescoClientSecret.Text;
  ACBrPSPBradesco1.ArquivoPFX := edBradescoArqPFX.Text;
  ACBrPSPBradesco1.SenhaPFX := edBradescoSenhaPFX.Text;      

 

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
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

  • Membros Pro
20 minutos atrás, Daniel Simoes disse:

Verifique se você está atribuindo a nova chave ao componente ACBrPSPxxx que está ligado no componente ACBrPIXCD

Exemplo,para mudar a chave no Bradesco

  ACBrPSPBradesco1.ChavePIX := edBradescoChavePIX.Text;
  ACBrPSPBradesco1.ClientID := edBradescoClientID.Text;
  ACBrPSPBradesco1.ClientSecret := edBradescoClientSecret.Text;
  ACBrPSPBradesco1.ArquivoPFX := edBradescoArqPFX.Text;
  ACBrPSPBradesco1.SenhaPFX := edBradescoSenhaPFX.Text;      

 

 

 

sim está ligado

Seria para o Sicredi o cliente tem duas empresas, dai quando eu troco de uma empresa para outro, o componente não muda a chave, fiz o teste tbm usando o demo, sem fechar o demo só fiz a leitura do INI c/ dados de uma empresa gerei o QRCode normal, dai sem fechar fiz a leitura o INI da outra empresa e fica a chave da primeira.

 

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Não há como testar o Demo, com duas empresas... No Demo a configuração de chave, é feita por PSP, e permite a digitação de apenas uma chave...

Provavelmente a sua rotina de configuração do componente, não está sendo executada corretamente, ou não está sendo executada antes da chamada

Nos fontes do Demo do ACBr, também demonstram como configurar a chave no Sicred, veja em: procedure TForm1.ConfigurarACBrPSPs;

  ACBrPSPSicredi1.ChavePIX := edSicrediChavePIX.Text;
  ACBrPSPSicredi1.ClientID := edSicrediClientID.Text;
  ACBrPSPSicredi1.ClientSecret := edSicrediClientSecret.Text;
  ACBrPSPSicredi1.ArquivoChavePrivada := edSicrediArqChavePrivada.Text;
  ACBrPSPSicredi1.ArquivoCertificado := edSicrediArqCertificado.Text;        

 

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
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

  • Membros Pro
2 minutos atrás, Daniel Simoes disse:

Não há como testar o Demo, com duas empresas... No Demo a configuração de chave, é feita por PSP, e permite a digitação de apenas uma chave...

Provavelmente a sua rotina de configuração do componente, não está sendo executada corretamente, ou não está sendo executada antes da chamada

Nos fontes do Demo do ACBr, também demonstram como configurar a chave no Sicred, veja em: procedure TForm1.ConfigurarACBrPSPs;

  ACBrPSPSicredi1.ChavePIX := edSicrediChavePIX.Text;
  ACBrPSPSicredi1.ClientID := edSicrediClientID.Text;
  ACBrPSPSicredi1.ClientSecret := edSicrediClientSecret.Text;
  ACBrPSPSicredi1.ArquivoChavePrivada := edSicrediArqChavePrivada.Text;
  ACBrPSPSicredi1.ArquivoCertificado := edSicrediArqCertificado.Text;        

 

Eu não faço as duas ao mesmo tempo, faço uma e depois faço leitura dos dados da segunda, e o componente mesmo colocando os dados da segunda empresa permanece com os dados da primeira.

 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
7 minutos atrás, New Line System Desenvolvimento disse:

Eu não faço as duas ao mesmo tempo, faço uma e depois faço leitura dos dados da segunda, e o componente mesmo colocando os dados da segunda empresa permanece com os dados da primeira.

 

 

image.thumb.png.73df3208d27365c4c70cee487be6048c.png

 

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Desculpe, não estou compreendendo a sua postagem...

por favor detalhe um passo a passo, de como reproduzir o problema no Demo do ACBr...

Observe ainda nos fontes do Demo, que a chave é informada na geração da cobrança...

procedure TForm1.btCriarCobVClick(Sender: TObject);
...
  with ACBrPixCD1.PSP.epCobV.CobVSolicitada do
  begin
    Clear;
    chave := ACBrPixCD1.PSP.ChavePIX;

 

procedure TForm1.btCriarCobrancaImediataClick(Sender: TObject);
...
  with ACBrPixCD1.PSP.epCob.CobSolicitada do
  begin
    Clear;
    chave := ACBrPixCD1.PSP.ChavePIX;  

 

 

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
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

  • Consultores

Olá @New Line System Desenvolvimento,

Após analisar seu log vi que o problema não está relacionado com a Chave Pix, pois ela está sendo alterada corretamente.

O motivo do erro é que o componente não está fazendo uma nova autenticação após a alteração das credenciais. 
Então estava sendo enviada uma criação de cobrança, utilizando o Token das credenciais anteriores.

Fiz uma alteração para forçar essa nova autenticação. Disponível no SVN, rev: 32131.

Atualize seus fontes, reinstale o ACBr e refaça o teste, por favor.

  • Curtir 2
Consultor SAC ACBr

Elias César Vieira
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil
Assine o
SAC

 
Link para o comentário
Compartilhar em outros sites

  • Membros Pro
  • Solution
17 horas atrás, Daniel Simoes disse:

Desculpe, não estou compreendendo a sua postagem...

por favor detalhe um passo a passo, de como reproduzir o problema no Demo do ACBr...

Observe ainda nos fontes do Demo, que a chave é informada na geração da cobrança...

procedure TForm1.btCriarCobVClick(Sender: TObject);
...
  with ACBrPixCD1.PSP.epCobV.CobVSolicitada do
  begin
    Clear;
    chave := ACBrPixCD1.PSP.ChavePIX;

 

Bom dia!! funcionando perfeitamente.. Obrigado

  • Curtir 2
Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.