>Edward,
>
>Thanks again, but still no luck.
>
>Scott

Strange. I have similar grid working Ok, but instead of deleting tags I just add new tag if necessary:
***Grid.Setorder method

LPARAMETER cTagFieldname
Select GridCursor
IF EMPTY(Tagno(cTagFieldname))
 INDEX ON (cTagfieldname) TAG (cTagfieldname)
ELSE
 SET ORDER TO TAG (cTagFieldname)
ENDIF
Thisform.Mygrid.Refresh

Could you try this approach? Actually, it's just an example, the project is in another client location and I cannot post actual code right now.