Jump to content

dev botao

Boleto Inter Erro HTTP_Code=429


Dangelo2010

Recommended Posts

  • Membros Pro

Bom dia! estou gerando os boletos do banco inter, porem quando vou gerar mais de 4 boletos eu recebo essa mensagem 'Falha na Autenticação: HTTP_Code=429 Errp=', depois de 1 minuto eu gero mais 4. como posso resolver isso e gerar mais de 4 boletos em menos de 1 minuto?

Dangelo Porto

Link to comment
Share on other sites

  • Consultores

@Dangelo2010 boa tarde !
Vou enviar uma unit para que vc possa realizar um teste em seu ambiente.
Segue o arquivo:
ACBrBoletoW_Inter_API.pas

Salve na pasta:
..\ACBr\Fontes\ACBrBoleto\WS

Rode o instalador e realize os testes por favor.

Consultor SAC ACBr

Daniel de Morais (Infocotidiano)
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Link to comment
Share on other sites

  • Consultores

Pode entrar em contato com o suporte do Inter e reportar se estao com alguma instabilidade?
Header Resposta:HTTP/1.1 429 Too Many Requests
Pq por enq no inter nao tivemos relatos

image.png
https://developers.inter.co/contacts

Consultor SAC ACBr

Daniel de Morais (Infocotidiano)
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Link to comment
Share on other sites

  • Membros Pro

@Daniel InfoCotidiano, mim tire um duvida por favor

Cada boleto que tento validar eu faço assim, esta correto? Ou seja eu Limpo "FACBrBoleto.ListadeBoletos.Clear"

    While FDMReceber.Eof = False Do Begin

      Application.ProcessMessages;

      Gauge.Progress := Gauge.Progress + 1;

      If (FDMReceberNOSSO_NUMERO.AsString = '') And (FDMReceberTOTAL_BOLETO.AsFloat > 0) And (FDMReceberMES_ANO.AsString <> '') Then Begin

        FACBrBoleto.ListadeBoletos.Clear;

        Titulo                           := FACBrBoleto.CriarTituloNaLista;
        Titulo.Vencimento                := FDMReceberDATA_VENCIMENTO.AsDateTime;
        Titulo.DataDocumento             := FDMReceberDATA_EMISSAO.AsDateTime;
 

Dangelo Porto

Link to comment
Share on other sites

  • Moderadores
43 minutos atrás, Dangelo2010 disse:

@Daniel InfoCotidiano, mim tire um duvida por favor

Cada boleto que tento validar eu faço assim, esta correto? Ou seja eu Limpo "FACBrBoleto.ListadeBoletos.Clear"

    While FDMReceber.Eof = False Do Begin

      Application.ProcessMessages;

      Gauge.Progress := Gauge.Progress + 1;

      If (FDMReceberNOSSO_NUMERO.AsString = '') And (FDMReceberTOTAL_BOLETO.AsFloat > 0) And (FDMReceberMES_ANO.AsString <> '') Then Begin

        FACBrBoleto.ListadeBoletos.Clear;

        Titulo                           := FACBrBoleto.CriarTituloNaLista;
        Titulo.Vencimento                := FDMReceberDATA_VENCIMENTO.AsDateTime;
        Titulo.DataDocumento             := FDMReceberDATA_EMISSAO.AsDateTime;
 

sim para consulta detalhada e um a um sim.

só deve pegar o retorno e tratar em seu banco

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Link to comment
Share on other sites

  • Moderadores
1 minuto atrás, Dangelo2010 disse:

Eu não expliquei direito, desculpe

Nesse caso ai eu estou gerando um boleto e registrando ele online

Sim também serve, e pode ser feito.

pois tem alguns bancos não aceita fazer todos de uma vez. e senão me engano o componente até trata isso pra enviar um a um

mas se tu quer ter certeza de todos que enviou desse formato tu pode enviar

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Link to comment
Share on other sites

  • Membros Pro

Como eu uso esses dois eventos

procedure TFBoletoAutomatico.ACBrBoleto1AntesAutenticar(var aToken: string;
  var aValidadeToken: TDateTime);
begin

end;

procedure TFBoletoAutomatico.ACBrBoleto1DepoisAutenticar(const aToken: string;
  const aValidadeToken: TDateTime);
begin

end;
 

Dangelo Porto

Link to comment
Share on other sites

  • Moderadores
44 minutos atrás, Dangelo2010 disse:

Como eu uso esses dois eventos

procedure TFBoletoAutomatico.ACBrBoleto1AntesAutenticar(var aToken: string;
  var aValidadeToken: TDateTime);
begin

end;

procedure TFBoletoAutomatico.ACBrBoleto1DepoisAutenticar(const aToken: string;
  const aValidadeToken: TDateTime);
begin

end;
 

é por conta dele que está ocorrendo o Erro HTTP_Code=429?

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Link to comment
Share on other sites

  • Membros Pro
24 minutos atrás, Juliomar Marchetti disse:

é por conta dele que está ocorrendo o Erro HTTP_Code=429?

Sim

Pode fechar eu consegui entender e ajustar aqui. Fiz assim e deu certinho. Registro vários boletos em menos de 1 minuto. Obrigado!

 

procedure TFBoletoAutomatico.ACBrBoletoAntesAutenticar(var aToken: string;
  var aValidadeToken: TDateTime);
begin
  aToken := sToken;
  aValidadeToken := sExpira;
end;

procedure TFBoletoAutomatico.ACBrBoletoDepoisAutenticar(const aToken: string;
  const aValidadeToken: TDateTime);
begin
  sToken := aToken;
  sExpira := aValidadeToken;
end;
 

  • Like 2

Dangelo Porto

Link to comment
Share on other sites

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.