FiveTech Software tech support forums

Antonio Linares wrote:Dear Silvio,

SET FILTER is very slow

Using an index with scopes should be better

with tdatabase I not Know How make it


IF nCount > 0
nInit:=oDbf:lastrec()-nCount
nEnd:= oDbf:lastrec()
ENDIF

oDbf:setscope(0,nInit)
oDbf:setscope(1,nEnd)


then for the year ?

... open the index whenever the database object is opened. Then you set the scope and then the low and high values you want to see using oDB:setScope(xLow,xHigh). The only records read will be those you want. I tested a 1 million record DBF file using a scope to filter out about 20,000 records ...

Marc, First I notice that you are calling a SETSCOPE function, and refreshing two images for every record movement. That is what is slowing down your browse. Try taking the entire :bChange line out and then test the speed. Also, if the images are ...

... , but when I call ut_borra() function to delete that use I have on Permission dbf a set scope Now with the new fwh ( april 2021) I can erase that setscope with setscope(nil), then I can delete all the permissions of that user with DO WHILE !oPermessi:EoF()             oPermessi:Lock()  ...

... central y derecha de las columnas. Corregido. Gracias a Juan Navas por señalarlo. * TDATABASE: (fwh\source\classes\database.prg) - Nuevo método SetScope(), además del método actual OrdScope() Sintaxis: SetScope() sin parámetros: No hay acción SetScope( nil ) // elimina todos los ámbitos SetScope( ...

... 8 characters but I put an alltrim () because it can be even less than 8 characters like for example "TEST" on the oPermessi there is a SetScope static cKey cKey:=oUtenti:Clave oPermessi:setscope(cKey) I did not understand why sometimes some records are cacenalled and other times none ...

... alignment of columns are ignored. Fixed. Thanks for Mr. Juan Navas for pointing out. * TDATABASE: (fwh\source\classes\database.prg) - New method SetScope(), in addition to the present method OrdScope() Syntax: SetScope() with no params: No action SetScope( nil ) // clear all scopes SetScope( ...

... Scope to ( cLname1 )  // attempting this ???????????????????????????????????????????????    line 709  You would do this with: oCustomers:setScope( alltrim(upper(cLname1)), alltrim(upper(cLname1 )) )

To connect the guest archive to customers, I had thought of such a form oGuest: = tdatabase():New(...... oGuest: SetScope (0, oClienti:IdCliente) oGuest: SetScope (1, oClientiIdCliente) oGuest: Gotop () It might work ? Slowly, I convert my old program with the databases, I'm afraid ...

To connect the guest archive to customers, I had thought of such a form oGuest: = tdatabase():New(...... oGuest: SetScope (0, oClienti:IdCliente) oGuest: SetScope (1, oClientiIdCliente) oGuest: Gotop () It might work ? Slowly, I convert my old program with the databases, I'm afraid ...

Thank you for the input. I will work with those today,.

DBFCDX optimizes filters if we have indexes on the fields used in the filter expression. In the above case, we need two index tags field NAME,ITEMDATEINDEX ON UPPER(NAME) TAG NAME   // do not use FIELD-> or ANY ALIAS->INDEX ON ITEMDATE TAG ITEMDATE  // do not use DTOS()INDEX ...

Hi,
In this situation , i make a temorary index with the for clause :
index on NAME to TEST FOR DATE > ... .and. DATE < ....

Good luck
Philippe

... in 1705 work fine: error description error DBCMD/2001 workarea not in use : ordscope called from : +> ordscope(0) called from : => Tdata:setscope(0) .... This problem is not reported to this topic : http://forums.fivetechsupport.com/viewtopic.php?f=3&t=34337&p=203721&hilit=odbf%3Aend#p203721 ...

... have a CUSTNO (or similar) in both files. And not allow users to change them. I am planning to do some speed tests with a DBSetRelation() & setScope() and with just OrdSetRelation() to see if there are any significant speed differences. James