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 index1it tries to execute the function, which I do not want. (The function may in a separate procedure, and may not be available).