hello!

i use this command to update a logical field in table A which exists in table B.

SELE 1
USE a
GO TOP
SELE 2
USE b
GO TOP

SELE 1
DO WHILE .NOT. EOF()
SCATTER MEMVAR
SELE 2
GO TOP
LOCATE FOR m.checkno=checkno AND agycode=agycode
IF FOUND()
SELE 1
REPLACE ttype WITH .T.
ENDIF
SELE 1
SKIP
ENDDO


any better way than this?