Re: Diverses questions concernant les Tables
Posté par AngelMJ le 16/2/2004 10:59:47
Bien sûr que j'ai remplacé les informations par les miennes. Voici mon code tel qu'il l'est avec mes infos :
Pour l'autre question, tu as raison : le mieux et de le faire avant l'insertion. j'essaierai dès que mon soucis de somme sera réglé.
//Création d'une requête permettant de connaître
//le montant total du devis
sTable est une chaîne = Frm_Devis.Tab_Détail
sChampsAComptabiliser est une chaîne = Frm_Devis.Tab_Détail.Prix_Total
i est un entier
nTotal est un réel
Nb est un entier = {sTable}..Occurrence
SI Nb = 0 ALORS
RETOUR
POUR i = 1 A Nb
//+= équivalent de nTotal=nTotal+...
nTotal += {sChampsAComptabiliser}[i]
FIN
Frm_Devis.Zs_MontantTot=nTotal
FINPour l'autre question, tu as raison : le mieux et de le faire avant l'insertion. j'essaierai dès que mon soucis de somme sera réglé.
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=5&topic_id=570&post_id=2101