&& opening stock table
create  cursor open_stock (dates d(8),codes c(4),products c(15),qty n(3),rate n(6,2),amount n(6,2))
insert into open_stock values({^2009-07-01},'1401','Coke 250ml',2,14.45,0)
insert into open_stock values({^2009-07-01},'1402','Coke 500lm',3,28.90,0)
replace all amount with qty*rate

&& purchase table
create  cursor purchase (dates d(8),codes c(4),products c(15),qty n(3),rate n(6,2),amount n(6,2))
insert into purchase values({^2009-07-02},'1401','Coke 250ml',2,15.30,0)
insert into purchase values({^2009-07-04},'1401','Coke 250ml',4,16.80,0)
insert into purchase values({^2009-07-06},'1401','Coke 250ml',6,13.25,0)
insert into purchase values({^2009-07-03},'1402','Coke 500lm',1,32.75,0)
insert into purchase values({^2009-07-05},'1402','Coke 500lm',5,24.25,0)
insert into purchase values({^2009-07-07},'1402','Coke 500lm',9,33.00,0)
replace all amount with qty*rate

&& sale table
create  cursor sales (dates d(8),codes c(4),products c(15),qty n(3),rate n(6,2),amount n(6,2))
insert into sales values({^2009-07-03},'1401','Coke 250ml',1,18.25,0)
insert into sales values({^2009-07-05},'1401','Coke 250ml',4,19.50,0)
insert into sales values({^2009-07-07},'1401','Coke 250ml',3,16.75,0)
insert into sales values({^2009-07-05},'1402','Coke 500lm',1,36.00,0)
insert into sales values({^2009-07-08},'1402','Coke 500lm',2,28.25,0)
insert into sales values({^2009-07-10},'1402','Coke 500lm',4,35.50,0)
replace all amount with qty*rate