索引排序用法一例

重庆 余勇锋
1992-04-03

        首先在学生数据库AA.DBF的结构中增加一个字段名为“名次”的空字段，作排名次之用，然后将下列程序段嵌入成绩录入程序的末端，运行后可在不改变原有顺序的情况下得到学生名次。
        SET TALK OFF
        USE AA
        INDEX ON 总分 TO AAIN
        SET INDEX TO AAIN
        COUNT TO X
        GO TOP
        T=0
        DO WHILE .NOT. EOF()
        D=X-T
        SKIP
        ENDDO
        USE
        ERASE AAIN.NDX
        RETURN
        注：AAIN.NDX是一个以总分为关键字的索引文件。
 
 