Página 1 de 1

Queues y consultas SQL

Publicado: Vie Nov 15, 2019 5:02 pm
por PolarBear
Saludos Clarioneros

A fin de generar reportes, bien sea impresos o exportarlos a Excel, a menudo tengo la necesidad de ejecutar una consulta (SQL) sobre una tabla, y luego, con el resultado, llenar una Queue fabricada para tal fin, pero lo hago de un registro a la vez, ejemplifico ;

MyQueue queue, pre(q) !** Defino una queue con los campos necesarios
campo1 long
campo2 string(20)
.

TABLA{Prop:SQL} = 'SELECT * FROM TABLA WHERE Existencia > 0 AND ....' !** se hace un select sobre la tabla
loop
next(TABLA) !** Recorro la tabla con un loop y copio registro a registro
if errorcode() = 33 then break.
q.campo1 = TAB:campo1
q.campo2 = TAB:campo2
add(MyQueue)
.

!** Proceso de MyQueue Aqui ya imprimo, exporto o lo que sea


Una vez con los datos en MyQueue, ya o bien genero el reporte o lo exporto a Excel. Pero, como ven, el proceso para Tablas grandes consume MUUUUCHO tiempo en el loop para llenar la Queue. ¿Hay alguna manera de optimizar esto? Es decir, que despues de generar la sentencia de SQL se alimentara la Queue directamente?? Sospecho que debe haberlo, ya que una libreria con la que trabajo exporta a excel el contenido de una lista en pantalla muchisimo mas rapido de lo que yo lo consigo con mi métod

Desde ya muchas gracias

Re: Queues y consultas SQL

Publicado: Lun Nov 25, 2019 3:39 pm
por jarodav1
En la siguiente liga tenemos una clase para exportar a excel de manera se puede decir automatica, por si te sirve

https://onedrive.live.com/?authkey=%21A ... DBE2C9A358

es la que se llama clases para exportar a excel nuevo

saludos

Re: Queues y consultas SQL

Publicado: Vie Dic 06, 2019 2:56 pm
por PolarBear
Saludos

Claro que si, muchas gracias por el apoyo!