一数据表,以[报名序号]为主关键字的部分记录有重复,用下面查询这些记录,并进行逻辑删除,为什么只能查询出7条记录?
程序代码如下:
use lsb
select  lsb
 index on 报名序号 tag 报名序号
go top
scan
    i=报名序号
    skip
    if 报名序号=i
        skip -1
        delete
        skip
    endif
endscan

那应该查询出多少条记录

上传lsb.dbf

Close Databases
Use lsb Alias lsb
Select lsb
Index On 报名序号1 Tag 报名序号
I=""
Scan
    If 报名序号1==I
       Skip -1
       Delete
       Skip
    Endif
    I=报名序号1
Endscan  
Browse For Deleted()=.t.
Set Order To
Close Databases
Erase lsb.CDX

收到的鲜花

• tlliqi 于 2014-04-25 21:25 送鲜花  20朵   附言：加分

select * from lsb where 报名序号1 in(select 报名序号1 from lsb group by 报名序号1 having count(报名序号1)>1)

能查出12条重复记录：
USE lsb
INDEX on 报名序号1 TO myindx
n=""
SCAN
    IF n=报名序号1
        DELETE
    ENDIF
    n=报名序号1
ENDSCAN
BROWSE FOR DELETED()

收到的鲜花

• tlliqi 于 2014-04-25 21:25 送鲜花  20朵   附言：加分

能查出12条重复记录：


[ 本帖最后由 qjbzjp 于 2014-4-25 20:43 编辑 ]

楼主代码的意思中传递的信息是：逻辑删除相同记录中第一次出现的记录

应该是第一次出现后的记录吧