Ese codeblock es evaluado en el método SetOrder() y el resultado grabado en la variable uRet.
- Code: Select all Expand view
METHOD SetOrder() CLASS TXBrwColumn
LOCAL lSorted := .F.
LOCAL n, oCol, cSort, uRet
if ::cSortOrder != nil
if ValType( ::cSortOrder ) == "B"
uRet := Eval( ::cSortOrder, Self )
lSorted := ( uRet == .t. .or. uRet == "A" .or. uRet == "D" )
El contenido de la variable es comparada para saber si se ha realizado la ordenación correctamente.
- Code: Select all Expand view
lSorted := ( uRet == .t. .or. uRet == "A" .or. uRet == "D" )
Si el resultado que devuelve el codeblock es "A" o "D", dato que haría falta devolver para saber si se tiene que mostrar el bmp ascendente o el bmp descendente en la columna, genera un error ya que se esta comprobando si "uRet==.t."
