Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid row column calculation problem
Message
De
16/04/2002 16:52:58
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Grid row column calculation problem
Divers
Thread ID:
00645708
Message ID:
00645708
Vues:
43
Hi,

I am using following procedure in grid column valid event to calculate each line total value according to qty and price and its working perfectly and calculating running total also perfectly. My problem is when user click on another row and change qty its multiply quantity with last row price where cursor was before coming to this row. How can I solve problem so whenever user change any rows qty or price it should muliply with same row value instead of previous rows value. Please help in detail if possible with reference code.
malloc=0
mnet=0
cfamt=0
If cfqty<=0
	=messagebox('Sorry Positive Value required...',(0+16+0),' ...')			
	return .f.
else
cfqty=thisform.grid1.column5.text1.value
cfamt=thisform.grid1.column6.text1.value

if curreceipt.cfactp <> space(1) AND curreceipt.cfsbcd <> space(6);
			AND curreceipt.cfitem <> space(10) and curreceipt.cfunit <> space(3);
			AND cfqty > 0 AND cfamt > 0
			*cftot=cfqty*cfamt
			thisform.grid1.column7.text1.value=(thisform.grid1.column5.text1.value*thisform.grid1.column6.text1.value)
			thisform.grid1.column7.text1.refresh()		
			
endi

thisform.refresh()
malloc=0
select curreceipt
scan for curreceipt.cfactp <> space(1) AND curreceipt.cfsbcd <> space(6);
			AND curreceipt.cfitem <> space(10) and curreceipt.cfunit <> space(3);
			AND cfqty > 0 AND cfamt > 0
			
			malloc=malloc+cftot
			
			mnet=malloc-mround
			
endscan

thisform.refresh()

endi

****
Thanks & best regards.
Sajjad Ahmad
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform