generating index on the fly?

[MOISES]

Hi,

I have a database opened in shared mode and indexed. I can´t close the database or the index.

I would like to add a new index on the fly, do a report, and restore the original index, but I can´t close either the database or index.

There must be:

openfile()
....

doreport()



function openfile()

select 1

use test index test shared new


select 2

use other index other shared new


function doreport()

select 1

saveoriginalindex()

createnewindexonthefly()

report

restoreoriginalindex()



I have tried set index &tempind additive and OrdSetFocus( 1), but always uses the new temp index, not the original one that I must restore.


How can I do it?. Thanks a milion!!!!!!!!!!!!!!!!!!!!!

[Enrico Maria Giordano]

The easier way might be to open your original table in a new area with a different alias.

EMG

[MOISES]

Yes, you were right!!!!. Thanks a lot!!!!!!!