https://youtu.be/bmopPOt_eTM
Bom Dia Boa Tarde Boa Noite
Seja Membro do Canal
Esse Video Ao Vivo vai estrear as 19:00 do dia 20/01/2021
DICAS 3246 - WINDEV - PERGUNTAS E RESPOSTAS 8 - JSON - BUSCA CNPJ - TUTORIAL - RESPONDENDO LAIB AKRAM
https://help.windev.com/en-US/?1000023611&name=TYPE_JSON
https://windevdesenvolvimento.blogspot.com/2021/01/dicas-3246-windev-perguntas-e-respostas.html
ASSUNTOS
httprequest 
json 
foi criado um projeto novo que estara disponivel
no repositorio windev 
utilitarios_amarildo_matos_windev
https://repository.windev.com/
vamos criar uma window busca cnpj
vamos criar um edt cnpj 
vamos criar um edit endereco busca 
vamos criar um botao busca cnpj receita
vamos criar um botao para mostrar no site 
vamos criar um edt retorno 
vamos criar 3 stc , razao social, cnpj , e atividade para mostrar o retorno 
vamos entrar codigo busca cnpj 
vamos dar um httprequest receita para busca cnpj 
o retorno vira em formato json
vamos preencher os campos com o retorno do json 
vamos aprimorar. um pouco 
vamos criar uma procedure global, busca_cnpj_receita
vamos buscar o cnpj pela procedure
vamos testar 
=============
// BTN_BUSCA_CNPJ_RECEITA
(EDT_Endereco_busca,EDT_Retorno,STC_Razao_social,STC_Cnpj,STC_Atividade_empresa)=cnpj_busca_receita(EDT_Cnpj)
-----------
//PROCEDURE cnpj_busca_receita(recebe_cnpj)
DADOS_JSON	is a JSON	= ""										// VAMOS CRIAR UMA STRING URL COM ENDERECO DA RECEITA
URL			is string	= "https://www.receitaws.com.br/v1/cnpj/"	// VAMOS JUNTAR O NUMERO DO CNPJ COM O ENDERECO
URL+=recebe_cnpj
IF HTTPRequest(URL) THEN // VAMOS RECUPERAR O RESULTADO DA URL COM HTTPREQUEST
	DADOS_JSON	= HTTPGetResult() // VAMOS LER O RESULTADO HTTP
	DADOS_JSON	= UTF8ToAnsi(DADOS_JSON) // CONVERTE string No FORMATO UTF8
END
//VAMOS PEGAR OS DADOS DO JSON //DEPOIS VOU MOSTRAR NO FINAL, COMO PEGUEI OS NOMES DOS CAMPOS 
RESULT (URL,DADOS_JSON,DADOS_JSON.NOME,DADOS_JSON.CNPJ,DADOS_JSON.ATIVIDADE_PRINCIPAL)
// vamos fazer a busca do cnpj
// depois de testado e funcionando
// vamos transformar em procedure para poder ser usado em outros lugares
// VAMOS PRIMEIRO CRIAR A VARIAVEL JSON
// TEM MAIS CAMPOS PARA MOSTRAR MAS FIZ 3 PARA MOSTRAR O FUNCIONAMENTO
=============== INDICE PERGUNTAS E RESPOSTA
======================= INDICE CURSO DO JSON
Deserialise - Aula 1050 - WinDev Json - 001/...
JSONVersVariant - Aula 1053 - WinDev Json - 002/...
DICAS 2047 - WINDEV WEBDEV IOS - JSON 3 - HExportJSON
DICAS 2107 - WINDEV WEBDEV MOBILE - JSON 4 - LER JSON
DICAS 2192 WINDEV WEBDEV MOBILE JSON 5 JSON TIPO VARIAVEL
DICAS 2204 WINDEV WEBDEV MOBILE JSON 6 LER LEVAR TABELA
DICAS 3246 - WINDEV - PERGUNTAS E RESPOSTAS 8 - JSON - BUSCA CNPJ - TUTORIAL - RESPONDENDO LAIB AKRAM
JSONVersVariant - Aula 1053 - WinDev Json - 002/...
DICAS 2047 - WINDEV WEBDEV IOS - JSON 3 - HExportJSON
DICAS 2107 - WINDEV WEBDEV MOBILE - JSON 4 - LER JSON
DICAS 2192 WINDEV WEBDEV MOBILE JSON 5 JSON TIPO VARIAVEL
DICAS 2204 WINDEV WEBDEV MOBILE JSON 6 LER LEVAR TABELA
DICAS 3246 - WINDEV - PERGUNTAS E RESPOSTAS 8 - JSON - BUSCA CNPJ - TUTORIAL - RESPONDENDO LAIB AKRAM
=========================================
PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 
 











 
 
