local i, t * Assume RMast is open * assert record 1 is not deleted and is Active set filter to * NOTE: Rnum=2 is a deleted record and Active=.F.! t= seconds() set deleted on for i = 1 to 100000 =seek(2, 'Rmast', 'RNum') go 1 endfor ? 'Old SEEK took ' + str(seconds()-t, 12,2) * 0.91 secs t= seconds() set deleted on for i = 1 to 100000 indexseek(2, .F., 'Rmast', 'RNum') go 1 endfor ? 'Indexseek DELETED ON took ' + str(seconds()-t, 12,2) * 1.00 secs t= seconds() set deleted off for i = 1 to 100000 indexseek(2, .F., 'Rmast', 'RNum') go 1 endfor ? 'Indexseek DELETED OFF took ' + str(seconds()-t, 12,2) * 0.58 secs set filter to Active t= seconds() set deleted off for i = 1 to 100000 indexseek(2, .F., 'Rmast', 'RNum') go 1 endfor ? 'Indexseek DELETED OFF, FILTER ON took ' + str(seconds()-t, 12,2) * 1.28 secs