Ir para conteúdo
  • Cadastre-se

Jean Peixoto

Membros Pro
  • Total de ítens

    326
  • Registro em

  • Última visita

  • Days Won

    1

Posts postados por Jean Peixoto

  1. 3 horas atrás, Carlos Wagno Schneider disse:

    Bom dia

    878-Rejeicao: Endereco do site da UF da Consulta por chave de acesso diverge do previsto 

    sendo retornado em vários clientes de "MG" 

    com a versão do acbrmonitor  "ACBr MonitorPLUS Ver.1.4.0.160 - x64" 

    tentamos processo síncrono e assíncrono 

    como proceder 

    grato

     

    Carlos, estou com o mesmo problema com Todos os clientes de Minas Gerais, vc conseguiu resolver?
    Inclusive com clientes que o ACBr está atualizado.

    Obs: Não utilizo o Monitor

  2. 24 minutos atrás, Aggille Sistemas de Gestão disse:

    Bom dia...

    ainda não consegui pegar o token do banco inter com FHTTPSend.. segue abaixo o codigo que estou usando.. baseado na classe TOAuth.. os parametros estão corretos, confirmei na depuração, os arquivos de certificados tambem... testei com postman, e em outras linguagens e a api está funcionando...pelo FHHTPSend retorna erro 500, conforme o manual da api esse erro é quando os parâmetros não estão corretos.. os parametros devem ir dentro do Body da requisição... consigo pegar o token com Indy...

     

      FParams :=  'grant_type=' + 'client_credentials' +
                  '&scope=' + Boleto.Cedente.CedenteWS.Scope +
                  '&client_id=' +Boleto.Cedente.CedenteWS.ClientID +
                  '&client_secret=' + Boleto.Cedente.CedenteWS.ClientSecret ;

      FHTTPSend := THTTPSend.Create;
      FHTTPSend.Sock.SSL.CertificateFile := Boleto.Configuracoes.WebService.ArquivoCRT;
      FHTTPSend.Sock.SSL.PrivateKeyFile := Boleto.Configuracoes.WebService.ArquivoKEY;
      FHTTPSend.Headers.Clear;
      LHeaders := TStringList.Create;

      try
        LHeaders.Add( 'content-type'  + ': ' + 'application/x-www-form-urlencoded' );
        LHeaders.Add( 'accept' + ': ' + 'application/json');
        FHTTPSend.Headers.AddStrings(LHeaders);
      finally
        LHeaders.Free;
      end;

      try
        FHTTPSend.Document.Position:= 0;
        WriteStrToStream(FHTTPSend.Document, AnsiString(FParams));
        FHTTPSend.HTTPMethod(MetodoHTTPToStr(htPOST), C_URL_OAUTH_PROD);
        FHTTPSend.Document.Position:= 0;
        FToken := ReadStrFromStream(FHTTPSend.Document, FHTTPSend.Document.Size ) ;
      finally

      end;
     

    Bom dia

    Estou meio perdido nos arquivos que foram modificados!

    Podem postar aqui pra eu ajudar nesses casos?

  3. 18 minutos atrás, Jean Peixoto disse:

    @Aggille Sistemas de Gestão

    Estou recebendo a mensagem 'HTTP/1.0 429 Ttoo Many Requests'

    Se eu enviar apenas um boleto por vez, ele envia! Se eu enviar mais de 1 ele dá esse erro!

    Já tentei tb fazer loop enviando 1 por vez, vai até 5! Esse é o limite mesmo ou estou fazendo algo errado?

    A mensagem completa que veio no retorno foi:

     

    Falha Envio: TBoletoW_Inter_APIErro ao gerar token de Autenticação: Código: -429 HTTP/1.0 429 Too Many Requests Mensagem:HTTP/1.0 429 Too Many Requests

  4. Em 16/01/2023 at 11:43, Victor H. Gonzales - Panda disse:

    Bom dia,

    Deveria ser na criação do TOAuth ele fazer o apontamento.

      if NaoEstaVazio(ACertificateCRT) then
        FHTTPSend.Sock.SSL.CertificateFile := ACertificateCRT;

      if NaoEstaVazio(ACertificateKEY) then
        FHTTPSend.Sock.SSL.PrivateKeyFile := ACertificateKEY;

    eu devo receber nos próximos dias um certificado de um usuário, dai eu consigo debugar tambem e facilita para ajudar.

    @Victor H. Gonzales - Panda

    Te enviei o meu certificado por email, conforme me pediu!

    • Curtir 1
  5. @Victor H. Gonzales - Panda

    Segue alteração na Unit ACBrBoletoRet_Inter_API

    Inclusão das linhas:

    ARetornoWS.DadosRet.TituloRet.ValorPago      := AJSonObject.Values['valorTotalRecebimento'].AsNumber;
    ARetornoWS.DadosRet.TituloRet.Sacado.CNPJCPF := AJSonObject.Values['pagador'].asObject.Values['cpfCnpj'].asString;
    
    ListaRetorno.DadosRet.TituloRet.ValorPago       := AJSonObject.Values['valorTotalRecebimento'].AsNumber; 
    ListaRetorno.DadosRet.TituloRet.Sacado.CNPJCPF  := AJSonObject.Values['pagador'].asObject.Values['cpfCnpj'].asString;

     

    ACBrBoletoRet_Inter_API.pas

    • Obrigado 1
  6. 56 minutos atrás, Jean Peixoto disse:

    Ótimo consegui!

    Tem dois campos que  não estavam sendo preenchidos na classe ACBrBoletoRet_Inter_API, inseri eles (ValorPago  e  CNPJCPF):

    ARetornoWS.DadosRet.TituloRet.ValorPago      := AJSonObject.Values['valorTotalRecebimento'].AsNumber; 
    
    ARetornoWS.DadosRet.TituloRet.Sacado.CNPJCPF        := AJSonObject.Values['pagador'].asObject.Values['cpfCnpj'].asString; 

    porém não sei por qual motivo o campo não recebe o valor quando é atribuído! Vc teve esse problema tb?

    O valor é retornado pelo Json, mais o campo não fica com o valor!

    Resolvido, não tinha recompilado o componente!

  7. 4 horas atrás, Aggille Sistemas de Gestão disse:

    boa tarde...a configuração é a mesma dos outros bancos.. a diferença é que tem os arquivos dos certificados... minha rotina é assim


          FACBRBoleto.Configuracoes.WebService.ArquivoCRT := FCarteira.ArquivoCRT;// 'E:\\INTER\\Certificados\\Inter API_Certificado.crt';
          FACBRBoleto.Configuracoes.WebService.ArquivoKEY := FCarteira.ArquivoKEY;//'E:\\INTER\\Certificados\\Inter API_Chave.key';

          FACBRBoleto.Configuracoes.WebService.SSLHttpLib           := httpOpenSSL;

          FACBRBoleto.Configuracoes.WebService.SSLHttpLib           := httpOpenSSL;
          FACBRBoleto.Configuracoes.WebService.SSLCryptLib          := cryOpenSSL;
          FACBRBoleto.Configuracoes.WebService.SSLXmlSignLib        := xsLibXml2;
          FACBRBoleto.Configuracoes.WebService.SSLType              := LT_TLSv1_2;
          FACBRBoleto.Configuracoes.WebService.UseCertificateHTTP   := false;
          FACBRBoleto.Configuracoes.WebService.TimeOut              := 10000;
          FACBRBoleto.Configuracoes.WebService.ArquivoPFX           := FCarteira.CERTIFICADO_DIGITAL;
          FACBRBoleto.Configuracoes.WebService.Senha                := FCarteira.SENHA_CERTIFICADO
     

    Ótimo consegui!

    Tem dois campos que  não estavam sendo preenchidos na classe ACBrBoletoRet_Inter_API, inseri eles (ValorPago  e  CNPJCPF):

    ARetornoWS.DadosRet.TituloRet.ValorPago      := AJSonObject.Values['valorTotalRecebimento'].AsNumber; 
    
    ARetornoWS.DadosRet.TituloRet.Sacado.CNPJCPF        := AJSonObject.Values['pagador'].asObject.Values['cpfCnpj'].asString; 

    porém não sei por qual motivo o campo não recebe o valor quando é atribuído! Vc teve esse problema tb?

    O valor é retornado pelo Json, mais o campo não fica com o valor!

  8. Em 05/12/2022 at 08:23, Aggille Sistemas de Gestão disse:

    bom dia... minha sugestão é que espere se implementação no ACBR... não sei como as alterações que fiz se comportariam no D7...
    O exemplo do ACBR é bem simples... por ali tenho certeza que tu vais conseguir se encontrar.. 

     

    Olá,

    @Aggille Sistemas de Gestão consegue me passar como configurou o componente para Enviar Boleto para o Inter? não estou conseguindo fazer essa configuração para comunicar com a API.

  9. Olá pessoal, 

    Gostaria de saber se vocês conhecem algum serviço (pago) para auditar informações como NCM e CFOP dos clientes, passando por parâmetro o código de barras!

    Um cliente me reportou que precisa desse serviço pra auditar sua base de dados! Me informou que a emissão de NFC-e está com essas informações incorretas nos itens dele, principalmente NCM!

    Já vi um serviço assim: https://cosmos.bluesoft.com.br/ porém percebi que as informações fornecidas por eles não são 100% confiáveis!

    Alguém utiliza esse tipo de serviço?

  10. 8 minutos atrás, Aggille Sistemas de Gestão disse:

    não vou correr esse risco.. não vou atualizar até que essas atualizações estejam no componente...

    Pode me encaminhar toda sua pasta do AcbrBoleto?

  11. 3 minutos atrás, Aggille Sistemas de Gestão disse:

    bom dia...

    não tenho informação sobre o andamento..

    não tenho acesso ao andamento.. mas eu estou usando normalmente em produção já em 2 clientes..

    quais os erros que você está tendo ?

     

    Os arquivos que vc postou, foi alterado pelo ACBr com correções/adição de outras funcionalidades para outros Boletos! Então quando compilo, dá vários erros! Tentei ir comentando mais são muitos, daí parei pra ver se talvez tivessem alguma previsão para comitar no trunk!

    Estou com certa urgência aqui pra emissão para o Inter via API!

    Obrigado pelo retorno!

  12. Em 11/11/2022 at 10:47, Aggille Sistemas de Gestão disse:

    Segue mais uma correção.. fiz um ajuste na geração a multa e juros.. confirmei os boletos no banco.. deu tudo certo.. 

    ACBrBoletoW_Inter_API.pas 26.68 kB · 4 downloads

    Leandro, 

    acabei fazendo atualização do ACBr e está dando muitos erros, quanto substituo nas pastas do acbr, colocando os arquivos que vc postou aqui!

    Sabe me dizer como anda a atualização do Trunk? Vão colocar mesmo?

  13. 51 minutos atrás, Aggille Sistemas de Gestão disse:

    Bom dia... minha empresa tem conta no banco inter.. estou usando normalmente aqui.. mas pra clientes, vou esperar o pessoa do acbr liberar no componente..

    Entendido!!

    Obrigado, vou analisar os fontes pra ir adiantando!

  14. 18 horas atrás, Aggille Sistemas de Gestão disse:

    Segue mais uma alteração na api do banco Inter..
    Não estava lendo as mensagens de erro da forma correta quando retornava codigo 400..

     

    ACBrBoletoRet_Inter_API.pas 16.94 kB · 0 downloads

    olá @Aggille Sistemas de Gestão

    Estou precisando da integração de boleto que vc fez com o banco inter! Tenho certa urgência.

    vc já está usando em produção os fontes que vc fez? Estou pensando seriamente em utilizá-los antes de o pessoal do ACBR colocar no trunk, isso pela urgência que tenho.

  15. Em 20/10/2022 at 15:28, Aggille Sistemas de Gestão disse:

    Boa tarde...

    Seguem os fontes alterados com a inclusão da API do banco Inter..
    Pra pegar o token, tive que utilizar IDHTTP, pois não consegui fazer a consulta com as classes do ACBR, pos sempre dava erro 500.
    Criei 2 propriedades na classe TDFeSSL para que sejam informados os arquivos CRT e KEY, necessários em todas as consultas, e na classe
    TDFeHttpOpenSSL, coloquei as respectivas linhas para adicionar esses arquivos, no método ConfigSection; 
      if (FpDFeSSl.ArquivoCRT <> String.Empty ) then
        FHttp.Sock.SSL.CertificateFile := FpDFeSSl.ArquivoCRT;
      if (FpDFeSSl.ArquivoKEY <> String.Empty ) then
        FHttp.Sock.SSL.PrivateKeyFile  := FpDFeSSl.ArquivoKEY;
    Tenho conta o Banco Inter..fiz testes de inclusão, cancelamento, e consultas.. e todos funcionaram. Não fiz a opção de download do Boleto, pois o ACBRBoleto ainda não comtempla.
    eu, particularmente uso o proprio compopente pra impressão dos Mesmos...

    sds,

     

    ACBrBoleto.pas 242.26 kB · 4 downloads ACBrBoletoWS.pas 35.16 kB · 4 downloads ACBrBoletoRet_Inter_API.pas 15.94 kB · 4 downloads ACBrBoletoW_Inter_API.pas 25.76 kB · 4 downloads ACBrDFeHttpOpenSSL.pas 7.82 kB · 4 downloads ACBrDFeSSL.pas 61.11 kB · 4 downloads ACBrDFeUtil.pas 19.58 kB · 4 downloads

    Olá @Aggille Sistemas de Gestão, parabéns pela iniciativa!

    @Juliana Tamizou, alguma novidade sobre add no trunk?

    • Obrigado 1
  16. Amigos,

    Estou com uma situação inusitada, utilizando o FortesRepor versão 4.0.0.1!

    Tenho a propriedade NextReport apontando para um outro relatório que deve ser impresso (são três relatórios distintos)! Quando eu visualizo pela primeira vez, ao executar o sistema, ele gera as três páginas de forma correta.

    Acontece que se eu clicar pela segunda vez em visualizar, ele só gera 2 páginas! Alguma dica?

    Se eu sair e entrar no sistema novamente ele gera as três páginas de primeira, e volta a ter o mesmo problema se eu visualizar novamente em seguida.

×
×
  • 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.

The popup will be closed in 10 segundos...