LOCAL lnCount, lnMemvar, tt CREATE CURSOR TT (F L NOT NULL ) FOR k=1 TO 254 SELECT *,.t. FROM tt INTO CURSOR tt NEXT ? FCOUNT() FOR k=1 TO 10000000 NEXT tt=SECONDS() FOR lnCount=1 TO 1000000 lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar lnMemvar = lnMemvar ENDFOR lnCount ?SECONDS()-tt tt=SECONDS() FOR lnCount=1 TO 1000000 lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar lnMemvar = m.lnMemvar ENDFOR lnCount ?SECONDS()-tt>
>LOCAL lnCount, lnMemvar, tt > CREATE CURSOR TT (F L) FOR k=1 to >m.tt=SECONDS() >FOR m.lnCount=1 TO 1000000 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 > m.lnMemvar = 1 >ENDFOR m.lnCount >?SECONDS()-m.tt >>I put so much lines into the loop to lower the overhead of the loop itself.