CREATE CURSOR test (xh c(2), bs c(1))
INSERT INTO test VALUES ("01", "")
INSERT INTO test VALUES ("01", "")
INSERT INTO test VALUES ("01", "")
INSERT INTO test VALUES ("02", "")
INSERT INTO test VALUES ("02", "")
INSERT INTO test VALUES ("03", "")
INSERT INTO test VALUES ("02", "")
INSERT INTO test VALUES ("03", "")
INSERT INTO test VALUES ("04", "")
INSERT INTO test VALUES ("04", "")
INDEX on xh TAG xh
BROWSE
REPLACE bs WITH "1" FOR RECNO() % 4 = 1
BROWSE
INDEX on xh TAG xh UNIQUE FOR EMPTY(bs)
BROWSE
是不是这个意思