on o1.fundid=o2.fundid and o1.fmdate=o2.fmdate and on o1.sum=-o2.sum

select fundid, fmdate, sum(sum) as nenol, count(*) as nCnt;
    from old_table;
    group by fundid, fmdate;
    having nenol != 0 or nCnt != 2

on o1.fmdate=o2.fmdate and on o1.sum=-o2.sum

select fmdate, sum(sum) as nenol, count(*) as nCnt;
    from old_table;
    group by fmdate;
    having nenol != 0 or nCnt != 2

* Исходные данные
create cursor oper (dDate d, nFondId i, nSum y)
insert into oper values ({^2013-01-02}, 1, 200)
insert into oper values ({^2013-01-02}, 2, -200)
insert into oper values ({^2013-01-02}, 1, 200)
insert into oper values ({^2013-01-02}, 3, -200)
insert into oper values ({^2013-01-05}, 4, 50)
insert into oper values ({^2013-01-05}, 1, -50)
insert into oper values ({^2013-01-05}, 3, 3000)
insert into oper values ({^2013-01-05}, 2, -3000)
* выборка выдач (отрицательные суммы)
select *, cast(0 as int) as nFondPolId from oper;
	where nSum < 0;
	order by dDate, nSum desc;
	into cursor tVidano readwrite

* выборка получений (положительные суммы)
select *, cast(0 as int) as nFondVidId from oper;
	where nSum > 0;
	order by dDate, nSum;
	into cursor tPolucheno readwrite

* Простановка второго фонда в каждый курсор
sele tVidano
scan
	if tVidano.dDate != tPolucheno.dDate or tVidano.nSum != -tPolucheno.nSum
		MessageBox('Косяк в исходных данных')
		exit
	endif
	repl in tVidano nFondPolId with tPolucheno.nFondId
	repl in tPolucheno nFondVidId with tVidano.nFondId
	skip in tPolucheno
endscan

brow