Hi All:

As part of my Clipper conversion to VFP project:

I want to inform the user of progress while indexing, like so:

public llFirstTime
llFirstTime = .t.
use test
index on field_1 + ind_di() to Index1
return

FUNCTION IND_DI
IF llFirstTime
	llFirstTime= .F.
ELSE
	@12,20 SAY STR(RECNO() / RECCOUNT() * 100, 4)
ENDIF

RETURN ''

The trouble is that when I execute

set index to index1

it tries to execute the function, which I do not want. (The function may in a separate procedure, and may not be available).

Is there a better way?

Thanks,

Yossi