Bug in xbrowse using an array and sort

[Marco Turco]

Hi,
this last FWH version has a bug into the xBrowse class when you browse an array with a column using the SORT clause.

Application
===========
Path and name: K:\pigc\PIGCSQL.Exe (32 bits)
Size: 9,056,768 bytes
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 26/12/10, 17:08:34
Error description: Error DBCMD/2001 Workarea not in use: ORDBAGNAME

Stack Calls
===========
Called from: => ORDBAGNAME(0)
Called from: K:\pigc\ADDON32\UPDATED2\xbrowse.prg => TXBROWSE:ADDCOLUMN(5320)


I temporary solved removing line 5320 from the xbrowse class

* oCol:cOrdBag := ( ::cAlias )->( OrdBagName( ncOrder ) )

[nageswaragunupudi]

This is the fix:

Code: Select all  Expand view

     if ::nDataType == DATATYPE_RDD .and. ! Empty( ::cAlias ) .and. SELECT( ::nAlias ) > 0
         oCol:cOrdBag    := ( ::cAlias )->( OrdBagName( ncOrder ) )
      endif