>
select a.vendno,a.company,a.drno,a.rcno,a.purno,a.loctid,;
a.adddate,a.addtime,a.adduser,a.org_rcno,b.item,b.qtyrec,b.umfact,;
b.umeasur,b.cost,b.lineno,b.taxrate,b.qtyord,b.qtyrec2,;
b.disc,b.qtyopen;
from po_main a, po_detail b ;
where a.purno = Lcvalue and a.rcno = Lcvalue2 and ;
a.purno = b.purno and a.rcno = b.rcno AND b.qtyrec2 # 0 into cursor cur_temp
So you must have an index on purno in a and rcno in 2
>Hi to all,
>
>any other way to this statement to make it fast.
>i need a replacement for this statement co'z it's very slow.
>please help
>
>thanks.
>
>select a.vendno,a.company,a.drno,a.rcno,a.purno,a.loctid,;
>a.adddate,a.addtime,a.adduser,a.org_rcno,b.item,b.qtyrec,b.umfact,;
>b.umeasur,b.cost,b.lineno,b.taxrate,b.qtyord,b.qtyrec2,;
>b.disc,b.qtyopen;
>from po_main a, po_detail b ;
>where alltrim(a.purno) == Lcvalue and alltrim(a.rcno) == Lcvalue2 and ;
>a.purno == b.purno and a.rcno == b.rcno AND b.qtyrec2 != 0 into cursor cur_temp
>
>select cur_temp
>go top
>scan
>insert into ictran01 (..,) values (cur_temp.,,,)
>select cur_temp
>endscan