FiveTech Software tech support forums

Posted: **Wed Nov 06, 2024 12:38 pm**

Please I have this function

#include "fivewin.ch"

request dbfcdx

Function test 
     local oDbf
     local cdbfPath:= cFilePath(GetModuleFileName( GetInstance() ))  + "Data\"
     local nYear:= year(date())
     local   cFilter:= "LTRIM(STR(YEAR(FIELD->DATA)))= '" + ltrim(str(nyear)) + "'"
   

  oDbf:= TDatabase():Open( , cdbfPath+"LOTTO", "DBFCDX", .T. )
  oDbf:setorder(1)
  oDbf:GoTop()

          xbrowser odbf

        oDbf:SetFilter(cFilter)
        oDbf:GoTop()

     xbrowser odbf
return nil

the index 1 is on DTOS(DATA)+CONCORSO

before the filter I see all archive

the filter seems good

After the filter it not show any records , why ?

Posted: **Wed Nov 06, 2024 1:25 pm**

Silvio,
have you some records in which the year of field named "data" is 2024
In the screenshot I see 1971

Bye

Posted: **Wed Nov 06, 2024 1:29 pm**

MarcoBoschi wrote:Silvio,
have you some records in which the year of field named "data" is 2024
In the screenshot I see 1971

Bye

yes that is the beginning of the archive, I tried to make a filter in emagdbu

Posted: **Wed Nov 06, 2024 8:42 pm**

It's strange because in the test I did, that is, in the procedure in a small dialog, everything works perfectly, but when I create an object class with all the functions of the procedure it doesn't work, that is, it doesn't find the data, there's definitely an error somewhere that I can't find.

this is basically what i'm doing, it seems complex but it's not

FiveTech Software tech support forums

Problem with Filter and Tdatabase

Problem with Filter and Tdatabase

Re: Problem with Filter and Tdatabase

Re: Problem with Filter and Tdatabase

Re: Problem with Filter and Tdatabase