>Create cursor foo1 (f1 T, rn I) >create cursor foo2 (f2 n(20,2), rn I) > >....populate data > >REPLACE ALL rn WITH RECNO() IN foo1 >REPLACE ALL rn WITH RECNO() IN foo2 > >select f1,f2 from foo1,foo2 where foo1.rn = foo2.rn into cursor foo >