Re: Problème de requête pour Einstein en herbe |
Sujet: Re: Problème de requête pour Einstein en herbe par GoZeub sur 18/5/2004 14:06:44 Voici un raccourci du problème rencontré. Les valeurs affichées dans ma table mémoire grace à une requête diffèrent après sélection d'une combo. Les paramètres passés dans le trace sont pour un affichage correct : 0 Les paramètres passés dans le trace sont pour un affichage incorrect : 0 On remarque que les paramètres sont identiques. Voici le code: Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8,Param9,Param10,Param11,Param12 sont des Variants=Null //Préparation des paramètres Param1=COMBO_Rech_Produit SI COMBO_Rech_Famille..ValeurAffichée<>"" ALORS Param2=COMBO_Rech_Famille..ValeurAffichée FIN Param3=COMBO_Rech_Emballage Param4=COMBO_Rech_MP SI COMBO_Rech_Groupe..ValeurAffichée<>"" ALORS Param5=COMBO_Rech_Groupe..ValeurAffichée FIN Param6=COMBO_Rech_SaisiPar Param7=CHP_Rech_Periode1 Param8=CHP_Rech_Periode2 SI COMBO_Rech_Etat..ValeurAffichée<>"" ALORS Param9=COMBO_Rech_Etat-1 FIN Param10=COMBO_Rech_Site SI COMBO_Rech_Type..ValeurAffichée<>"" ALORS SI COMBO_Rech_Type=2 ALORS Param11=Vrai SINON SI COMBO_Rech_Type=3 ALORS Param11=Faux FIN FIN FIN Param12=COMBO_Rech_CP TableSupprimeTout(TABLE_Demande) //On parcours la requête correspondant à la recherche HDésactiveFiltre(Demande_Des_Affectation) Trace(Param1+TAB+Param2+TAB+Param3+TAB+Param4+TAB+Param5+TAB+Param6+TAB+Param7+TAB+Param8+TAB+Param9+TAB+Param10+TAB+Param11+TAB+Param12) HExécuteRequête(Req_Des_Affectations,hRequêteDéfaut,Param1,Param2,Param3,Param4,Param5,Param6,Param7,Param8,Param9,Param10,Param11,Param12) HLitPremier(Req_Des_Affectations) TANTQUE PAS HEnDehors(Req_Des_Affectations) TableAjoute(TABLE_Demande,Req_Des_Affectations.IDDemande_Des_Affectation+TAB+Req_Des_Affectations.Date+TAB+Req_Des_Affectations.DateLivraison+... TAB+Req_Des_Affectations.Nom+TAB+Req_Des_Affectations.Emballage+TAB+Letat+TAB+Letype+TAB+Req_Des_Affectations.CentreProd+... TAB+Req_Des_Affectations.Utilisateur+TAB+Lemotif+TAB+Req_Des_Affectations.Observations+TAB+Req_Des_Affectations.Traite+... TAB+Req_Des_Affectations.Qte_EnCours+TAB+Req_Des_Affectations.Qte+TAB+Req_Des_Affectations.IDTraitant+TAB+Req_Des_Affectations.IDResponsable+... TAB+Req_Des_Affectations.Qte_Ini) HLitSuivant(Req_Des_Affectations) FIN HAnnuleDéclaration(Req_Des_Affectations) TableAffiche(TABLE_Demande) |