FoxPro/Visual FoxPro - como puedo ordenar los campos de un grid haciendo

Hola
como puedo ordenar los campos de un grid haciendo click en el encabezado de la columna.

en el evento click del header me funciona (cuando no tango nada), pero el problema empieza cuando pongo THISFORM.GrdReporte.RECORDSOURCE ='CURSOR'

despues de eso el evento ya no responde

En el click de un header pon algo asi
LOCAL tabla
tabla = Thisform.GrdReporte.RECORDSOURCE &&Asi obtengo nombre de alias

select &tabla
index on nombre_articulo TAG indice1
SET ORDER TO indice1
Thisform.refresh

si estas usando un cursor temporal creado con un select, en el evento click del Header, puedes hacer llamado a una rutina donde hagas el cursor de nuevo con el select utilizando para esto la clausula ORDER BY en la que le dices como haga el ordenamiento por que campo y si es ASCendente o DESCendente
tambien tienes que hacer un refresco del mismo GRID con el evento REQUERY
Saludos..