SET TALK OFFUSE aaa INDEX aaa
SET ORDER TO result
GO TOPi = 1
DO WHILE i <= 8 AND .NOT. EOF()
iResult = result
iRecNo = RecNo() COUNT TO iSum FOR result = iResult GO iRecNo iMark = 9 - i -iSum + (iSum + 1) / 2.0 j = 0
DO WHILE .NOT.EOF() AND j < iSum
REPLACE order WITH i, with iMark
j = j + 1
SKIP
ENDDO
i = i + iSum
ENDDOCLOS DATA
SET ORDER TO result
GO TOPi = 1
DO WHILE i <= 8 AND .NOT. EOF()
iResult = result
iRecNo = RecNo() COUNT TO iSum FOR result = iResult GO iRecNo iMark = 9 - i -iSum + (iSum + 1) / 2.0 j = 0
DO WHILE .NOT.EOF() AND j < iSum
REPLACE order WITH i, with iMark
j = j + 1
SKIP
ENDDO
i = i + iSum
ENDDOCLOS DATA
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货