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 
	
		
			
        
				
				
					
						图片附件: 游客没有浏览图片的权限,请 
登录 或 
注册