我的做法是:
1、定义一个全局变量 nDDH (订单号 数值型)
2、给变量赋初值,前提是 SET DATE ANSI、SET CENTURY ON nDDH=VAL(CHRTRAN(DTOC(DATE()),".",""))*100
3、获取表中的最大订单号 SELECT MAX(订单号) DDH FROM 表 INTO CURSOR TMP
4、nDDH=MAX(TMP.DDH,nDDH)+1
sele 你的表名
loca for padr(订单号,8)=dtos(date())
if eof() inse into 你的表名(订单号) valu( val(dtos(date())+"001") )
else sele max(订单号) from 你的表名 where padr(订单号,8)=dtos(date()) into arra ls inse into 你的表名(订单号) valu( ls+1 )
endif