我有一个排定名次的程序，可以正确运行。
在数据表中有xk字段,类型是数值型的，从1到13， 我想对1到13中每个数对应的所有数据进行排序，加了下面的语句
for i=1 to 13
set filer to xk=i
  排定名次程序
set filter to
endf
但是执行时鼠标就开始转圈了

如果换成
set filer to xk=1
  排定名次程序
set filter to
就能执行，为什么会出现这个问题？
谢谢各位高手指点！

执行set filter后要移动记录指针，如：
set filter to ......
go top

谢谢，上面加循环那个加上go  top 就可以了是吗？
下面的那个不需要加go top就能够执行！

没见到完整代码，不清楚具体做什么。
看调用set filter命令（set filer 这里是否笔误），只说说执行set filter后要移动记录指针。
执行set filter后只要移动记录指针就可以，不一定是 go top，如用LOCATE速度更快些。

要循环13次，估计转圈会晕倒

就下面这个程序，如果不用循环直接由set filter to xk=1 就可以


SET TALK OFF
SET SAFE OFF

&&排定市名次


for i=1 to 13

set filter to xk=i


inde on left(kh,3)+str(1000-zcj,7,2)  tag shimingci

count all for xk=i to qsrenshu



go top
qmingci=1
lsmc=1

linshizcj=zcj
wenli=subs(kh,3,1)
for i=1 to qsrenshu
    repl qmc with qmingci
    if not eof()
    skip
    endif
  if wenli=subs(kh,3,1)
    lsmc=lsmc+1
    if  zcj<linshizcj
        linshizcj=zcj
        qmingci=lsmc
     endif
   else
    qmingci=1
    lsmc=1
    linshizcj=zcj
    wenli=subs(kh,3,1)
   endif
endf


&&校名次

inde on left(kh,4)+str(1000-zcj,7,2)  tag xmingci


go top
xmingci=1
lsmc=1
linshizcj=zcj
xx=subs(kh,3,2)
for i=1 to qsrenshu
    repl xmc with xmingci
    if not eof()
        skip
     endif   
  if xx=subs(kh,3,2)
    lsmc=lsmc+1
    if  zcj<linshizcj
        linshizcj=zcj
        xmingci=lsmc
     endif
   else
    xmingci=1
    lsmc=1
    linshizcj=zcj
    xx=subs(kh,3,2)
   endif
endf


&&班名次

inde on left(kh,6)+str(1000-zcj,7,2)  tag bmingci

go top
bmingci=1
lsmc=1
linshizcj=zcj
bbj=subs(kh,3,4)
for i=1 to qsrenshu
    repl bmc with bmingci
    if not eof()
    skip
    endif
  if bbj=subs(kh,3,4)
    lsmc=lsmc+1
    if  zcj<linshizcj
        linshizcj=zcj
        bmingci=lsmc
     endif
   else
    bmingci=1
    lsmc=1
    linshizcj=zcj
    bbj=subs(kh,3,4)
   endif
endf

set filt to

endf
set talk on
set safe on