I agree that might be usefull in some cases.


With this, the TAGNO zero is the natural RECNO() order,
and your code he becomes very simpler for every situation:

* optimized GO BOTTOM
IF DESCENDING()
   SET ORDER TO TAGNO() ASC
   LOCATE
   SET ORDER TO TAGNO() DESC
ELSE
   SET ORDER TO TAGNO() DESC
   LOCATE
   SET ORDER TO TAGNO() ASC
ENDIF