Puxar dados de algum lugar pelo CNPJ

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
Itamar M. Lins Jr.
Administrador
Administrador
Mensagens: 7928
Registrado em: 30 Mai 2007 11:31
Localização: Ilheus Bahia
Curtiu: 1 vez

Puxar dados de algum lugar pelo CNPJ

Mensagem por Itamar M. Lins Jr. »

Olá!
Tem com fazer isso ?
Para evitar digitar, endereço, cep, nome etc.
Também não sei se isso será aceito pela nova lei LGPD, vi que tem programas que fazem isso. Não sei se é via algum serviço tipo SPC...

Saudações,
Itamar M. Lins Jr.
Saudações,
Itamar M. Lins Jr.
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por JoséQuintas »

O webservice consulta cadastro.

Outra opção é baixar da Fazenda todos os cadastros do Brasil, cerca de 100GB.
Tem as empresas e os sócios.
É formato TXT.

Bom.... se o governo deixa baixar..... não sei onde a LGPD poderia interferir.

Lembrando: em agosto se refere a pessoas FÍSICAS.

E o governo também dá acesso a isso, pra cupom fiscal.

Então... LGPD... sei lá...
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Itamar M. Lins Jr.
Administrador
Administrador
Mensagens: 7928
Registrado em: 30 Mai 2007 11:31
Localização: Ilheus Bahia
Curtiu: 1 vez

Puxar dados de algum lugar pelo CNPJ

Mensagem por Itamar M. Lins Jr. »

Olá!
Outra opção é baixar da Fazenda todos os cadastros do Brasil, cerca de 100GB.
Link please!

Saudações,
Itamar M. Lins Jr.
Saudações,
Itamar M. Lins Jr.
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por JoséQuintas »

José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por Jairo Maia »

JoséQuintas escreveu:Bom.... se o governo deixa baixar..... não sei onde a LGPD poderia interferir.
Não pode. a LGPD protege apenas dados de pessoas físicas, dados das empresas como CNPJ, razão social, endereço e composição societária continuam públicos.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Avatar do usuário
Itamar M. Lins Jr.
Administrador
Administrador
Mensagens: 7928
Registrado em: 30 Mai 2007 11:31
Localização: Ilheus Bahia
Curtiu: 1 vez

Puxar dados de algum lugar pelo CNPJ

Mensagem por Itamar M. Lins Jr. »

Olá!
Serviço indisponível. Pq será ? Para os outros venderem o mesmo serviço ?
https://www.gov.br/receitafederal/pt-br ... licos-cnpj
Aqui tem mas está leeentoooo para baixar. Atualizado 08/05/2021

Saudações,
Itamar M. Lins Jr.
Saudações,
Itamar M. Lins Jr.
Fernando queiroz
Usuário Nível 4
Usuário Nível 4
Mensagens: 779
Registrado em: 13 Nov 2014 00:41
Localização: Porto Alegre/RS

Puxar dados de algum lugar pelo CNPJ

Mensagem por Fernando queiroz »

uso a bastante tempo SEFAZCLASS para isto.

Código: Selecionar todos

************************************************************************************************************************************************************************************************************************
METHOD CADASTROS_MANUTENCAO_PESQUISA_CNPJ( CNPJ, UF, n_tpAmb, NOMCERT ) CLASS CADASTROSCLASS
************************************************************************************************************************************************************************************************************************
LOCAL oSefaz;
	, cRetorno;
	, cStat;

	oSefaz:= SefazClass():New()
	oSefaz:cCertificado := TRIM(NOMCERT)
	cRetorno:=oSefaz:NFeConsultaCadastro( CNPJ, UF, oSefaz:cCertificado, n_tpAmb )


	if XmlNode(cRetorno, "cStat") $ "111,112,259"
		cStat       :=XmlNode(cRetorno, "cStat")
		::CPFCGC	:=XmlNode(cRetorno, "CNPJ")
		::NRAZ_SOC 	:=XmlNode(cRetorno, "xNome")
		::INSEST   	:=XmlNode(cRetorno, "IE") 
		::ISENTO   	:=XmlNode(cRetorno, "cSit")
		::CEP      	:=SUBSTR(XmlNode(cRetorno, "CEP"),1,5)+"-"+SUBSTR(XmlNode(cRetorno, "CEP"),6,3)
		::NUMERO   	:=val(XmlNode(cRetorno, "nro"))
		::BAIR     	:=XmlNode(cRetorno, "xBairro")
		::CIDADE   	:=XmlNode(cRetorno, "xMun")
		::UF       	:=XmlNode(cRetorno, "UF")
		::ENDER    	:=XmlNode(cRetorno, "xLgr")

		IF cStat = "112"
			cRetorno := "ACESSE AO SINTEGRA: http://www.sintegra.gov.br"+ HB_EOL()+ "PARA CONSULTA DETALHADA"
			hwg_MsgInfo("STATUS: " + XmlNode(cRetorno, "cStat") + hb_Eol() + "MOTIVO: " + cRetorno + hb_Eol()+ hb_Eol() ,"CONSULTA CADASTRO DE CONTRIBUINTE")
		ENDIF
		
		IF XmlNode(cRetorno, "cStat") $ "259"
			::ISENTO   :="9"
		ENDIF

		IF ::ISENTO = "0"
			::ISENTO = "2"
			::INSEST:= SPACE(18)
		ENDIF

	ENDIF

