SELECT a.field1,a.field2,a.field3,b.field4 FROM modacad a,crsfinal b ; WHERE a.mainkey=b.mainkey INTO CURSOR crsmatch