Saber si una tabla esta ordenada descente o ascendentemente

Este truco es bastante útil para evitar volver a ordenar una tabla si ya esta ordenada de la forma que la necesitamos....

IF "DESCENDING" $ SET("ORDER")  
       ?'Descendente'
ELSE &&ASCENDENTE
      ?'Ascendente'
ENDIF

Esta es otra forma .... devolverá .T. si esta ordenado Descendentemente y .F. si esta ordenado Ascendentemente

?"DESCENDING" $ SET("INDEX")

Este truco me fascina :-)

David Amador (Davphantom)