不知有无理解错:
1、按记录顺序依次统计连续的10行记录,结果标注在每次的第10行记录。
2、如果某次的第10行不是“M1ZR”则不标注(即忽略这次的数据处理过程),继续下一次的数据处理过程。
1、按记录顺序依次统计连续的10行记录,结果标注在每次的第10行记录。
2、如果某次的第10行不是“M1ZR”则不标注(即忽略这次的数据处理过程),继续下一次的数据处理过程。
程序代码:
USE bmax BLANK FIELDS m1zrmax ALL FOR nRec=1 TO RECCOUNT()-9 GO nRec+9 IF ALLTRIM(m1zr)!="M1ZR" LOOP ENDIF m = 0 nMax = 0 GO nRec SCAN NEXT 10 IF ALLTRIM(m1zr)=="M1ZR" m = m + 1 ELSE IF m > nMax nMax = m ENDIF m = 0 ENDIF ENDSCAN IF m > nMax nMax = m ENDIF GO nRec+9 REPLACE m1zrmax WITH TRANSFORM(nMax) ENDFOR SELECT * FROM bmax