FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Setfilter TWBrowse
Posts: 99
Joined: Wed Nov 02, 2005 10:40 AM
Setfilter TWBrowse
Posted: Mon May 29, 2006 08:59 AM

Hi,

I think that the setfilter method is wrong when you try filter a field that has a combined index .

e.g:

1) the field is te01 and is number, there is also a field te02 character
2) the index of te01 is str(te01,4)+te02

Try to use the setfilter method and you will se the error . I think the error is at this line:

if uVal1 != nil
cIndexType := ( ::cAlias )->( ValType( &( IndexKey() ) ) )
if ( ::cAlias )->( ValType( &cField ) ) != cIndexType .or. ;
ValType( uVal1 ) != cIndexType .or. ;
ValType( uVal2 ) != cIndexType
MsgAlert( "TWBrowse SetFilter() types don't match with current Index Key type!" )

I think that buildskip is worg too when using the above example at line :
static function BuildSkip( cAlias, cField, uValue1, uValue2 )

local bSkipBlock
local cType := ValType( uVal1 )

regards,

A.S.K

Continue the discussion