给查询的某供应商每条记录编一个ID号,字段D是供应商名称
use jxc  &&包含非常多供应商的记录
md="某供应商"
SET FILT TO d=md
SCAN
IF ID=0
SELECT MAX(ID) FROM jxc WHERE d=md INTO ARRAY IDH
REPLACE ID WITH IDH+1
ENDI
ENDSCAN

当记录非常多时，耗时长，请问各位大神如何优化

[此贴子已经被作者于2015-11-26 14:38编辑过]

D是供应商名称没错

简化成
use jxc
SCAN
IF ID=0
SELECT MAX(ID) FROM jxc INTO ARRAY IDH
REPLACE ID WITH IDH+1
ENDI
ENDSCAN
如何优化

我明白了，取最大号不用放入SCAN重复取最大号，而用nMax = nMax + 1
替代，这样可以加快速度，谢谢liuxingang28

[此贴子已经被作者于2015-11-26 15:20编辑过]