SET TALK OFF CREATE CURSOR C1 (cA N(5),cB N(5)) INSERT INTO C1 VALUES (1,100) INSERT INTO C1 VALUES (2,50) INSERT INTO C1 VALUES (3,200) INSERT INTO C1 VALUES (4,10) CREATE CURSOR C2 (cA N(5),cB N(5)) INSERT INTO C2 VALUES (1,100) INSERT INTO C2 VALUES (2,50) INSERT INTO C2 VALUES (3,200) INSERT INTO C2 VALUES (4,10)2. Create new form method and call it Calculate.
LPARAMETERS tnRecNo LOCAL lnRecNo,lnRtnValue lnRtnValue = 0 lnRecNo = RECNO("c1") - 1 IF lnRecNo >= 1 SELECT C2 SUM C2.cB FOR RECNO() <= lnRecNo TO lnRtnValue lnRtnValue = lnRtnValue + C1.cB ELSE lnRtnValue = C1.cB ENDIF SELECT C1 RETURN lnRtnValue5. Run the form and it should display cumulative sum in the last column of the grid.