[ACBrIBPTax : LENTIDÃO NA PESQUISA DA TABELA IBPT]

dentro de ..\Exemplos\ACBrTCP\ACBrIBPTax\tabela tem as tabelas em csv e sempre são atualizadas pela equipe do acbr, vc poderia usar esses arquivos atualizando de forma off-line ou enviando para seu servidor proprio

 

[Fiz uma alteração nos fontes do TEFAPI]

18 horas atrás, Daniel Simoes disse:

@paulorsa,

Isso quebra os eventos implementados com a assinatura anterior, correto ?

na minha opinião e melhor solução é essa:

pois não alterou a assinatura do evento e alterou apenas o unit referente ao sitef,

na minha aplicação a alteração foi mínima.

na procedure ACBrTEFAPI1QuandoPerguntarCampo

eu adicionei:

  If (MR = mrRetry) Then
      Resposta := '-2';  

e funcionou perfeitamente.

[Erro ao consumir WebService REST utilizando o ACBRHTTP]

1 hora atrás, Carlos_Furone disse:

Juliomar, bom dia. Onde eu configuro no ACBRHTTP para aceitar o protocolo TLs 1.3 ?

atualize o acbr e as dlls do openssl que estão em: ..\DLLs\OpenSSL\3.1.3

adicione a uses: blcksock

e faça assim:

ACBrHTTP.HTTPSend.Sock.SSL.SSLType := TSSLType.LT_TLSv1_3;

[ACBrTEFAPI,ou ACBrTEFD ?]

sim

[ACBrTEFAPI,ou ACBrTEFD ?]

o acbrtefapi tambem atende sitef e ja tem topicos para adicinar tef elgin e tef auttar mas esses não tem previsão

lembrando que não tem previsão

[Erro ACBr em linux]

vc tem libxml2 e libxml2-devel instalado?

[AcbrNFe - Programa Exemplo para Linux]

37 minutos atrás, Ricardo De Luca disse:

e no linux tem que copiar esta liblegacy na pasta do AcbrNfe?

copiei para pasta continua mesmo retorno de erro.

 

 

vc esta copiando dll para o linux, linux não trabalha com dll. linux trabalha com .so por padrao mas não nesessariamente.

[Base64 em imagem]

o problema esta na interpretação do base64:

data:image/png;base64,PD94bWwgdmVyc2lvbj0iMS4wIi...

data: é o tipo de arquivo, que no caso é image/png 
  base64, é o tipo de configuração.
  resumindo vc precisa decodificar o texto depois de: "data:image/png;base64," (PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0i.....)

esse texto:"data:image/png;base64," server para os navegadores conseguirem interpretar e renderizar o arquivo (png,jpg,pdf etc.)

[Redirect no Synapse + Cloudflare]

usando synapse:

Var
  http: THTTPSend;
  sURLRedirect: string;
Begin
  http := THTTPSend.Create;
  Try
    sURLRedirect := '';
    HTTP.HTTPMethod('POST', 'SUAURL');
    If (http.ResultCode = 301) or (http.ResultCode = 302) Then
    Begin
      HeadersToList(http.Headers);
      sURLRedirect := http.Headers.Values['Location'];
      sURLRedirect := Trim(sURLRedirect);
    End;

    If sURLRedirect <> '' Then
      HTTP.HTTPMethod('POST', sURLRedirect);
  Finally
    Begin
      http.Free;
    End;
  End;
End;

 

[ACBRConsultaCNPJ]

25 minutos atrás, Jefferson Damian disse:

Não sei como está o andamento, mas alguém me disse desse Link
https://consultacnpj.redesim.gov.br/

https://www.gov.br/conecta/catalogo/apis/consulta-cnpj/swagger_cnpj.json/swagger_view

mas pelo que vi precisa fazer login com uma conta GOV

Será que é possível usar essa API?

 

[Token gerencianet]

tenta usar :

procedure TForm1.ACBrPSPGerenciaNet1QuandoTransmitirHttp(var AURL,
  AMethod: string; ReqHeaders: TStrings; ReqBody: AnsiString);
begin
 ReqHeaders.Add('partner-token: seutoken');
end;

