1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Dica Exemplo de consulta CNPJ no receitaws

Discussão em 'EMS , HCM e Totvs 11' iniciado por fdantas, Junho 9, 2022.

  1. fdantas

    fdantas Administrator Moderador

    API gratuita para consultar os dados cadastrais passando o CNPJ


    Código:
    USING com.totvs.framework.abl.json.*.
    
    DEFINE VARIABLE objHTTP AS COM-HANDLE  NO-UNDO.
    DEFINE VARIABLE cUrl    AS CHARACTER   NO-UNDO.
    DEFINE VARIABLE cBOdy   AS CHARACTER   NO-UNDO.
    DEFINE VARIABLE cCNPJ   AS CHARACTER   NO-UNDO.
    DEFINE VARIABLE oJson   AS CLASS JSONObject NO-UNDO.
    
    cCNPJ = "".
    
    CREATE  "WinHttp.WinHttpRequest.5.1" objHTTP.
    
    cURL = "https://receitaws.com.br/v1/cnpj/scnpj".
    cURL = replace(cURL,"scnpj",cCNPJ).
    objHTTP:Open( "get", cURL).
    objHTTP:send () NO-ERROR.
    oJson = NEW JSONObject(objHTTP:ResponseText) NO-ERROR.
    
    MESSAGE "Nome    "   oJson:getString("nome")           SKIP
            "Capital "   oJson:getString("capital_social") SKIP
            "Logradouro" oJson:getString("logradouro")     SKIP
            "Numero"     oJson:getString("numero")         SKIP
            "Bairro"     oJson:getString("bairro")         SKIP
            "Cidade  "   oJson:getString("municipio")      SKIP
            "Estado  "   oJson:getString("uf")             SKIP
            "Abertura"   oJson:getString("abertura")       SKIP
            "Situacao"   oJson:getString("situacao")       SKIP
            "Ult.Atualiz" oJson:getString("ultima_atualizacao")       SKIP
           
            "QSA"        oJson:getString("qsa")       SKIP
            "Atividade"  oJson:getString("atividade_principal")       SKIP
    
             SKIP(01)
    
            objHTTP:ResponseText
        VIEW-AS ALERT-BOX INFO BUTTONS OK.
  2. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    Caramba, e é rapido a consulta, será que tem pra CPF também ?
  3. thiagoladeira

    thiagoladeira Sem Pontuação

    Esse código foi de grande ajuda, pretendo criar uma UPC com o Objetivo de facilitar o cadastro de Fornecedor e Cliente no Datasul.
  4. fdantas

    fdantas Administrator Moderador

    Vou dar uma procurada
    Só fica meio de olho que deve ter limite de consulta por tempo, ou algo do tipo.
  5. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    ja me alertaram que essas empresas liberam essas consultas por um tempo, pra chamar a atenção e depois começam a cobrar.
  6. kfwalder

    kfwalder Sem Pontuação

    Essa api na versão free só permite 3 consultas por minuto. (bem pocou)
    Chamando ela por https não funcionou pra mim, só via http. Acho que pode ser alguma coisa do meu windows (windows 7) pois deu uns erros de protocolo de segurança.
    Então troquei "WinHttp.WinHttpRequest.5.1" por "MSXML2.XMLHTTP.6.0" e funcionou com https. (depois de apanhar bastante)

Compartilhe esta Página