请教：纵向比较，上下二条记录相同，则在次数字段中填上2，不相同则填上1，我的代码运行结果中第一条记录的次数中为空？如何修改？请指教
代码如下：
use ls
scan
t1=dm
SKIP
t2=dm
IF t1<>t2
REPLACE 次数 WITH "1"
dm=t1
ELSE
skip-1
REPLACE 次数 WITH "2"
skip
REPLACE 次数 WITH "2"
dm=t2
 ENDIF
 skip-1
 Endscan

为什么第一条记录中次数为空？

附上数据库与代码，请指教。

sdta :
 谢谢指教!
 但有一个不足，如果dm没有按序排列的话，以下二句代码：
         REPLACE record recno() 次数 WITH "2"
        REPLACE record recno()-1 次数 WITH "2"
就不行了。
必须索引并生成一个新库后才能用。
我改了一下
USE ls
INDEX on dm TO ls
t1=""
scan
    t2=dm
    IF t1<>t2
        REPLACE 次数 WITH "1"
    ELSE
       * REPLACE record recno() 次数 WITH "2"
        *REPLACE record recno()-1 次数 WITH "2"
        REPLACE 次数 WITH "2"
        SKIP -1
         REPLACE 次数 WITH "2"
        skip
    ENDIF
    t1=dm
Endscan
browse

[此贴子已经被作者于2017-8-16 13:55编辑过]

谢谢你的指教 !
我照样画芦改了一下。

[此贴子已经被作者于2017-8-16 13:58编辑过]