xBrowse - how to oXbrw:gotop() after header is click?

[hua]

If user select a header to sort on or change ascending/descending order, how do I get xbrowse to always perform a oXbrw:goTop() afterwards?

[nageswaragunupudi]

Code: Select all  Expand view

oBrw:bOnSort := { |o| o:GoTop() }

[hua]

Thanks for the prompt reply Rao.

But doesn't seem to work with FWH11.08. I ended up with an extra column called BONSORT

[nageswaragunupudi]

Sorry, FWH11.08 is more than ten year old and did not support this.

Let me see the source code of FWH1108 and advise you.

[nageswaragunupudi]

Please try:

Code: Select all  Expand view

     oBrw:bLClickHeaders := { |r,c,f,o| If( EMPTY( o:cOrder ),,(o:oBrw:GoTop(),o:oBrw:Refresh() ) ) }
 

[hua]

Thank you very much Rao. It works!

On another topic, is it possible to get a sorting based on a group of column ?
For example, if click on header of col A, sorting is actually col A+col B>

TIA

[nageswaragunupudi]

DBF files?

[hua]

Yes. Is it as simple as creating an index with the expression A+B?

[nageswaragunupudi]

Yes. Is it as simple as creating an index with the expression A+B?

Yes, and a little more.
Also assign
oCol:cSortOrder := <OrderTag>
and
oCol:cOrdBag := <cOrdBag> // if separate

Example (DBFCDX):
INDEX ON COLA+COLB TAG IDXAB TO TMP MEMORY

oCol:cSortOrder := "IDXAB"
oCol:cOrdBag := "TMP"

[hua]

Thank you very much Rao!