CLOSE DATABASES ALL
SET EXACT ON && 字符串比较的规则
SELECT *,SPACE(10) 标记 FROM rgf2 INTO CURSOR test READWRITE
cnxh=0
SCAN
IF ALLTRIM(序号) == "小计"
cnxh=0
ELSE
IF INLIST(ALLTRIM(工序名称),"","劈抚","松土")
cnxh = cnxh + 0.1
ELSE
cnxh = INT(cnxh) + 1
ENDIF
REPLACE 标记 WITH TRANSFORM(cnxh)
ENDIF
ENDSCAN
BROWSE
图片附件: 游客没有浏览图片的权限,请
登录 或
注册