Windev21 Aulas,Estudos e Desenvolvimento: 01/10/16

domingo, 10 de janeiro de 2016

Was WebDev Application Server + Driver Nativo Ms Sql Server

Video Was

No servidor Web deve ser instalado o WAS (Webdev Aplication Server) + Driver Nativo Ms SQL Server para o funcionamento dos sites e webservices feitos com o Webdev.
Feito Por Adriano Boller

Windev Sql /16.. - Sql Like - Pesquisar Cidade combox conforme for digitando

Video Sql Like

Nessa aula vou mostrar como procurar uma cidade e no combox ir aparecendo o que esta sendo
digitado. Like
WinDev

PROCEDURE combox_municipio_like(_cidade,_estado)
_data_source is Data Source
_sql is string
_sql = [
    SELECT
    cidade as nome_cidade
    FROM
    municipios
    WHERE
    estado=%2
    AND
    municipios.cidade LIKE %1
]
//_sql = StringBuild(_sql,"'%"+_cidade+"%'","'"+_estado+"'") //SELECIONA QUALQUER LUGAR
_sql = StringBuild(_sql,"'"+_cidade+"%'","'"+_estado+"'") //SELECIONA A PARTIR

Trace(_sql)

ListDeleteAll(COMBO_CIDADE)
IF HExecuteSQLQuery(_data_source,hQueryDefault,_sql) THEN
    HReadFirst(_data_source)
    WHILE NOT HOut()
        ListAdd(COMBO_CIDADE,_data_source.nome_cidade+gLink(_data_source.nome_cidade))
        HReadNext(_data_source)
    END
    HFreeQuery(_data_source)
END

//Dentro do Estado
//colocar quando digitar o estado
combox_municipio_like(EDT_Endereco_cidade,EDT_Endereco_uf)

//dentro do edt_cidade, quando exit do edt
IF EDT_Endereco_cidade=COMBO_CIDADE..StoredValue THEN
ELSE
EDT_Endereco_cidade=COMBO_CIDADE..StoredValue
END

//dentro do edt_cidade modifify
// whenever modifying edt_cidade
combox_municipio_like(EDT_Endereco_cidade,EDT_Endereco_uf)
ListSelectPlus(COMBO_CIDADE,1)