Rutina que ocupa el 100% del procesador

[[egostar]]

Gracias Seoane, pero sucede algo curioso, no tengo problema con los demas programas que este usando en la PC.

Sin embargo si me importa el tiempo ya que cada registro que agrego a la base de datos consume 2 o 3 segundos, pero si estamos hablando de 20,000 registros, aumentar el tiempo me parece dramático.

Tendré que ver como le bajo al tiempo al agregar registros a la base.

Salud OS y nmuchas gracias.

[[seoane]]

Pues entonces nada, si no molesta al resto de programas que use toda la CPU que quiera

[[Al González]]

¡Hola a todos!

Empezado por egostar

...me importa el tiempo ya que cada registro que agrego a la base de datos consume 2 o 3 segundos, pero si estamos hablando de 20,000 registros, aumentar el tiempo me parece dramático.

Tendré que ver como le bajo al tiempo al agregar registros a la base...

Que tal Eliseo. Hace dos años desarrollé para un cliente de tu zona urbana (mundo pequeño al fin) un componente llamado TMultiADO que le resolvió el problema de tener que insertar miles de registros a través de una aplicación Delphi con la mayor velocidad posible. La esencia de este componente es crear dinámicamente varios hilos y conexiones secundarias para enviar al servidor SQL sentencias Insert de manera simultánea. La clave es que el ciclo de inserciones no se espera a que el servidor responda a una sentencia "Insert Into" para enviarle la siguiente. Los hilos secundarios y sus respectivas conexiones paralelas se crean conforme la demanda y hasta cierto límite de hilos / conexiones, cada hilo que va quedando desocupado se emplea para enviar la siguiente sentencia de la cola. En diferentes pruebas obtuvimos ahorros de tiempo de entre 50 y 75%.

Aquello era para ADO, pero bien podría adaptarse a otro tipo de conexiones como las que tradicionalmente se usan con Firebird (IBX, dbExpress, etc.). Ya expiró el tiempo de "goce exclusivo", así que el código queda disponible para quien lo pueda necesitar (la empresa donde trabajo dispuso distribuir este componente bajo la línea GH, es decir, gratuito).

El único problema es que está un poco empolvado y usa la versión vieja de GH Freebrary (antes Interfaz GH). Por ahora se considera un producto "en revisión", pero igual y les sirve a los interesados, cuando menos de referencia. Estoy en el correo de siempre.

Un abrazo múltiple.

Al González.

[[egostar]]

Muchas gracias Alberto, mas rápido que una bala estaré en contacto contigo.

Salud OS desde este rincón solitario en la Ciudad de los Palacios.

[Kipow]

Se ve interesante esa aplicacion, podrias indicarme donde conseguir el codigo?

[[egostar]]

Bueno, solo actualizando este hilo, estuve haciendo pruebas y me encontré con la siguiente situación:

Inicialmente le tomaba a mi aplicación algo más de 4 horas procesar 10,000 registros.

El detalle era que por cada registro actualizado abría y cerraba la conexión con la base de datos

Me dije, si solo abro la base cuando comienzo el proceso y la cierro al terminar, pues bien lo hice y baje el tiempo a 2 horas y media

Seguí buscando como estaba haciendo la inserción de registros y me encontré que por cada registro que agregaba, abria y cerraba la tabla

Bueno, me pregunté, porque no quitar esas instrucciones y solo abro la tabla cuando inicio el proceso y la cierro cuando termina, ya habia funcionado con el asunto de la conectividad con la base de datos, no?

Pues bien, ahora procesar 10,000 registros me ocupa de 6 a 7 minutos y el uso del procesador pues ya me viene valiendo dos cosas.

Salud OS y gracias por las aportaciones a este hilo.

[[cHackAll]]

Vaya, interesante anecdota. El Firebird utiliza conexion ADO, DAO o que?

[[egostar]]

Empezado por cHackAll

Vaya, interesante anecdota. El Firebird utiliza conexion ADO, DAO o que?

Hola amigo cHackAll Utilizo los componentes IBX, no se si son los mejores pero son los que aprendí en su momento y se me hacen muy fáciles.

no se si haya componentes mejores de utilizar.....

Salud OS.

[[Al González]]

¡Hola a todos!

Así que ese era el detalle. De haberme fijado antes en la cantidad de registros que mencionas (10000), habría advertido que Firebird no podía ser tan lento. Y mira, si además empleas transacciones verás cómo se reduce muchísimo más el tiempo de espera.

Empezado por egostar

...Utilizo los componentes IBX, no se si son los mejores pero son los que aprendí en su momento y se me hacen muy fáciles.

no se si haya componentes mejores de utilizar...

También yo los usé durante dos años, pero a partir de 2006 empleo dbExpress (los que inician con "TSQL"). Una de las ventajas es que no te "casas" con una base de datos en particular, incluso le hice una mejora recientemente al TSQLQuery (una propiedad "ClearUnprovidedParams" para que ponga en blanco los parámetros no especificados por el lado cliente, en lugar de hacer un reemplazo total de los mismos). Además de que son estos dbExpress los que tienen más vigencia en las nuevas versiones de Delphi.

De cualquier forma, los IBX son buenos, los usé en varias aplicaciones.

Un abrazo rápido.

Al González.