create cursor crsalp2 ; (date d(8),acc_code c(7),tittle c(40),code2 c(7),acc_name c(7),; qty n(4),balance n(8)) insert into crsalp2 values ({^2008-07-02},'3401002','APPLE','2404131','ERIC',5,0) insert into crsalp2 values ({^2008-07-02},'2404131','ERIC','3401002','APPLE',0,0) insert into crsalp2 values ({^2008-07-02},'3401002','APPLE','2404198','BORIS',10,0) insert into crsalp2 values ({^2008-07-02},'2404198','BORIS','3401002','APPLE',0,0) insert into crsalp2 values ({^2008-07-02},'3401002','APPLE','2404131','ERIC',5,0) insert into crsalp2 values ({^2008-07-02},'2404131','ERIC','3401002','APPLE',0,0) f_date1={^2008-07-02} t_date1={^2008-07-02} SET ENGINEBEHAVIOR 70 q2 = "csr" + sys(2015) select tittle_a,tittle_b, sum(qty),code2,acc_code,balance; from ; ( select distinct t1.tittle,t2.tittle, t1.qty,t1.code2,t1.acc_code,t1.balance; from crsalp2 t2 ; join crsalp2 t1 ; on t1.acc_code=t2.code2 and t1.code2=t2.acc_code; where t1.qty>0 and between(t1.date,f_date1,t_date1); order by t1.tittle , t2.tittle) as q1; group by tittle_a,tittle_b ; into cursor q2 readwrite brow SUM SUM_qty TO total_qtyProblems