今天编的一个小程序， 如下 ：
select jhxx
set filt to year(进货时间)=nf .and. month(进货时间)=yf .and. 进货数量#0
go top
do while .not.eof()
  select kc_da
    seek jhxx.商品编号
  if eof()
    appe blan
    repl 商品编号 with jhxx.商品编号
  endif
  repl rk&yfc with rk&yfc+jhxx.进货数量
  sele jhxx
  skip
ENDDO

执行后就是死循环，请各位教我，应该修改哪里啊？

select kc_da
    seek jhxx.商品编号
 ＊＊＊＊ if eof()　　　　　　　　＊＊＊＊＊＊＊＊＊＊＊＊＊
    appe blan
    repl 商品编号 with jhxx.商品编号
  endif

＊＊＊＊＊＊＊＊＊＊＊
seek　得出的结果判断是用：Found()   或 !found()
loca     得出的结果判断是用：eof()        或 !eof()

不是这样的吧：
如果 SEEK 找到了与索引关键字相匹配的记录，则 RECNO( ) 返回匹配记录的记录号；FOUND( ) 返回“真”(.T.)；EOF( ) 返回“假”(.F.)。
如果找不到相匹配的关键字，则 RECNO( ) 将表中记录的个数加 1，然后返回；FOUND( ) 返回“假”(.F.)；EOF( ) 返回“真”(.T.)。

不是这样的吧：
如果 SEEK 找到了与索引关键字相匹配的记录，则 RECNO( ) 返回匹配记录的记录号；FOUND( ) 返回“真”(.T.)；EOF( ) 返回“假”(.F.)。
如果找不到相匹配的关键字，则 RECNO( ) 将表中记录的个数加 1，然后返回；FOUND( ) 返回“假”(.F.)；EOF( ) 返回“真”(.T.)。

你不就是想在保存的时候找到如果没有这个记录就增加吗?用二楼的方法正确,没见过象你这查找记录的,一般情况下象你用的这种情况一种是用LISTVIEW,还有的时候用大纲控件的时候用数据库做为内容的时候才会用到你用的方法