>Hi!
>
>Then use thisform.SetAll("lEventSwitchOffSorting",.F.). Form will cascade assignment to all controls on the form. When Grid Saver is found, it will clear its values. This approach is good for frameowrks like yours ;) this require, however, to have all forms have that property too for case form does not contains grids.

I see the point. This cascades through pageframes and containers as well?.

But I have to find the transactions.
I'm to lazy. I just use predefined tags's now.

>Of course, you can use CDX() function to check for non-structural indexes. Just check if CDX(1) returnes the same file name as a table name (DBF()). When not the same - index is non structural. When the same, check CDX(2) - if it returns some file, non structural indexes also exist and opened.

<vbg>
That's where I started asking. Did I forget to mention?

try

lcView = 'YourView'
lcField1 = 'YourField'
lcField1 = 'YourField1'
USE (lcView)
INDEX ON &lcField1 TAG lcField1
?JUSTSTEM(DBF())==JUSTSTEM(CDX(1))
?JUSTSTEM(DBF())', '+,JUSTSTEM(CDX(1))+', '+JUSTSTEM(CDX(2))
BEGIN TRANSACTION
END TRANSACTION

REQUERY(lcView)
?JUSTSTEM(DBF())==JUSTSTEM(CDX(1))
?JUSTSTEM(DBF())', '+,JUSTSTEM(CDX(1))+', '+JUSTSTEM(CDX(2))
BEGIN TRANSACTION
END TRANSACTION

INDEX ON &lcField2 TAG lcField2
?JUSTSTEM(DBF())==JUSTSTEM(CDX(1))
?JUSTSTEM(DBF())', '+,JUSTSTEM(CDX(1))+', '+JUSTSTEM(CDX(2))
BEGIN TRANSACTION
END TRANSACTION

DELETE TAG ALL
INDEX ON &lcField1 TAG lcField1
?JUSTSTEM(DBF())==JUSTSTEM(CDX(1))
?JUSTSTEM(DBF())', '+,JUSTSTEM(CDX(1))+', '+JUSTSTEM(CDX(2))
BEGIN TRANSACTION
END TRANSACTION

Agnes