* scene1: select fktable go top scan while !eof() replace fktable.fkdata1 with iif(seek(fktable.fkid, 'pktable', 'pkid'), pktable.pkdata1, "") replace fktable.fkdata2 with iif(seek(fktable.fkid, 'pktable', 'pkid'), pktable.pkdata2, "") endscan * scene2 select fktable go top scan while !eof() seek(fktable.fkid, 'pktable', 'pkid') replace fktable.fkdata1 with iif(eof('pktable'), "", pktable.pkdata1) replace fktable.fkdata2 with iif(eof('pktable'), "", pktable.pkdata2) endscan