Setfilter TWBrowse

[ask]

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