USE aa ALIAS aa IN 0 USE bb ALIAS bb IN 0 SELECT bb INDEX on mc TAG mc SELECT aa BLANK FIELDS xh ALL SET RELATION TO mc INTO "bb" REPLACE aa.xh WITH TRANSFORM(bb.xh) ALL SET RELATION TO GO TOP BROWSE
USE bb scan UPDATE aa SET aa.xh=bb.xh WHERE aa.mc=bb.mc ends