sexta-feira, 23 de dezembro de 2022

Dica 3864 - webservice - Buscar Cep - ViaCep - Retorno Xml ou Json

 




-------------------------------------------------------


PARA ADQUIRIR WINDEV MOBILE WEBDEV 28
ENTRE EM CONTATO COM 
ADRIANO BOLLER 
DA WXSOLUÇÕES





-------------------------------------------------------

Youtube

https://youtu.be/jk9Jf4WZX4c




Video youtube da frança


--------------------------------------------------------

Repositorio


---------------------------------------------------------

Blog

 
------------------------------------------------------
Link Pcsoft Fr


------------------------------------------------------
Help Pcsoft

----------------------------------------------------

------------------------
Bom dia..
Hoje vou mostrar
como buscar cep
no webservice viacep
e como pegar retorno xml ou json
isso no windev mobile 28

------------------------
00:00:00 Apresentação
00:00:15 Representante Adriano Boller
00:00:25 Apresentando ViaCep 
00:00:31 Vamos criar uma window
00:00:44 Vamos criar um Edt cep Numeric 
00:01:07 Vamos criar um Radio para retorno xml ou json
00:01:29 Vamos criar um botao busca cep
00:01:36 vamos criar um edt_resultado
00:01:54 vamos criar campo do endereco 
00:02:06 Vamos criar os outros campos 
00:02:16 Vamos entrar no codigo do botao 
00:02:21 se nao existir cep, retornar 
00:02:31 colocar a url do webservice com o cep 
00:02:52 Vou explicar o codigo httprequest e httpresponse 
00:03:28 Vamos pegar o retorno xml 
00:03:59 Vamos pegar o retorno json 
00:04:19 Vamos gerar o apk 
00:04:37 Vou mostrar no celular a busca cep 
00:05:08 Mostrando o exemplo no repositorio windev 
------------------------
//Codigo
IF EDT_cep="" THEN
Info("informar cep")
ReturnToCapture(EDT_cep)
END
url is string = ""
IF RADIO_retorno=1 THEN
url="http://viacep.com.br/ws/"+EDT_cep+"/xml/"
ELSE
url="http://viacep.com.br/ws/"+EDT_cep+"/json/"
END
o_request is httpRequest
o_response is httpResponse
o_request..URL = url 
o_request..Method = httpGet
o_response = RESTSend(o_request)
EDT_resultado = o_response.Content

IF RADIO_retorno=1 THEN
EDT_Logradouro = XMLExtractString(EDT_resultado,"logradouro")
EDT_complemento = XMLExtractString(EDT_resultado,"complemento")
EDT_Bairro = XMLExtractString(EDT_resultado,"bairro")
EDT_Cidade = XMLExtractString(EDT_resultado,"localidade")
EDT_Uf = XMLExtractString(EDT_resultado,"uf")
EDT_Ibge = XMLExtractString(EDT_resultado,"ibge")
ELSE
dados_json is JSON=EDT_resultado
EDT_Logradouro = dados_json.logradouro
EDT_complemento = dados_json.complementoa
EDT_Bairro = dados_json.bairro
EDT_Cidade = dados_json.localidade
EDT_Uf = dados_json.uf
EDT_Ibge = dados_json.ibge
END








------------------------
#windev 28 #webdev 28 #windev mobile 28 #pcsoft #erpmatos #erp
#windev28 #webdev28 #windev mobile28 #flexbox #hfsql #hfsql spare





















--------------------- Indice WebService

Criar Projeto WebService - Lista Site - - WebService - 001/...
Deploy - Gerando WebService/Levando Servidor/Instalar/Mostrar - WebService - 002/...
Instalando SoapUI - Testar WebService - Aula 1040 - WebService - 003/...
Ajustando Xml Lista Site WebService - WebService - 004/...
Consumir WebService - WebService - 005
Xml - Consumir Ler Xml e colocar Tabela - WebService - 006
Dolar - Consumir WebService - Cotação Dolar - 007
Cnpj Receita - Consumir WebService - 008/...
Cep Buscar WebService Correio - WebService - 009/...
CONSULTA CADASTRO SEFAZ P-1 - DICAS 1871 - WINDEV_23 - WEBSERVICE 010 - 
CONSULTA CADASTRO SEFAZ P-2 - 1872 - PUBLICA - WINDEV_23 - WEBSERVICE 011 - 
CONSULTA CADASTRO SEFAZ P-3 - 1873 - PUBLICA - WINDEV_23 - WEBSERVICE 012 -
DICAS 1877 - WINDEV_23 - WEBSERVICE 014 - CNPJ BUSCA CADASTRO ACBR
DICAS 2019 - WINDEV - WEBSERVICE - 015 - APRENDER A FAZER REST WEBSERVICE
DICAS 2020 - WINDEV - WEBSERVICE - 016 - CRIANDO TABELAS
DICAS 2021 - WINDEV - WEBSERVICE - 017 - WDTESTREST
DICAS 2022 - WINDEV MOBILE - WEBSERVICE - 018 - LER WEBSERVICE RESTSend
DICAS 2023 - WINDEV MOBILE - WEBSERVICE - 019 - LER WEBSERVICE RESTSend SOMENTE 1 REGISTRO
DICAS 2024 - WINDEV MOBILE - WEBSERVICE - 020 - WEBSERVICE RESTSend CRIA NOVO REGISTRO - httpPost
DICAS 2025 - WINDEV MOBILE - WEBSERVICE - 021 - WEBSERVICE RESTSend ALTERA REGISTRO - httpPut
DICAS 2026 - WINDEV MOBILE - WEBSERVICE - 022 - WEBSERVICE httpRequest httpDelete
DICAS 2033 - WINDEV - WEBSERVICE 23 - HTTPRequest - HTTPGetResult - fSaveBuffer - BAIXAR ARQUIVO
AO VIVO-SOAP-DICA 2095-WINDEV MOBILE WEBDEV-WEBSERVICE COM MOBILE -
DICAS 2096-2095 - WINDEV WEBDEV MOBILE - WEBSERVICE 25 - SOAP
DICAS 2097 - WINDEV MOBILE - WEBSERVICE 26 - MOSTRAR CLIENTES - SOAP
DICAS 2132 - HANGOUT AO VIVO 20 HORAS 30/05 - WEBSERVICE SOAP COM MOBILE
DICAS 2163 WINDEV WEBDEV MOBILE WEBSERVICE 28 SOAP
DICAS 2226 WINDEV WEBDEV MOBILE 24 NOVIDADES 26 WEBSERVICE 29 HTTPREQUEST - BUSCA CNPJ
DICA 2687 - WINDEV WEBDEV MOBILE - WEBSERVICE 32 - EXPLICANDO WEBSERVICE SOAP E CONSUMIDO MOBILE E DESKTOP



-----------------------------------------------------------------------------------------------------------------------------


-----------------------------------------------------------------------------------------------------------------------------
















Teste

Teste
teste