Nessa aula vou mostrar Diversos Filtros e Ordem
vou Fazer filtros por Letras
Filtros maior,menor,etc..
Ordem diversas na mesma query
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}
gn_classificacao is int=1
mostra_cli(gn_classificacao)
gn_classificacao=COMBO_Ordem
EDT_PROCURA=""
SWITCH gn_classificacao
CASE 1
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterStartsWith,EDT_PROCURA)
CASE 2
TableEnableFilter(TABLE_cliente.COL_Id_empresa_cliente,filterGreaterOrEqual,0)
CASE 3
TableEnableFilter(TABLE_cliente.COL_nome_fantasia,filterStartsWith,EDT_PROCURA)
CASE 4
TableEnableFilter(TABLE_cliente.COL_cnpj_cpf,filterStartsWith,EDT_PROCURA)
CASE 5
TableEnableFilter(TABLE_cliente.COL_InsEst,filterStartsWith,EDT_PROCURA)
CASE 6
TableEnableFilter(TABLE_cliente.COL_Telefone,filterStartsWith,EDT_PROCURA)
OTHER CASE
END
mostra_cli(gn_classificacao)
ReturnToCapture(EDT_PROCURA)
SWITCH gn_classificacao
CASE 1
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterContains,EDT_PROCURA)
CASE 2
TableEnableFilter(TABLE_cliente.COL_Id_empresa_cliente,filterEqual,EDT_PROCURA)
CASE 3
TableEnableFilter(TABLE_cliente.COL_nome_fantasia,filterContains,EDT_PROCURA)
CASE 4
TableEnableFilter(TABLE_cliente.COL_cnpj_cpf,filterContains,EDT_PROCURA)
CASE 5
TableEnableFilter(TABLE_cliente.COL_InsEst,filterContains,EDT_PROCURA)
CASE 6
TableEnableFilter(TABLE_cliente.COL_Telefone,filterContains,EDT_PROCURA)
OTHER CASE
END
Procedure filtro_letra(s_recebe_letra is string="")
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterStartsWith,s_recebe_letra)
filtro_letra("A")
SWITCH gn_classificacao
CASE 1
TableEnableFilter(TABLE_cliente.COL_razao_social_nome,filterEqual,EDT_PROCURA)
CASE 2
TableEnableFilter(TABLE_cliente.COL_Id_empresa_cliente,filterEqual,EDT_PROCURA)
CASE 3
TableEnableFilter(TABLE_cliente.COL_nome_fantasia,filterEqual,EDT_PROCURA)
CASE 4
TableEnableFilter(TABLE_cliente.COL_cnpj_cpf,filterEqual,EDT_PROCURA)
CASE 5
TableEnableFilter(TABLE_cliente.COL_InsEst,filterEqual,EDT_PROCURA)
CASE 6
TableEnableFilter(TABLE_cliente.COL_Telefone,filterEqual,EDT_PROCURA)
OTHER CASE
END
http://windevdesenvolvimento.blogspot.com.br/2017/02/aula-1078-windev-tabelas-049-tabela_28.html
https://www.youtube.com/watch?v=nK5cN9nr0H0