PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 21 → Aula 1078 - WinDev Tabelas 049/... - Tabela Diversos Filtros e Ordem - TableEnableFilter
Aula 1078 - WinDev Tabelas 049/... - Tabela Diversos Filtros e Ordem - TableEnableFilter
Débuté par De matos, 28 fév. 2017 10:48 - Aucune réponse
Membre enregistré
366 messages
Popularité : +3 (3 votes)
Posté le 28 février 2017 - 10:48
Nessa aula vou mostrar Diversos Filtros e Ordem
vou Fazer filtros por Letras
Filtros maior,menor,etc..
Ordem diversas na mesma query

-- Select

SELECT
cliente.id_cliente AS cli_id_cliente,
cliente.foto AS cli_foto,
cliente.id_empresa_cliente AS cli_id_empresa_cliente
FROM
cliente
ORDER BY {parametro_ordem}

--cliente.razao_social_nome
--cliente.id_empresa_cliente

-- Segredo = no lado do order by , fiz um parametro

//codigo da windows
gn_classificacao is int=1
mostra_cli(gn_classificacao)

//Selection a row of combo_ordem
gn_classificacao=COMBO_Ordem // Razao social =1 // Codigo =2
EDT_PROCURA=""
//Control Alt Espaco
SWITCH gn_classificacao
CASE 1 // Razão Social
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterStartsWith,EDT_PROCURA)
CASE 2 // codigo
TableEnableFilter(TABLE_cliente.COL_Id_empresa_cliente,filterGreaterOrEqual,0)
CASE 3 // nome fantasia
TableEnableFilter(TABLE_cliente.COL_nome_fantasia,filterStartsWith,EDT_PROCURA)
CASE 4 // cnpjf/cpf
TableEnableFilter(TABLE_cliente.COL_cnpj_cpf,filterStartsWith,EDT_PROCURA)
CASE 5 // inscricao estadual
TableEnableFilter(TABLE_cliente.COL_InsEst,filterStartsWith,EDT_PROCURA)
CASE 6 // Telefone
TableEnableFilter(TABLE_cliente.COL_Telefone,filterStartsWith,EDT_PROCURA)
OTHER CASE
END
mostra_cli(gn_classificacao)
ReturnToCapture(EDT_PROCURA)

//Whenever modifying edt_procura
SWITCH gn_classificacao
CASE 1 // Razão Social
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterContains,EDT_PROCURA)// IF CBOX_Procurarazao=True
CASE 2 // codigo
TableEnableFilter(TABLE_cliente.COL_Id_empresa_cliente,filterEqual,EDT_PROCURA)
CASE 3 // nome fantasia
TableEnableFilter(TABLE_cliente.COL_nome_fantasia,filterContains,EDT_PROCURA)// IF CBOX_Procurarazao=True
CASE 4 // cnpjf/cpf
TableEnableFilter(TABLE_cliente.COL_cnpj_cpf,filterContains,EDT_PROCURA)
CASE 5 // inscricao estadual
TableEnableFilter(TABLE_cliente.COL_InsEst,filterContains,EDT_PROCURA)
CASE 6 // Telefone
TableEnableFilter(TABLE_cliente.COL_Telefone,filterContains,EDT_PROCURA)
OTHER CASE
END

// Filtro Letras

Procedure filtro_letra(s_recebe_letra is string="") // a ou b ou c , etc..
//Inicio
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterStartsWith,s_recebe_letra)

//Para cada letra coloque abaixo
filtro_letra("A")
//---------------------------------------

//Igual
SWITCH gn_classificacao
CASE 1 // Razão Social
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterEqual,EDT_PROCURA)// IF CBOX_Procurarazao=True
CASE 2 // codigo
TableEnableFilter(TABLE_cliente.COL_Id_empresa_cliente,filterEqual,EDT_PROCURA)
CASE 3 // nome fantasia
TableEnableFilter(TABLE_cliente.COL_nome_fantasia,filterEqual,EDT_PROCURA)// IF CBOX_Procurarazao=True
CASE 4 // cnpjf/cpf
TableEnableFilter(TABLE_cliente.COL_cnpj_cpf,filterEqual,EDT_PROCURA)
CASE 5 // inscricao estadual
TableEnableFilter(TABLE_cliente.COL_InsEst,filterEqual,EDT_PROCURA)
CASE 6 // Telefone
TableEnableFilter(TABLE_cliente.COL_Telefone,filterEqual,EDT_PROCURA)
OTHER CASE
END

//Menor ou Igual
// filterLessOrEqual

//Menor
// filterLess

//Maior ou igual
// filterGreaterOrEqual

//Maior
//filterGreater

//Contem
//filterContains

//Inicio
// filterStartsWith

//Final
//filterEndsWith


http://windevdesenvolvimento.blogspot.com.br/2017/02/aula-1078-windev-tabelas-049-tabela_28.html

https://www.youtube.com/watch?v=nK5cN9nr0H0