Boleto Inter API

[jmc]

Pessoal boa tarde ,

Estou tentando enviar boleto inter teste pelo demo acbr , mas mesmo configurando o arquivo de certificado e chave , o componente da erro:

CLIENT_SECRET NAO INFORMADO.

Banco inter somente gerou os arquivos zipados no site.

no q estou errando ?

Estou com duvida , gera o arquivo remessa e depois clico no registrar boleto online do demo ?

Grato pela ajuda.

Editado 31 Março, 2023 por jmcsoftware

[Renato Rubinho]

Boa noite,

3 horas atrás, jmcsoftware disse:

CLIENT_SECRET NAO INFORMADO.

Falta preencher a a propriedade.

Veja no tópico a seguir como preencher o comente para o Inter.

 

3 horas atrás, jmcsoftware disse:

Estou com duvida , gera o arquivo remessa e depois clico no registrar boleto online do demo ?

Você clica em incluir boleto e depois registrar online.

[jmc]

ficou tudo ok.

RetornoRegistro.txt

Editado 1 Abril, 2023 por jmcsoftware

[jmc]

so uma outra duvida , no arquivo retorno do banco inter nao esta informando o meu numero , esta vindo zerado , so retornando o numero do banco.

 

estou enviando meu numero no campo:

         Titulo.NumeroDocumento   := FormatFloat('000000',FDQuery1.FieldByName('ID').Value)+FormatDateTime('yyyymm',FDQuery1.FieldByName('DATAEMISSAO').AsDateTime);
         Titulo.EspecieDoc        := 'DP';

RetornoRegistro.txtRetornoRegistro.txtRetornoRegistro.txtRetornoRegistro.txt

Editado 1 Abril, 2023 por jmcsoftware

[Renato Rubinho]

Boa tarde,

procedure TBoletoW_Inter_API.RequisicaoJson;
var
  Data: string;
  Json: TJsonObject;
  aSeuNumero, aNossoNumero: String;
begin
  if Assigned(aTitulo) then
  begin
    Json := TJsonObject.Create;
    try

      aNossoNumero := OnlyNumber(aTitulo.ACBrBoleto.Banco.MontarCampoNossoNumero(aTitulo));
      aSeuNumero := aTitulo.NossoNumero; // ATitulo.SeuNumero;

      Json.Add('seuNumero').Value.asString := aSeuNumero;

No trecho acima, o SeuNumero será enviado para a API, pegando o valor da propriedade aTitulo.NossoNumero

Em 01/04/2023 at 10:32, jmcsoftware disse:

estou enviando meu numero no campo:

         Titulo.NumeroDocumento   := FormatFloat('000000',FDQuery1.FieldByName('ID').Value)+FormatDateTime('yyyymm',FDQuery1.FieldByName('DATAEMISSAO').AsDateTime);

Preencha:

Titulo.NossoNumero

Ao invés de:

Titulo.NumeroDocumento

[jmc]

boa tarde ,

coloquei a informacao no banco , no retorno json veio o seunumero tudo ok.

Mas no titulo_retorno esta vindo vazio o seu numero

 

RetornoRegistro.txt

[Daniel InfoCotidiano]

@jmcsoftware
Bom dia !
Assim que vc envia os boletos via API
se vc der um showmessage(Titulo.SeuNumero ) ou fizer um debug, ele não aparece nada?

[jmc]

outra duvida , coloquei o servidor como homologacao , mas mesmo assim ainda aparece no banco inter os boletos gerados em homologacao.

4 hours ago, Daniel InfoCotidiano said:

@jmcsoftware
Bom dia !
Assim que vc envia os boletos via API
se vc der um showmessage(Titulo.SeuNumero ) ou fizer um debug, ele não aparece nada?

sim aparece , so nao aparece no retorno do banco

[Daniel InfoCotidiano]

12 minutos atrás, jmcsoftware disse:

outra duvida , coloquei o servidor como homologacao , mas mesmo assim ainda aparece no banco inter os boletos gerados em homologacao.

Se não me engano o banco inter não tem homologação. Só produção.
 

 

13 minutos atrás, jmcsoftware disse:

sim aparece , so nao aparece no retorno do banco

O Banco te devolve o nosso número para salvar na sua base e para que vc possa imprimir.


 

[jmc]

outra duvida q estou com problemas.

eu gero o pdf do boleto apos enviar ao banco ?

pois coloquei pra salvar o pdf e o codigo barra boleto esta diferente q o banco esta devolvendo.

 

[Juliomar Marchetti]

3 horas atrás, jmcsoftware disse:

outra duvida q estou com problemas.

eu gero o pdf do boleto apos enviar ao banco ?

pois coloquei pra salvar o pdf e o codigo barra boleto esta diferente q o banco esta devolvendo.

 

tem gerar depois pois ele retorna informações pra ti

[jmc]

opa estou gerando o pdf apos o enviar ( usando api inter )

   if Boleto.Enviar then begin // <<< retorna como false se o httpresult code for diferente de 200,201,202
      ACBrBoletoFCFortes1.NomeArquivo := ExtractFilePath(Application.ExeName) + 'PDF\'+_NossoNumero + '.pdf';
      ACBrBoleto1.GerarPDF;
   end;

vem o retorno do banco correto , mas o pdf gera com codigo barra diferente

tenho q dar outro comando pra atualizar o boleto antes de gerar ?
 

[Juliomar Marchetti]

Tu tem que gerar a remessa. enviar ela, pegar o retorno, carregar no componente e mandar gerar o PDF

[jmc]

ah pensei q ler retorno era sobre cnab , to enviando por webservice

 

[jmc]

usei a funcao acbrBoleto.LerRetorno , mas parece q usa somente pra cnab e nao pro webservice.

[Juliomar Marchetti]

17 horas atrás, jmcsoftware disse:

ah pensei q ler retorno era sobre cnab , to enviando por webservice

 

há tá entendi.

no proprio enviar ele já lê e retorno.

precisa revisar como tu fez mas já está ok no enviar já retorna os dados

 

[jmc]

estou usando assim via webservice inter

 

  if Boleto.Enviar then begin 
      ACBrBoletoFCFortes1.NomeArquivo := ExtractFilePath(Application.ExeName) + 'PDF\'+_NossoNumero + '.pdf';
      ACBrBoleto1.GerarPDF;
   end;

vem o retorno do banco correto , mas o pdf gera com codigo barra diferente

[Daniel InfoCotidiano]

@jmcsoftware
qual seção está diferente por favor.
Se puder anexar o ArqBoletoWS.log (nele tem os retornos json) para compararmos.
Se conter dados sensíveis neste arquivo, pode enviar um email para [email protected] e por favor no corpo do email o link deste post no fórum para que possamos identificar e dar um retorno.
Obrigado

[jmc]

obrigado pela ajuda.

Mandei no email os Logs e PDF gerado.

 

 

[Daniel InfoCotidiano]

@jmcsoftware
Boa tarde !

Enviou para [email protected] ?
Pois não recebemos ainda, favor verificar

[jmc]

sim enviado,

de [email protected]

para  [email protected]

vou enviar novamente.

Obrigado.

Editado 6 Abril, 2023 por jmcsoftware

[Daniel InfoCotidiano]

Recebido !

[jmc]

bom dia daniel , consegui analisar o boleto apos envio dos arquivos do inter ?

[luisclaudio_jr]

Bom dia. Sobre isso, realmente está ocorrendo, o ACBR monta o código de barras usando dados como cedente.. e tudo mais.
Na API do inter, eles devolvem pra nós o código de barras e também a linha digitavel, seria interessante termos como passar esses parametros na impressão do PDF, mas pelo que vi e ja tentei aqui não deu certo, até consegui passar na linha digitavel, meu problema maior tá sendo montar o código de barras de maneira que o leitor de dados leia sem problemas.. Se alguém puder compartilhar alguma solução, seria de bom tamanho.

[Renato Rubinho]

Bom dia Luis,

Uma sugestão para você testar.

Após consultar o retorno, antes de imprimir o boleto pelo componente, revise as propriedades a seguir.

Se alguma delas estiver diferente, force o preenchimento com o valor correto e veja se a linha digitável é gerada corretamente no boleto.

Estando ok, por favor informe o que foi necessário ajustar para que possa ser analisado se deverá ser alterado algo no componente nestes casos.

1. Boleto.Cedente.Agencia = 0001

2. ACBrTitulo.Carteira = 112

*confirme se para API também é essa carteira, mas acredito que sim

3. ACBrTitulo.NossoNumero = número com DV recebido no retorno

4. Boleto.Cedente.CodigoCedente = Número da Operação

* isso você deve ver no bankline ou pegue de um boleto com linha digitável legível, da posição 13 à 19

5. ACBrTitulo.Vencimento = mesmo do boleto com linha digitável legível

6. ACBrTitulo.ValorDocumento = mesmo do boleto com linha digitável legível