FoxPro/Visual FoxPro - notas

Estoyu elaborando un programa de notas, pero no he podido lograr colocarle el numero de puesto de acuerdo al promedio de cada alumno; es decir, al promedio mas alto colocarle el puesto 1 y de este modo descender hasta llegar al ultimo.
nota: la tabla ademas de los campos nombre,nota, etc; cuenta con un campo puesto y es el que necesito llenar con los resultados de la comparacion del campo nota.

gracias

ALGO RAPIDO:

USE mitabla
sort ON nota to auxiliar
USE auxiliar
repla all puesto with recno()
browse

Perdon, debe ser asi:

use mitabla
sort ON nota to auxiliar DESCENDING
USE auxiliar
repla all puesto with recno()
browse

use mtabla
index on promedio to mindice descending
v_inc = 0
go top
do while !eof()
v_inc = v_inc + 1
replace puesto with v_inc
enddo
use