Select * from rank order by tm desc into cursor curdummy READWRITE
Update curdummy set rank = Recno()
Update curdummy set rank=(select Min(rank) from curdummy temp where temp.tm=curdummy.tm)
Update rank from curdummy set rank = curdummy.rank where curdummy.student=rank.student
Select * from rank

>Hi,
>
>I thought similar but it doesn't cope with equal scores by two students.....
>Best,
>Viv
>
>>Since total is a reserved word, I use tm insetad of total.

>>Select * from rank order by tm desc into cursor curdummy READWRITE
>>Update curdummy set rank = Recno()
>>Update rank from curdummy set rank = curdummy.rank where curdummy.student=rank.student

>>
>>>I have create a student rank.dbf with five fields namely 1. English 2. Maths 3. Science 4. Total marks 5. Rank.
>>>
>>>I want to put the Rank for each student based on their Total marks secured.The total marks is out of 500.
>>>
>>>
>>>For example student A secured total marks is 489 out of 500 and student B is 492 and student C is 389 and student D is 391.
>>>
>>>The Rank for Student B is 1 and student A is 2 and student D is 3 and student C is 4.
>>>
>>>How to Write source code?