WDForge.org - Forums

Re: Fonction récursive et source de données

Sujet: Re: Fonction récursive et source de données
par Homer sur 15/6/2005 12:23:42

PROBLèME RéSOLU :

PROCEDURE Recurs_Group(LeGroupe,Niveau=1)

HExécuteRequêteSQL("Req"+Niveau,"SELECT GroupName,LibGroupName FROM PROFIL WHERE AdminPar = '"+LeGroupe+"'")

HLitPremier({"Req"+Niveau})

TANTQUE PAS HEnDehors({"Req"+Niveau})
__Recurs_Group(({"Req"+Niveau+".GroupName"}),(Niveau+1))
__ListeAjoute(ComboGroupe,{"Req"+Niveau+".GroupName"}+TAB+{"Req"+Niveau+".LibGroupName"}+TAB+Niveau)
__HLitSuivant({"Req"+Niveau})
FIN

De cette manière, il est possible de déclarer des variables "source de données" de type "Req"+Indice (Req1,Req2,Req3,etc...)

Trouvé dans l'aide de Windev :
Externe MaRequête ; HExécuteRequêteSQL(MaRequête, "SELECT NOM FROM CLIENT")
// Autre syntaxe possible :
HExécuteRequêteSQL("MaRequête", "SELECT NOM FROM CLIENT")

Merci de m'avoir aidé !