RETURN NIL
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
lucimauro
Usuário Nível 3
Usuário Nível 3
Mensagens: 465
Registrado em: 21 Set 2004 21:02
Localização: Sobral-CE

Puxar dados de algum lugar pelo CNPJ

Mensagem por lucimauro »

Itamar;

https://www.cnpja.com.br/
Esse e pago mais e bom, via API
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por JoséQuintas »

Tive uma idéia.
Vou ver se preparo algum teste.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por JoséQuintas »

dadosabertos.png
Voltou ao normal.
Só a título de curiosidade: não adianta ter internet de 300MB, a velocidade lenta é da Fazenda.

A idéia que eu tive é a seguinte:
Um webservice intermediário, que faz a consulta naquele primeiro link, retornando formatado, e já salva, igual eu fiz com webservice de CEP.

Começa com nenhum cadastro, e a cada consulta vai cadastrando automático.
O aplicativo apenas faz consultas, e em caso de problemas, pelo menos tem o último cadastro válido (do que tiver sido consultado pelo menos uma vez).

Nota: 300MB/8 = 37.5MB. Capacidade de download de 37.5MB/segundo e baixando a 0.15MB/segundo
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por JoséQuintas »

Só outro comentário, pra quem não fez a conta.

88MB e 10 arquivos, só pra começar.
Isso dá UM GIGA COMPACTADO.
Mesmo se fosse rápido, é muita coisa pra fazer processamento.
E a demora em baixar.... piorou.

Vai ser um dia inteiro pra atualizar uma base de dados, e, pelo tamanho, dificilmente vai dar pra hospedar de graça.

Aqui no meu servidor, só adicionando o SSD de 480GB.
Por mais interessante que seja, parece inviável pra pequenas empresas.
E em grandes empresas, na maioria das vezes o acesso externo é limitado e/ou bloqueado.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Fernando queiroz
Usuário Nível 4
Usuário Nível 4
Mensagens: 779
Registrado em: 13 Nov 2014 00:41
Localização: Porto Alegre/RS

Puxar dados de algum lugar pelo CNPJ

Mensagem por Fernando queiroz »

RETORNO da consulta ao cadastro pela SEFAZCLASS , para quem quiser saber como pegar os dados tem um post anterior com a rotina

Código: Selecionar todos

<nfeResultMsg xmlns="http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro4"><retConsCad versao="2.00 " xmlns="http://www.portalfiscal.inf.br/nfe"><infCons><verAplic>SVRS20180816144937</verAplic><cStat>111</cStat><xMotivo>Consulta cadastro com uma ocorrencia</xMotivo><UF>AC</UF><CNPJ>5597127000153</CNPJ><dhCons>2021-05-17T10:01:29</dhCons><cUF>12</cUF><infCad><IE>101465000139</IE><CNPJ>5597127000153</CNPJ><UF>AC</UF><cSit>0</cSit><indCredNFe>4</indCredNFe><indCredCTe>4</indCredCTe><xNome>SOLUCOES EIRELI</xNome><xFant>SOLUCOES</xFant><xRegApur>SIMPLES NACIONAL</xRegApur><CNAE>4751201</CNAE><ender><xLgr>RUA QUINTINO BOCAIUVA</xLgr><nro>1136</nro><xCpl /><xBairro>JOSE AUGUSTO</xBairro><cMun>1200401</cMun><CEP>69900785</CEP></ender></infCad></infCons></retConsCad></nfeResultMsg>
HARBOUR 3.2, HWGUI 2.23 B3, SEFAZCLASS, PDFClass, ADO + MariaDB/MySQL, RMChart
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Puxar dados de algum lugar pelo CNPJ

Mensagem por JoséQuintas »

É que pela Sefazclass é a consulta para NFE, estadual, que só faz consulta pra CNPJs com inscrição estadual.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Puxar dados de algum lugar pelo CNPJ

Mensagem por alxsts »

Olá!

A Serasa também disponibiliza serviço de consulta a CNPJ. Claro que é pago. Creio que existam vários preços, conforme a quantidade de consultas contratada.
Serasa Experian - Soluções para Empresas
[]´s
Alexandre Santos (AlxSts)
AutomoSistema
Usuário Nível 2
Usuário Nível 2
Mensagens: 87
Registrado em: 27 Nov 2015 22:09
Localização: Jardim-MS

Puxar dados de algum lugar pelo CNPJ

Mensagem por AutomoSistema »

Boa noite a todos, desculpa em entrar no assunto. Eu uso um método da ACBR.dll que é NFE_ConsultaCadastro, funciona perfeitamente para consulta de CNPJ e este método é de graça e não paga nada OBRIGADO !!!
Responder