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:07:35

J'ai écris ça :

GLOBALE A LA FENETRE
__Tab_Req est un tableau de 1 Source de Données

PROCEDURE Recurs_Group(LeGroupe,Niveau=1)

SI Niveau > Dimension(Tab_Req) ALORS
__Tab_Req[Niveau] = allouer un tableau dynamique de Niveau sources de données
FIN

SI PAS HExécuteRequêteSQL(Tab_Req[Niveau],"SELECT GroupName,LibGroupName FROM PROFIL WHERE AdminPar = '"+LeGroupe+"'") ALORS
__Info("Erreur lors de l'exécution d'une Tab_Req[Niveau]uête SQL :" + HErreurInfo)
FIN
HLitPremier(Tab_Req[Niveau])
TANTQUE PAS HEnDehors(Tab_Req[Niveau])
__Recurs_Group((Tab_Req[Niveau].GroupName),(Niveau+1))
__ListeAjoute(ComboGroupe,Tab_Req[Niveau].GroupName+TAB+Tab_Req[Niveau].LibGroupName+TAB+Niveau)
FIN

Mais Windev me dit que le nom de la source de données est indéfini : Tab_Req[Niveau]

Je crois que je ne vais pas m'en sortir si facilement. Là où une petite fonction récursive aurait très bien pu faire l'affaire, je me vois déjà monter une véritable usine à gaz.