i est un entier
t est un entier=1
HLitPremier(Produit,produit) // lecture du fichier produit
TANTQUE PAS HEnDehors(Produit)
gsNom_p=Produit.produit
TableAjouteLigne(TABLE_Table1,gsNom_p,"","","","","","","","","","","","")
POUR i=1 A 12 // cumul par mois
HExécuteRequête(REQ_Requete2,hAvecFiltre,gsNom_p,"")
HLitPremier(REQ_Requete2,Produit)
TANTQUE PAS HEnDehors(REQ_Requete2)
SI REQ_Requete2.date_pesée_1..Mois=i ALORS
gnQtetotal+=REQ_Requete2.net
FIN
HLitSuivant(REQ_Requete2,Produit)
FIN
SI gnQtetotal>0 ALORS
t=i
TABLE_Table1[1][t+1]=gnQtetotal // affichage des cumuls quantités par mois (C'est ici que je rencontre mon erreur)
FIN
gnQtetotal=0
FIN
HLitSuivant(Produit,produit)
FIN
Partager