WEbService para pesquisa de CNPJ

[Fernando Rodrigo]

Alguem ja usou o site https://www.receitaws.com.br/ para pesquisa de CNPJ.

Fiz um teste nele pelo proprio site no linke

 

https://www.receitaws.com.br/v1/cnpj/11111111111 (CNPJ) para pesquisa 

e fez o retorno de algumas informações que não tem na receita federal.

Alguem ja fez uso desses site ?

[EMBarbosa]

Esse site já foi mencionado aqui no fórum. O maior problema levantado na época foi que as consultas eram feitas em cache e por isso em geral estariam desatualizadas.

Nesse tópico tem até uma usuária que conseguiu fazer a consulta diretamente pelo Delphi, sem o uso do componente ACBrConsultaCNPJ.

[Daniel Simoes]

Acho que devido aos problemas, que hoje temos, com a consulta usando Captcha... pode ser uma boa opção, migrarmos para ele...

Ou ainda fazermos como no ACBrCEP, e implementar o suporte a vários WebServices de funcionalidade semelhante

[Fernando Rodrigo]

nesse site tem algumas informações que o site da receita não tem, um exemplo é os dados dos sócios 

hoje tenho muito problema com a receita, pq tem hora que funciona outra hora não, uma hora eles mudam o captcha dai o componente não funciona mais.

então teria que ser em algum lugar mais instável, 

[Fernando Rodrigo]

estou fazendo alguns testes so que esta retornando da seguinte forma os dados

 

Suporte t�cnico, manuten��o e outros servi�os em tecnologia da informa��o
62.09-1-00
03/11/2005
QD. 90 LT. 05
ARAGUAIA SISTEMAS LTDA
GO
(62) 2710-779
 

 

Estou jogando tudo em um campo memo

 

procedure TForm9.BitBtn2Click(Sender: TObject);
var
   jsonPrincipal,
   jsonAtividade,
   aDados     : TlkJSONobject;
   aAtividade : TlkJSONlist;
   IdHTTP1: TIdHTTP;
   LHandler: TIdSSLIOHandlerSocketOpenSSL;
   i : integer;

begin
    Memo1.Lines.Clear;

    IdHTTP1 := TIdHTTP.Create(nil);
    try
      LHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
      try
            IdHTTP1.IOHandler := LHandler;

            IdHTTP1.ReadTimeout := 5000;
            jsonPrincipal       := TlkJSON.ParseText(IdHTTP1.Get('https://www.receitaws.com.br/v1/cnpj/'+Edit1.text)) as TlkJSONobject;

            aAtividade          := jsonPrincipal.Field['atividade_principal'] as TlkJSONlist;

            for i := 0 to aAtividade.count -1 do
             begin
                aDados   := aAtividade.Child as TlkJSONobject;
                Memo1.Lines.Add(VarToStr(aDados.Field['text'].Value));
                Memo1.Lines.Add(VarToStr(aDados.Field['code'].Value));
             end;

            Memo1.Lines.Add(jsonPrincipal.getString('data_situacao'));
            Memo1.Lines.Add(jsonPrincipal.getString('complemento'));
            Memo1.Lines.Add(jsonPrincipal.getString('nome'));
            Memo1.Lines.Add(jsonPrincipal.getString('uf'));
            Memo1.Lines.Add(jsonPrincipal.getString('telefone'));

      finally
            LHandler.Free;
      end;
    finally
           IdHTTP1.Free;
    end;
 

[Fernando Rodrigo]

Segue em anexo a classe que criei para consulta de CNPJ no site https://www.receitaws.com.br/v1/cnpj

Se alguém quiser usar ou implementar mais essa consulta no ACBR, esta toda pronta

Segue a chamada da classe

 

Consulta_CNPJ.Consulta(RemoveCaracteres ( EditCNPJ.Text ));

 

RAZAO_SOCIAL.value   := Consulta_CNPJ.Nome;

ENDERECO.value       := Consulta_CNPJ.Logradouro;

NUMERO.value         := Consulta_CNPJ.Numero;
 

