FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Velocidad al indexar cambia entre ambas ejecuciones
Posts: 149
Joined: Thu Jun 21, 2007 03:26 PM
Velocidad al indexar cambia entre ambas ejecuciones
Posted: Mon Dec 17, 2007 09:28 PM

Hola. He notado algo que me pasa con harbour / fwh. El tema es asi: abro un programa que tiene una dll con un browse, que muestra una base de datos de aproximadamente 50.000 registros; lo primero que hago es crear un indice segun este completo o no un campo de dicha base; lo raro es esto: cuando abro el programa por primera vez, me tarda aproximadamente 2 o 3 minutos (tiempo logico porque el index que uso puede ser pesado)... ahora: una vez que veo el browse con los registros, si cierro y abro enseguida el programa otra vez, me abre al instante... ¿puede ser que harbour reutilize indices si estos se abren con cierta diferencia de tiempo? al comienzo del programa hago un:

USE base shared
index on base->campo1+str(base->campo2,8) to c:\indice1 for base->facha=ctod(" / / ") .and. base->codigo<>' '

yo creia que este indice se generaba siempre, pero la diferencia de tiempo entre la primer ejecución y las subsiguientes (siempre que se hagan dentro del minuto posterior a la primer ejecucion) me hace pensar que esto no es asi. ¿alguien sabe como funciona realmente el indice? en este caso me gustaría saber si existe algun parametro para que en ciertos casos no me reutilice el que esta creado.

Gracias. Atte.

Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Velocidad al indexar cambia entre ambas ejecuciones
Posted: Tue Dec 18, 2007 01:10 AM

Diego,

Es más probable que se trate de la propia caché de memoria de Windows:

Como la aplicación acaba de realizar el trabajo, y todos los elementos usados estan accesibles por Windows, el tiempo de acceso a ellos disminuye considerablemente.

De todas formas, ante la duda, prueba a borrar el índice con FErase() antes de usar la DBF

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Velocidad al indexar cambia entre ambas ejecuciones
Posted: Tue Dec 18, 2007 03:32 PM
Hola, debes usar el comando: EVAL
INDEX ON TRANSCOD   TAG 01 TO ITRANS                                 ;
    EVAL ( oMeter1:Set( RecNo() ), CursorWait(), SysRefresh() )    ;
    EVERY 10
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion