CREATE CURSOR csredui (; no i(10), ; dat d(8), ; dat1 d(8), ; namc c(70), ; places c(70)) thisform.PAGEFRAME1.PAGE4.grid1.&&&(display no,dat,dat1,namc,places) USE mytable IN 0 locate for no=thisform.text1.value if !found() APPEND FROM thisform.PAGEFRAME1.PAGE4.grid1 else mesagebox("?????????") endifthanks