mas creio que não há necessidade.

já tentou usar o demo como esta preenchendo ClientId e ClientSecret?

[json campo vazio]

não sei qual componente vc esta usando.

mas tente:

jSubObj.TryGetValue<string>('cont_pessoa')

 

[MailGrid API]

1 hora atrás, OldProgramer disse:

Para registrar, adicionei:

vFile := TFileStream.Create('NF16335.pdf', fmOpenRead);

// e adicionei no stringlist de envio

stEnvio.Add(EncodeBase64(ReadStrFromStream(vFile, vFile.Size)));
stEnvio.Add(',"anexoFileName":"NF16335.pdf"');
stEnvio.Add(',"anexoType":"application/octet-stream;base64"');
stEnvio.Add(',"anexoContent":"'+Memo3.Lines.Text+'"');

E o anexo seguiu normalmente.

não seria melhor stEnvio.Add(',"anexoType":"application/pdf;base64"'); ?

para quem usar e-mail em navegador poder ver um resumo ou todo ele sem a necessidade de baixar.

pois os navegadores reconhecem tipos específicos para tarefas especificas.

mas o importante é que esta funcionando.

foi só uma dica.

https://developer.mozilla.org/en-US/docs/Web/HTTP/Basics_of_HTTP/MIME_types/Common_types

[Integração com Api do Mercado Livre]

https://developers.mercadolivre.com.br/pt_br/gerenciamento-de-vendas

[ACBRHTTP GET com método de autorização Digest.]

tenta assim:

seuMD5 := gearMD5('seuUSUARIO:suaSENHA');
Consulta.HTTPSend.Headers.Add('Authorization: Digest ' + seuMD5);

https://en.wikipedia.org/wiki/Digest_access_authentication?

https://forum.lazarus.freepascal.org/index.php?topic=15747.0

[Não consigo compilar o ACBrMonitor: check for duplicates]

tenta assim:

[ACBRHTTP GET com método de autorização Digest.]

27 minutos atrás, CelsoPires disse:

Entendi ,   e se ao invés de token for um username e password?

isso seria Basic authentication

 Consulta.HTTPSend.UserName := 'usuario';
 Consulta.HTTPSend.Password := 'senha';

 

seria mais fácil se você postar o link da documentação aqui.

se for possível.

[ACBRHTTP GET com método de autorização Digest.]

54 minutos atrás, CelsoPires disse:

Obrigado Datilas,

 

Então eu devo executar isso?  Consulta.HTTPSend.Headers.Add('AUTHORIZATION:digest token');

sim.

mas cuidado com o case sensitive tem servidores que são chatos com isso.

o ideal seria

Consulta.HTTPSend.Headers.Add('Authorization: Digest ' + seuMD5);

inclusive com espaço entre ":" e Digest.

[ACBRHTTP GET com método de autorização Digest.]

pelo que entendi vc tem que gerar um md5 com os dados que eles vão te passar (usuario,senha,uri...)

ai vc envia no header:

Authorization: Digest seuMD5

 

[Zeuslib + Firebird 4 + D2010]

até onde sei só tem ate a versão 4 do firebird.

e uso o zeos 7.2 sem problema

[Formata Fone]

dentro do ACBrValidador tem a função FormatarFone( const AValue : String; const DDDPadrao: String = '' String;

 

ACBrValidador.FormatarFone(Edit1.Text, '65');

 

[Erro ao Gravar o arquivo XML no Banco MySQL]

no mysql eu uso LONGTEXT para os xml's

[Criptografia de senha com SALT]

aqui esta funcionando perfeitamente.

mas estou enviando um demo em delphi.

 

funcao.zip

 

[Criptografia de senha com SALT]

30 minutos atrás, bnobre disse:

Type
 TTipoCript = (tcCript, tcDecript);

é só um type que eu criei.

vc pode alterar a função como vc quiser

[Criptografia de senha com SALT]

funcao.zip

eu uso a função acima. vc pode adaptar para sua necessidade.

ela tem um problema quando o texto tem #13 ou #10 ou #13#10

fora isso funciona do jeito que vc precisa

tive que postar como zip

pois não estava aceitando como texto.

por isso demorei para responder.