Hi Vitorsa,
Create a text box 'myTotal' for the purpose of displaying the total...
Add the code...
myTotal.RefreshEvent
********************************
LOCAL lcAlias, lnRec, lnTotal
lcAlias = ALIAS()
lnTotal = 0
lnRec = 0
SELECT myChildDBF
IF ! EOF()
lnRec = RECNO()
ENDIF
IF lnRec > 0
** replace myField with your field name
SUM(myField) TO lnTotal
GO lnRec
ENDIF
This.Value = ALLTRIM(TRANSFORM(lnTotal,"99,999,999.99")
SELECT (lcAlias)
This.Enabled = .f.
********************************
Add the following code in the
myChildGrid.AfterRowColChangeEvent
**********************************
ThisForm.myTotal.Refresh()
This will fix your requirement.
Best of luck ramani :-9
(Subramanian.G)
FoxAcc
ramani_g@yahoo.com
LET KNOW IF THIS HELPED. ENOUGH EXPERTS ARE HERE TO HELP YOU OUT! BEST OF LUCK
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.