Lucio Bittes

Bom dia. Por enquanto não vou conseguir. Provável que mês que vem talvez possa iniciar o processo. Vai depender muito da demanda, que por sinal sempre tá acumulada rsrs. Esse último anexo e que você está usando ne?

Bom dia. Deu certo da maneira q fiz

Boa tarde. Sim, funcionou corretamente com as informações do proxy do jeito que fiz.

Acabei de efetuar a consulta e retornou com sucesso. Obrigado!

Bom dia. Podem me auxiliar se dessa maneira está correto?

Bom dia @Daniel InfoCotidiano conseguiu efetuar o teste? Obrigado!

Bom dia. Não, tô esperando resposta. Muito moroso o pessoal do banco. Credo.

Não sei. Porque estamos tentando emitir retornando o qrcode primeramente para depois implementar no ACBr. Estou travado nessa questão porque não conseguir emitir com informação do PIX. Estou aguardando retorno do banco até hoje.

Bom dia. Como faço para passar as configurações do proxy para o httpsend? Eu vi que ele pega do BoletoWS mas o DefinirProxy fica no final do processo que deveria ser o primeiro onde ele pega o token. Não conseguir alimentar ele. No demo adicionei o comando na configuração. Boleto.Configuracoes.WebService.ProxyHost := ''; Boleto.Configuracoes.WebService.ProxyPort := ''; Boleto.Configuracoes.WebService.ProxyUser := ''; Boleto.Configuracoes.WebService.ProxyPass := ''; No ACBrBoleto.Enviar adicionei essas linhas para pegar o proxy do webService. function TACBrBoleto.Enviar: Boolean; var RemessaWS: TBoletoWS; begin if not (Configuracoes.WebService.Operacao in [tpConsulta]) then if ListadeBoletos.Count < 1 then raise Exception.Create(ACBrStr('Lista de Boletos está vazia')); ChecarDadosObrigatorios; //Instancia classe para Registro Boleto WebService RemessaWS := TBoletoWS.Create(Self); try RemessaWS.ProxyHost := Configuracoes.WebService.ProxyHost; RemessaWS.ProxyPort := Configuracoes.WebService.ProxyPort; RemessaWS.ProxyUser := Configuracoes.WebService.ProxyUser; RemessaWS.ProxyPass := Configuracoes.WebService.ProxyPass; ListaConsultaRetornoWeb.Clear; try Result:= RemessaWS.Enviar; Except on E:Exception do begin if ( ( RemessaWS.RetornoBanco.CodRetorno = 0 ) and ( Trim( RemessaWS.RetornoBanco.Msg ) = '' ) ) then raise Exception.Create(ACBrStr('Erro: ' + E.Message)) else raise Exception.Create(ACBrStr('Erro: ' + IntToStr(RemessaWS.RetornoBanco.CodRetorno) + sLineBreak + RemessaWS.RetornoBanco.Msg + sLineBreak)); end; end; finally RemessaWS.Free; end; end; E no ACBrBoletoWS.Rest mudei o definirProxy no inicio. Assim conseguir usar o proxy. Mas não sei se e a maneira correta. function TBoletoWSREST.Enviar: Boolean; begin BoletoWS.RetornoBanco.CodRetorno := 0; BoletoWS.RetornoBanco.Msg := ''; DefinirProxy; DefinirAuthorization; DefinirURL; DefinirContentType; DefinirCertificado; //Grava json gerado if Boleto.Configuracoes.Arquivos.LogNivel >= logSimples then BoletoWS.DoLog('Comando Enviar: ' + ClassName); if Boleto.Configuracoes.Arquivos.LogNivel >= logSimples then BoletoWS.DoLog('Comando Enviar: ' + FPDadosMsg); try Executar; finally Result := (BoletoWS.RetornoBanco.HTTPResultCode in [ 200 .. 207 ]); if Boleto.Configuracoes.Arquivos.LogNivel >= logSimples then begin BoletoWS.DoLog('Retorno Envio: ' + Self.ClassName); BoletoWS.DoLog('Código do Envio: ' + IntToStr(BoletoWS.RetornoBanco.HTTPResultCode)); end; if Boleto.Configuracoes.Arquivos.LogNivel >= logParanoico then begin if Result then //Grava retorno BoletoWS.DoLog('Retorno Envio: ' + FRetornoWS) else BoletoWS.DoLog('Retorno Envio: ' + IfThen(BoletoWS.RetornoBanco.CodRetorno > 0, sLineBreak + 'ErrorCode=' + IntToStr(BoletoWS.RetornoBanco.CodRetorno), '') + sLineBreak + 'Result=' + NativeStringToAnsi(FRetornoWS)); end; end; end;

Confirma o recebimento por favor. Te mandei também o print do postman com o retorno do boleto. Aqui tem os logs se precisar.

Vi que está com o mesmo problema. No meu caso não e o certificado e nem o clientid. Porque no postman funciona e tras a informação. No exemplo tras somente o erro 400 Bad request.

Bom dia. Tentei de tudo para fazer a bendita consulta mas sem sucesso.

Você inclusive tinha comentado comigo sobre o assunto. Estou com as credenciais para efetuar a consulta.

Sim, clientid e clientsecret e o certificado são todos os mesmos. LogSimples.txt 2024.03.25.17.57.40.348-RetornoConsultaDetalhe.txt Sao todos os mesmos. Já comparei todos os detalhes. São todos os mesmos. Não sei se e alguma coisa que ta faltando.

Sim, nenhuma diferença. Inclusive a mesma url e criada corretamente. Os dois estão iguais.

Coloquei o log 25/03/24 17:06:18:578 - Comando Enviar: TOAuth 25/03/24 17:06:18:580 - URL: [POST] https://sts.itau.com.br/api/oauth/token 25/03/24 17:06:18:999 - Validade: 25/03/2024 17:11:18 25/03/24 17:06:26:068 - Comando Enviar: TBoletoW_Itau_API 25/03/24 17:06:27:222 - Comando Enviar: 25/03/24 17:06:55:891 - URL: [GET] https://secure.api.cloud.itau.com.br/boletoscash/v2/boletos?id_beneficiario=065400139211&codigo_carteira=109&nosso_numero=00020001 25/03/24 17:07:01:848 - Retorno Envio: TBoletoW_Itau_API 25/03/24 17:07:01:848 - Código do Envio: 400 Pelo postman. Já olhei tudo e não to conseguindo identificar o ponto da onde ta me retornando o erro.

Dei uma olhada nesse topico e o retorno e o mesmo, mas no meu caso gerou corretamente.

Bom dia. Na consulta alguem ta tendo problema. No componente passei parte a parte debugando e a unica coisa que vi diferente foi no preenchimento do KeyUser procedure TBoletoW_Itau_API.DefinirKeyUser; begin if Boleto.Cedente.CedenteWS.IndicadorPix then begin if Assigned(ATitulo) then FPKeyUser := 'x-itau-correlationID: ' + Boleto.Cedente.CedenteWS.ClientID; end else FPKeyUser := 'x-itau-apikey: ' + Boleto.Cedente.CedenteWS.ClientID + #13#10 + 'x-itau-flowID: 1' + #13#10 + 'x-itau-correlationID: ' + GerarUUID; end; Fiz essa alteração que ta igual do postman que fiz o teste e deu certo. No demo ta me retornando Erro 400.2024.03.25.09.21.56.240-RetornoConsulta.txt No postman estou conseguindo trazer essa informação. Não sei o que pode ser. Ja verifiquei todos os outros pontos e so tras o erro 400

Mesmo que anexei aqui. No meu retorno nao veio com o qrcode. Banco acabou de falar que estão verificando. Vou anexar aqui o que retornou. { "cidtfdProdCobr": 9, "cnegocCobr": 387700000000060550, "cpssoaJuridContr": 2269651, "ctpoContrNegoc": 48, "nseqContrNegoc": 2337802, "cprodtServcOper": 1730, "ctitloCobrCdent": 32222233350, "tp08Reg1": 1, "agencCred10": 0, "ctaCred10": 0, "digCred10": "00", "cip10": 0, "codStatus10": 1, "status10": "A VENCER/VENCIDO", "cedente10": "CNPJ TIPO 2 - EMPRESA - TESTE GATEWAY SR", "endCedente10": "NUC CIDADE DE DEUS, S 123 TESTE ENDE", "nroEndCed10": "", "comEndCed10": "", "baiCedente10": "VILA YARA", "cepEndCed10": 6029, "cepcCedente10": 900, "cidCedente10": "OSASCO", "ufCedente10": "SP", "razCredt10": 0, "nomeSacado10": "LUCIO BITTES", "cnpjSacado10": 00001701000002, "endSacado10": "RUA MARABA", "baiSacado10": "PQ MONTREAL", "cidSacado10": "APARECIDA DE GOIANIA", "ufSacado10": "GO", "cepSacado10": 74988, "cepcSacado10": "200", "cebp10": "", "debitoAuto10": "", "aceite10": "N", "enderecoEma10": "[email protected]", "nomeSacador10": "", "cnpjSacador10": 0, "endSacador10": "", "cidSacador10": "", "ufSacador10": "", "cepSacador10": 0, "cepcSacador10": 0, "tp08Reg2": 2, "cense10": 0, "agenOper10": 0, "bcoDepos10": 0, "agenDepos10": 0, "snumero10": "999665-1-1", "dataReg10": "22032024", "especDocto10": "DM", "descrEspec10": "", "valorIof10": 0, "dataEmis10": "22032024", "especMoeda10": "R$", "qtdeMoeda10": 0, "qtdeCas10": 2, "dataVencto10": "23.03.2024", "descrMoeda10": "R$", "valMoeda10": 5000, "valAbat10": 0, "dataInstr10": "", "diasProt10": 0, "dataCartor10": "", "numCartor10": "", "numProtoc10": "", "dataPedSus10": "", "dataSust10": "", "dataMulta10": "23032024", "valMulta10": 1.0, "qtdeCasMul10": 2, "codValMul10": 1, "descrMulta10": "VALOR FIXO", "dataPerm10": "23032024", "valPerm10": 12, "qtdeCasDe110": 0, "descrDesc110": "VALOR ANTECIPACAO DIA CORRIDO", "qtdeCasDe210": 0, "descrDesc210": "", "qtdeCasDe310": 0, "descrDesc310": "", "diasMulta10": 1, "diasJuros10": 1, "codBarras10": "<NWnnwnNnWwnWnNwnWWnnnnWNwnnWWnnnWWnNnWwnnnWWnNNwwnwnnWNnnNWwNWnwnnWnnWnWnnWNWnnwWWnnnwnWNnnnWWnnwWNnWnWnnnnWWn>", "linhaDig10": "23793.87703 93222.223336 50006.055003 2 96640000005000", "despCart10": 0, "bcoCentr10": 0, "ageCentr10": 0, "acessEsc10": 0, "tipEndo10": "", "oriProt10": 0, "corige3510": "", "ctpoVencto10": 0, "codInscrProt10": 0, "codDecurPrz10": 0, "qtdDDecurPrz10": 0, "ctpoAbat10": 0, "codComisPerm10": 1, "ctpoDesc110": 0, "ctpoDesc210": 0, "ctpoDesc310": 0, "ctrlPartic10": "00811927249996650001", "diasComisPerm10": 1, "codComisPerm101": 1, "qmoedaComisPerm": 0.12, "cnpjCpfCedente10": "086342625000157", "valorMoedaBol10": 0, "dataVenctoBol10": "23/03/2024", "indTitParceld10": "", "indParcelaPrin10": "", "indBoletoDda10": "", "dataLimitePgt10": "23/03/2024", "dataImpressao10": 22032024, "horaImpressao10": 0, "identTitDda10": 0, "exibeLinDig10": "N", "permPgtoParcial": "N", "qtdePgtoParcial": 0, "filler5": "", "cindcdCobrMisto": "S", "ialiasAdsaoCta": "28cf76fd-df0f-4c64-a02d-55634a99b6d7", "iconcPgtoSpi": "20240322237093877006055032222233350", "caliasAdsaoCta": "", "ilinkGeracQrcd": "", "wqrcdPdraoMercd": "", "validadeAposVencimento": 0, "qFiller6": "", "sfiller6": "", "sfase": 1 }

Nas duas. Mas nenhuma das duas retornou os dados do QRCode.

Esse erro ta na API normal. Na hibrida estou registrando mas não retorna nenhuma informação do qrcode.

Falei com o suporte do bradesco referente ao registro do boleto que não retorna os dados do qrcode. tanto na api normal tanto na hibrida e eles mudou alguma coisa la que agora ta retornando esse erro no registro. Resolveu falando com o suporte? Como resolveu?

Pode ser permissao mesmo. Porque aqui ta registrando normalmente.

Demo registrado no hibrido. Removi as DLL pra anexar. Se der que o boleto ja existe então troque o numero "ctitloCobrCdent":"22222233346" por exemplo para "ctitloCobrCdent":"22222233347" delphi-api-bradesco-main.rar

De acordo com o manual se vc voltar o topico nas primeiras pagina vai ver que ele troca os espaços, troca o = para vazio e assim por diante. no exemplo consigo pegar normal que ta anexado aqui. se não ta conseguindo com certeza e o seu certificado. manda o email para o banco solicitando. tem o passo a passo no manual para conseguir o mesmo.