is a test where use all ADS,DBFCDX,DBFFPT, BMDBFCDX with proper compile script So i invite made your test for better reproduce your need, Instead my test will help you because you if you can't compile your program you can verify differences vs source, script I not use the any function that not allow me port on different rdd and AFAIK this function are used automatically when possible SET OPTIMIZE ON |OFF over filters In the RDD that admit optimization, p. ej. BMDBFCDX
2009/4/27 sygecom <leona...@sygecom.com.br>: > > Hi Massimo, > > I use to compile my hbmk2 applications. > One problem that the ADS has some limitations for me is that problem. How to > access the applications by TS (Terminal Server). And to acquire a license is > not for me. Then tests with ADS not help me when I am looking for other > solutions such as BMDBFCDX. What I would like to know is how to use the > special functions of BMDBFCDX as: > > BM_Turbo() > BM_DbGetFilterArray() => aFilterRec > BM_DbSetFilterArray( aFilterRec ) > BM_DbSetFilterArrayAdd( aFilterRec ) > BM_DbSetFilterArrayDel( aFilterRe ) > > Leonardo Machado > > > Massimo Belgrano-3 wrote: >> >> have you use hbmk2 for compile? >> >> I suggest you made a simple test where you recreate a db and test >> setfilter performance >> follow a sample of idea >> >> hbmk2 dbt.prg hbbmcdx.lib ace32.lib rddads.lib >> >> REQUEST ADS >> REQUEST DBFCDX >> request DBFFPT >> REQUEST BMDBFCDX >> >> FUNCTION MAIN(x_rdd) >> rddsetdefault( x_rdd ) >> aDbf := {} >> AADD( aDbf, { "FN", "N", 10, 0 } ) >> AADD( aDbf, { "FNF", "N", 12, 4 } ) >> AADD( aDbf, { "FC", "C", 40, 0 } ) >> AADD( aDbf, { "FD", "D", 8, 0 } ) >> AADD( aDbf, { "FL", "L", 1, 0 } ) >> AADD( aDbf, { "FM", "M", 0, 0 } ) >> dbCreate("dbtest",aDbf) >> USE dbtest EXCLUSIVE >> index on fc + str(fn,10,0) to DBtest_i1 >> >> for i = 1 to 30000 >> if mod(i,1000) = 0 >> // @ 0, 0 SAY i >> endif >> append blank >> replace fn with INT(sin(i)*i) >> replace fnf with sin(i)*i >> replace fc with replicate( CHR(65+INT(ABS(sin(i)*25)) ), 40 ) >> replace fd with date() + MOD(INT(sin(i)*i),10000) >> replace fl with IIF( SIN(i) >= 0, .T., .F. ) >> next >> x_timer=timer() >> set filter to fc=replicate( CHR(65+INT(ABS(sin(100)*25)) ), 40 ) >> go top >> do while .not. eof() >> skip >> enddo >> x_timer=x_timer-tiner() >> ?? x_timer >> >> >> >> function sin >> PARAMETER X_VALORE >> // V=VAL(STR(V)) >> return (X_vALORE - INT(X_VALORE/6.28)*6.28 - 3.14)/3.14 >> >> >> 2009/4/26 sygecom <leona...@sygecom.com.br>: >>> >>> Hello Massimo, >>> Even took a look at the ADS, but it is not 100% free, and have different >>> types of clients where I have to buy a license for ADS. >>> I tried to compile with BCC using RMDBFCDX Harbour and gave the following >>> error: >>> >>> Error: Unresolved external '_HB_FUN_RMDBFCDX' referenced from >>> \WIN\BCC\SYSTEM.OBJ >>> >>> Already with BMDBFCDX not the error, but not noticed differences in >>> performance when using filters of the type SET FILTER TO >>> >>> Leonardo Machado >>> >>> >>> Massimo Belgrano-3 wrote: >>>> >>>> set filter optimised is strong for clipper application >>>> basically you haven't any sample because simply you must create some >>>> index on table then you made a set filter that instead read entire dbf >>>> read only same part >>>> You can use This technologies RMDBFCDX , BMDBFCDX >>>> you can also try rddads that use sybase advantage data server or only >>>> the free/local version >>>> >>>> >>>> 2009/4/26 sygecom <leona...@sygecom.com.br>: >>>>> >>>>> Hello to all, >>>>> >>>>> Somebody would have some practical examples of using the LIB >>>>> BMDBFCDX.LIB? >>>>> I need to filter using a turbine in the DBF. The Harbor has something >>>>> to >>>>> RMDBFCDX of xHarbour Commercial. >>>>> >>>>> Note: At various points in my system already use ORDSCOPE () but in >>>>> some >>>>> points have to do the filter and the active filter have to change the >>>>> order >>>>> of display, then the ORDSCOPE () clean the filter when using a >>>>> DBSETORDER >>>>> () >>>>> in ORDSCOPE a filter (), in case I'm using SET FILTER TO, but this >>>>> filter >>>>> is >>>>> known to many records is slow and this is where I want to give a better >>>>> optimized. >>>>> >>>>> Leonardo Machado >>>>> -- >>>>> View this message in context: >>>>> http://www.nabble.com/How-to-optimize-filters-with-DBFCDX--tp23244059p23244059.html >>>>> Sent from the Harbour - Dev mailing list archive at Nabble.com. >>>>> >>>>> _______________________________________________ >>>>> Harbour mailing list >>>>> Harbour@harbour-project.org >>>>> http://lists.harbour-project.org/mailman/listinfo/harbour >>>>> >>>> >>>> >>>> >>>> -- >>>> Massimo Belgrano >>>> _______________________________________________ >>>> Harbour mailing list >>>> Harbour@harbour-project.org >>>> http://lists.harbour-project.org/mailman/listinfo/harbour >>>> >>>> >>> >>> -- >>> View this message in context: >>> http://www.nabble.com/How-to-optimize-filters-with-DBFCDX--tp23244059p23247160.html >>> Sent from the Harbour - Dev mailing list archive at Nabble.com. >>> >>> _______________________________________________ >>> Harbour mailing list >>> Harbour@harbour-project.org >>> http://lists.harbour-project.org/mailman/listinfo/harbour >>> >> >> >> >> -- >> Massimo Belgrano >> >> Analisi e sviluppo software per Lan e Web - Consulenza informatica - >> Formazione >> Delta Informatica S.r.l. http://www.deltain.it/ +39 0321 455962 >> _______________________________________________ >> Harbour mailing list >> Harbour@harbour-project.org >> http://lists.harbour-project.org/mailman/listinfo/harbour >> >> > > -- > View this message in context: > http://www.nabble.com/How-to-optimize-filters-with-DBFCDX--tp23244059p23247979.html > Sent from the Harbour - Dev mailing list archive at Nabble.com. > > _______________________________________________ > Harbour mailing list > Harbour@harbour-project.org > http://lists.harbour-project.org/mailman/listinfo/harbour > _______________________________________________ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour