Ir para conteúdo
  • Cadastre-se

AG Sistemas

Membros Pro
  • Total de ítens

    243
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que AG Sistemas postou

  1. Deu certo. Copiei as chaves pelo botão do site do banco não selecionando o texto direto. Obrigado pessoal pela ajuda agora bora fazer testes kkkk
  2. ajustei sim estas propriedades na função ProcessarRespostaOAuth esta vindo como resposta '"Bad Request"'. Sobre os dados eu coloquei os dados de agência, conta , cedente ... com os meus dados achando que poderia ser isso
  3. Fiz o teste somente com "cobrança" marcado e "cobranca" +"arrecadação integrada ao pix" não deu certo.
  4. Bom dia Obrigado Victor H. Gonzales , tem estas 3 opções eu mudei agora para cobrança vou testar novamente
  5. bibliotecas da OpenSSL estão junto ao projeto? "eu acredito q sim pq estou usando o DEMO BOLETO" As configurações parecem corretas... Fontes estão atualizados? "Sim" O ID e Secret estão sendo passados nesse ponto que gera o erro?"Sim" O Credenciamento do APP está em homologação tbm? "sobre o credenciamento eu só marquei esta opção no serviço da api e está em homologação"
  6. boa tarde! Obrigado por responder @José M. S. Junior eu fiz igual a configuração do "Boleto Hibrido"
  7. AG Sistemas

    Boleto Pix BB

    Bom dia ! Estou implementando o boleto pix do bb. Já me cadastrei no site das api como explicado neste tópico: Estou usando o Demo do Boleto e esta me dando este erro quando tenta gerar o token não consegui identificar o pq do erro. desde já agradeço.
  8. bom dia Desculpa a minha ignorância mas não entendi ! kkkk
  9. Obrigado eu vou verificar a propriedade.
  10. AG Sistemas

    Boleto Sicred

    Bom dia ! No retorno do Sicred ele passa como padrão pessoa jurídica, verifica se é física e muda mas em seguida ele volta para jurídica teria q remover este ultimo; Na remessa as instruções colocar tira acentos Desde já agradeço.
  11. AG Sistemas

    Remessa Itau

    Olá, estou atualizando o meus fonts do Acbr e pintou uma duvida no banco Itau sobre o avalista. Aparentemente se a pessoa tiver email informado ele esta passando o bloco do avalista. Antes o email tinha q ser do próprio avalista. Acho q o mais certo seria verificar somente o CPF/CNPJ doa Avalista não o email do sacado ou cpf do avalista. ACBrBancoItau.pas
  12. Boa tarde... Mas Fazendo 1 por Vez nao ficari errado? O valor do frete vai dar extremamente alto.. ou estou errado:?
  13. AG Sistemas

    ACBR sedex

    Bom dia! Estou implementanto em um app o calculo do frete... e vou utilizar o acbr sedex.. so estou com uma duvida... Quando eu tenho apenas um item.. blz.. passo as informações comprimento, altura, largura e peso que estão no cadastro do meu produto... Mas quando meu carrinho tem mais que um item como Posso fazer isso? como é feito esse calculo? Alguem sabe me orientar..? Desde ja muito obrigado...
  14. Boa tarde! Segue anexo uma correção no retorno do sicred quando o dono da conta é pessoa fisica. Esta dando mensagem que o CNPJ tinha q ter 14 digitos. ----------------------------------------------------------Estava assim Cedente.Nome := rCedente; if Copy(rCNPJCPF,1,10) <> '0000000000' then begin if Copy(rCNPJCPF,1,3)= '000' then rCNPJCPF := Copy(rCNPJCPF,4,11); Cedente.CNPJCPF := rCNPJCPF; end; ----------------------------------------------------------Ficou assim Cedente.Nome := rCedente; Cedente.TipoInscricao:= pJuridica; if Copy(rCNPJCPF,1,10) <> '0000000000' then begin if Copy(rCNPJCPF,1,3)= '000' then begin rCNPJCPF := Copy(rCNPJCPF,4,11); Cedente.TipoInscricao := pFisica; end; Cedente.CNPJCPF := rCNPJCPF; end; ACBrBancoSicredi.pas
  15. Obrigado pela ajuda deu certo deu usei o Indy TCPClient. IdTCPClient := TIdTCPClient.Create; IdTCPClient.Host := sURL; IdTCPClient.Port := sPorta; IdTCPClient.ReadTimeout := 10000; IdTCPClient.Connect; sListaTeste := TStringList.create; IdTCPClient.IOHandler.WriteLn(sDadosNegativacao); sRespostaRequisicao := IdTCPClient.IOHandler.ReadString(449);
  16. Você esta certo. Eu não sabia oque seria este parametro. Fiz um teste usando "RecvString(timeout); " teoricamente neste modo ele teria que retornar oque o servidor mandar certo ? Tentei RecvBufferStr tambem não consegui pegar a string.
  17. Criei um projeto cliente que quando inicia ele conecta no exemplo de servidor TCP try frmPrincipal.fSocket.Connect('localhost','3434'); sRespostaRequisicao := fSocket.RecvTerminated(10000, #3); fSocket.SendString('teste passa para o servidor'); sRespostaRequisicao := fSocket.RecvTerminated(10000, #3); finally fSocket.CloseSocket; end; *O Cliente conecta no servidor e status do servidor inclui o "Conexão estabelecia..." mas não volta para a resposta de "Seja bem vindo". procedure TForm1.ACBrTCPServer1Conecta(const TCPBlockSocket: TTCPBlockSocket; var Enviar: AnsiString); begin mOutput.Lines.Add('Conexão estabelecida de: ' + TCPBlockSocket.GetRemoteSinIP ) ; Enviar := 'Seja bem vindo' + #13+#10; ExibirConexoes ; end; * a string que estou enviando " fSocket.SendString('teste passa para o servidor');" não esta chegando no servidor TCP
  18. Boa tarde! Pessoal eu fazendo os teste na minha maquina não consegui mandar a string nem receber as respostas do servidor local o conectar funciona. Mas em produção esta dando certo de conectar, enviar a string e não consegui pegar a resposta alguém consegue me ajudar. Estou seguindo o exemplo do Monitorplus com o Server TCP Desde já Agradeço.
  19. Estou usado o exemplo do tcp server e o modo que o monitor plus do larazus se comunica com o servidor. Liberei a porta no Firewall.
  20. Daniel obrigado pela ajuda mas não consegui enviar a string para o servidor não vai. Faz a conexão, não vem resposta que conectou e não envia a string. Estou sem ideias. Pq teoricamente era para ser bem simples.
  21. Peguei o exemplo de servidor TCP Server e fiz teste de conexão. A conexão acontece mas a string não transmite para o servidor estou usando assim. Se eu clicar na resposta do servidor vem o OK para o cliente mas a string que eu estou tentando enviar não passa. try fSocket := TBlockSocket.Create; fSocket.Connect('localhost','3434'); //Conecta normal fSocket.SendString(sDados); //não passou os dados sRespostaRequisicao := fSocket.RecvString(50000); // se eu clicar na resposta do servidor vem o OK //sRespostaRequisicao := UpperCase(Trim(fSocket.RecvTerminated(50000, #3))); finally FreeAndNil(fSocket); end; desde já Agradeço.
  22. Daniel, não da exception mas esta retornando FLastError : 11001 .
  23. Então eu entrei em contato com o responsável pelo serviço. E assim que da o fSocket.SendString(sDadosNegativacao) perguntei se badeu alguma coisa no servidor ele disse que não. sobre a string eu ja mandei por email e ele me passou q estava ok. O problema seria que não esta chegando no servidor dele.
×
×
  • 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...