Todos esses campos são retornados

    Fatividade_principal_descricao : string;
    Fatividade_principal_code      : string;
    Fdata_situacao                 : string;
    Fcomplemento                   : string;
    Fnome                          : string;
    Fuf                            : string;
    Ftelefone                      : string;
    Fatividade_secuncaria_descricao: string;
    Fatividade_secundaria_code     : String;
    Fsituacao                      : string;
    Fbairro                        : string;
    Flogradouro                    : string;
    Fnumero                        : string;
    Fcep                           : string;
    Fmunicipio                     : string;
    Fporte                         : string;
    Fabertura                      : string;
    Fnatureza                      : string;
    Ffantasia                      : string;
    Fcapital                       : string;
    FEMail                         : string;
    FSocios                        : TStringList;
 

 

 

Consulta_CNPJ.pas

[Antonio Cruz]

Show de Bola. Parabéns.

[Antonio Cruz]

Como eu passaria o token comercial nesta classe Fernando ...

 

Obrigado.

[Fernando Rodrigo]

9 horas atrás, Antonio Cruz disse:

Como eu passaria o token comercial nesta classe Fernando ...

 

Obrigado.

não tem token, e so passar o cnpj no final conforme abaixo e ele retorna o json

 

https://www.receitaws.com.br/v1/cnpj/04005416000153

[Antonio Cruz]

Valeu obrigado. No Windows 10 funciona blz já no windows server 2008 retorna EIdSocketError: Socket Error # 11001 Host not found.

 

Alguma ideia ? 

Abraços

[Fernando Rodrigo]

18 horas atrás, Antonio Cruz disse:

Valeu obrigado. No Windows 10 funciona blz já no windows server 2008 retorna EIdSocketError: Socket Error # 11001 Host not found.

 

Alguma ideia ? 

Abraços

eu uso ele no server e funciona normal, veja a conexão que vc esta fazendo se não tem nenhuma configuração incorreta

[Antonio Cruz]

Então é a mesma classe e os mesmos parâmetros. É um servidor hospedado na locaweb windows server 2008. Na minha maquina que é windows 10 roda tranquilo , só no server que não. Já configurei o SSL TLS identicos com minha maquina e nada. Vou pesquisar mais na internet ver se acho algo. Muito obrigado pela atenção Fernando.

[mmiguel]

Estou tentando utilizar essa API no UI5, porem está me dando o seguinte erro:
Access to XMLHttpRequest at 'https://www.receitaws.com.br/v1/cnpj/20423629000151/' from origin 'https://webidetesting2675809-p1025375trial.dispatcher.hanatrial.ondemand.com' has been blocked by CORS policy: No 'Access-Control-Allow-Origin' header is present on the requested resource.

o código que estou utilizando é:

    var sCnpj = oEvent.getParameters().query;
                var sUrl = "https://www.receitaws.com.br/v1/cnpj/" + sCnpj + "/"; //20423629000151
                var oModel = new JSONModel(sUrl);
                this.getView().setModel(oModel);
                oModel.loadData(sUrl);

 

alguém poderia me ajudar???

[Waldir Paim]

18 horas atrás, mmiguel disse:

Estou tentando utilizar essa API no UI5, porem está me dando o seguinte erro:
Access to XMLHttpRequest at 'https://www.receitaws.com.br/v1/cnpj/20423629000151/' from origin 'https://webidetesting2675809-p1025375trial.dispatcher.hanatrial.ondemand.com' has been blocked by CORS policy: No 'Access-Control-Allow-Origin' header is present on the requested resource.

o código que estou utilizando é:

    var sCnpj = oEvent.getParameters().query;
                var sUrl = "https://www.receitaws.com.br/v1/cnpj/" + sCnpj + "/"; //20423629000151
                var oModel = new JSONModel(sUrl);
                this.getView().setModel(oModel);
                oModel.loadData(sUrl);

 

alguém poderia me ajudar???

Citar

CORS policy

CORS é uma politica de segurança dos navegadores mais modernos.

Sua api está executando uma chamada de outro domínio e esse fere a policita de segurança.

Precisa permitir no seu servidor o redirecionamento para esse domínio.

[mmiguel]

7 minutos atrás, Waldir Paim disse:

CORS é uma politica de segurança dos navegadores mais modernos.

Sua api está executando uma chamada de outro domínio e esse fere a policita de segurança.

Precisa permitir no seu servidor o redirecionamento para esse domínio.

Obrigado Walmir!
Dei uma lida e fiz uma modificação!
Ao invés de colocar fixo, criei uma destination e fiz a chamada dela!
Resolveu o problema!

[Waldir Paim]

Ok, obrigado por reportar.