PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV 25 → WX - QUERY SQL COM CLAUSULA IN
WX - QUERY SQL COM CLAUSULA IN
Débuté par BOLLER, 19 avr. 2017 01:32 - Aucune réponse
#1
Membre enregistré
3 659 messages
Popularité : +175 (223 votes)
Posté le 19 avril 2017 - 01:32
EDT_CampoTela = "10; 20; 30"

Qry_TabelaX
SELECT * FROM TABELA WHERE CAMPO1 IN {paramValoresCampoTela}


//QUERY SQL COM CLAUSULA IN

Valor01, valor02, valor03 are string

Ok = HExecuteQuery(Qry_TabelaX, ConnectHFSQL, hQueryDefault+hQueryWithoutCorrection , Edt_CampoTela)

IF ok = True

For each Qry_TabelaX

IF HFound(Qry_TabelaX)

Valor01 = Qry_TabelaX.campo01

Valor02 = Qry_TabelaX.campo02

Valor03 = Qry_TabelaX.campo03

END

END

END

Info(Valor01, valor02, valor03)



or

EDT_CampoTela = "10; 20; 30"


//QUERY SQL COM CLAUSULA IN

Qry_TabelaX is Data Source

SQL_Execute is string = [
SELECT * FROM TABELA WHERE CAMPO1 IN '@ValoresCampoTela@'
]

SQL_Execute = Replace(SQL_Execute, "@ValoresCampoTela@", EDT_CampoTela)

Valor01, valor02, valor03 are string

Ok = HExecuteSQLQuery(Qry_TabelaX, ConnectHFSQL, hQueryDefault+hQueryWithoutCorrection, Edt_CampoTela)

IF ok = True

For each Qry_TabelaX

IF HFound(Qry_TabelaX)

Valor01 = Qry_TabelaX.campo01

Valor02 = Qry_TabelaX.campo02

Valor03 = Qry_TabelaX.campo03

END

END

END

Info(Valor01, valor02, valor03)


--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
→ Revenir à WINDEV 25