Ir para conteúdo
  • Cadastre-se

Jefferson Alves da Silva

Membros
  • Total de ítens

    48
  • Registro em

  • Última visita

Tudo que Jefferson Alves da Silva postou

  1. Pessoal ,Bom dia! Estou com o mesmo problema. Android 11 o app abre e fecha. Eu atualizei o sdk pelo android tools e nada. Uso delphi berlin, para tentar resolver baixei o trial do Sydney e estou compilando lá. Mas ficou pior, agora nem no android 10 abre. Esse projeto foi feito por outro programador e estou só fazendo manutenção nele quando necessário. Tinha no projeto uma unit da Embarcadero FMX.Platform.Android e fazendo uses em duas Units, eu removi o uses e a unit do projeto e passou a compilar. Não sei qual o motivo dessa Unit esta no projeto, e pelo que vi não tem nenhuma dependência no resto do projeto nela. Agora ao compila e subir o APP no Device da o seguinte erro até : E fica congelado na tela do splash. Se compilo no Berlin funciona até Android 10, Se compilo no Sydney não funciona em nenhum android. Alguém ai com problema parecido?
  2. Juliomar, consegui o manual com eles. É que minha questão era tão urgente que queria antecipar. Mas deu tudo certo.
  3. Prezado alguém teria o manual de integração atual da Efrete para envia? Estou aguardando a inclusão no portal de Dev deles mas preciso com urgência para avaliar o tamanho da bronca. Alguém aqui sabe ainda dizer se o ACBRCIOT esta 100% funcional?
  4. Obrigado Senhores! Eu fiz um testes igual ao do BingWings e num projeto novo o retorno é correto também. E notei que é SYSUTILS nativos o comando. Vou investigar o por que esta invertendo no XML.
  5. Juliomar, grato! Fonte atualizado e funcional!
  6. Prezados, boa tarde! Ao enviar um lote de cancelamento obtive o seguinte erro de schema : Analisando os Fontes fiz uma alteração na unit pnfsNFSeG.pas De : Gerador.wCampo(tcStr, '#1', 'transacao', 01, 05, 0, LowerCase(BooltoStr(Transacao, True)), ''); Para : Gerador.wCampo(tcStr, '#1', 'transacao', 01, 05, 0, iif(Transacao,'true','false'), ''); E passou a cancelar normalmente. Segue em anexo a referida unit. Peço que verifiquem a geração deste campo e o ajuste feito. Se for correto incorporem por favor ao fonte, ou me informem o que posso estar fazendo de errado para ter problema no schema. Agradeço pnfsNFSeG.pas
  7. Prezados , Descobri o Motivo! Tem um clear no HTTPSEND no metódo HTTPGET; Substitui por ConsultaCNPJ.HTTPMethod('GET',sURL); E foi um sucesso ! Desculpe o incomodo;
  8. Prezados, bom dia !! Estou tentando consumir uma API que exige que envie authorization no Header. Segue meu código abaixo : try Consulta := TACBrHTTP.Create(Self); Consulta.HTTPSend.Headers.Add('authorization: xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx-xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx'); sURL := 'https://api.cnpja.com.br/companies/' + edtDocumento.text + '?sintegra_max_age=1'; try Consulta.HTTPGet(sURL); sRetorno := Consulta.RespHTTP.Text; iResult := Consulta.HTTPSend.ResultCode; except on E: Exception do begin ShowMessage(E.Message); screen.cursor := crDefault; end; end; finally Consulta.Free; end; Estou recebendo erro : Porém ao debugar e ver o value da consulta.HTTPSend.Heades[0] esta preenchido com o valor atribuído mas quando chega na unit ABCRSOCKET if AddUTF8InHeader then HTTPSend.Headers.Add('Accept-Charset: utf-8;q=*;q=0.7') ; A lista do Headers esta em branco. e adiciona somente o valor do Accept- Charset. Se nesse momento eu forço no Evalute/Modify um New Value atribuindo o autorizantion e a key passa normal. Como faço para atribuí o Header para que seja persistente até esse momento?
×
×
  • 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...