WDForge.org - Forums

Vitesse de tri HyperFile

Sujet: Vitesse de tri HyperFile
par Aurel sur 23/5/2006 10:24:04

Bonjour,

Je suis débutant Windev et je voudrais faire un tri sur une table d'un fichier HyperFile. Ma table s'appelle Principal et comporte 15 champs(ID, Region_of_Install, Customer, City, Model, ProjectNumber, Last_Update, Status, Reason, Chef_de_projet, Shortcode, Remarks, Update, Date_Acceptants). Je voudrais faire des tris sur 5 champs : Region_of_Install, Customer, Status, Chef_de_projet et date_Acceptants. Ma fenêtre propose la table principale et 5 combo(pour chaque critère de tri). Pour mon tri, j'utilise la fonction TableAjoute(), voici le code:
------------------------------------------------------------
HDésactiveFiltre( Principal )
EcranVersFichier()
MonFiltre is string =""

SI Trier.Region <> "" ALORS
MonFiltre=" Region_of_Install='" + Trier.Region + "'"
FIN

SI Trier.Customer<>"" ALORS
SI MonFiltre<>"" ALORS
MonFiltre=MonFiltre + " ET "
FIN
MonFiltre=MonFiltre + "Customer='" + Trier.Customer + "'"
FIN

SI Trier.Statut<>"" ALORS
SI MonFiltre<>"" ALORS
MonFiltre= MonFiltre + " ET "
FIN
MonFiltre=MonFiltre + "Status='" + Trier.Statut + "'"
FIN

SI Trier.Chef_de_projet<>"" ALORS
SI MonFiltre<>"" ALORS
MonFiltre= MonFiltre + " ET "
FIN
MonFiltre=MonFiltre + "Chef_de_projet='" + Trier.Chef_de_projet + "'"
FIN

SI ComboBuyOff="Signed" ALORS
SI MonFiltre<>"" ALORS
MonFiltre= MonFiltre + " ET "
FIN
MonFiltre=MonFiltre + "date_Acceptants<>''"
FIN

SI ComboBuyOff="Missing" ALORS
SI MonFiltre<>"" ALORS
MonFiltre= MonFiltre + " ET "
FIN
MonFiltre=MonFiltre + "date_Acceptants=''"
FIN

CleParcours is string = HFilter(Principal, MonFiltre)

HLitPremier(Principal, CleParcours)
TANTQUE PAS H.EnDehors

TableAjoute(Table)
HLitSuivant(Principal, CleParcours)
FIN

Rafraichir()
TableAffiche (Table, taDébut )
------------------------------------------------------------
Voila ce que j'ai fait, je garde toutes les valeurs du fichier HyperFile mais à chaque modification de combo ma table affiche le filtre (je peux faire une modification ou une création de ligne quand le filtre est activé) mais lors d'une connexion longue distance, ma fenêtre met un temps fou à s'ouvrir puis à exécuter les filtres. On m'a parlé de requêtes mais je vois pas trop comment faire car je voudrais trouvé un moyen beaucoup plus rapide tout en gardant les mm conditions (garder toutes les valeurs du fichier hyperfile, modification ou création d'une ligne lorsque le filtre est activé). Pourriez-vous m'aidez. Merci d'avance. Salutations