Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-11-2006
pvizcay pvizcay is offline
Miembro
 
Registrado: jun 2006
Posts: 147
Poder: 19
pvizcay Va por buen camino
Question como pasar a un stored procedure un conjunto de datos en FB 1.5

hola gente del foro, a ver si alguno se cruzo con esta duda que tengo y me puede ayudar a resolverla..!

simplificando un poco tengo dos tablas
FACTURAS(ID integer, ..., ID_TIPO integer)
TIPO_FACTURA (ID integer, DESC varchar)
de relación obvia; la tabla TIPO_FACTURA es dinámica y cambia, lo que pretendo es darle al usuario en un informe la posibilidad de filtrar los tipos de facturas que desea en un CheckListBox o algo por el estilo..

supongamos que el usuario elegió los tipos de factura con ID 3, 4, 5.. el informe se genera con un STORED PROCEDURE selecteable (porque procesa otras cosas que simplifiqué aca y además quiero desacoplarlo de la aplicación) llamado INFORME_FACT, ahora la pregunta es como le paso de manera limpia los IDs al procedure ya que:

si se los paso cada uno como un parámetro distinto tengo que suponer un número máximo de tipos de facturas (lo que por ahi en el ej. tiene sentido, pero en otras situación por el estilo no quiero limitar el número..)

y ahora suponiendo que no fuera un STORED PROCEDURE sino un SQL que se guarda en un TIBQuery normal, como lo generaría uds. SIN MODIFICAR EL TEXTO SQL...? (sino es fácil vas agregando and ID_TIPO = A, etc. por cada un al texto sql y listo)

se me ocurrió la solución puede estar creando tablas temporarias y haciendo un
SELECT * FROM FACTURAS
WHERE ID_TIPO IN (SELECT ID_TIPO FROM TEMPORARIA) ???
como se hace esto en FB de tal manera que funcione bien en multiusuario??

graciasss!!
Responder Con Cita
  #2  
Antiguo 23-11-2006
tefots tefots is offline
Miembro
 
Registrado: feb 2005
Posts: 108
Poder: 20
tefots Va por buen camino
Cita:
Empezado por pvizcay
hola gente del foro, a ver si alguno se cruzo con esta duda que tengo y me puede ayudar a resolverla..!

simplificando un poco tengo dos tablas
FACTURAS(ID integer, ..., ID_TIPO integer)
TIPO_FACTURA (ID integer, DESC varchar)
de relación obvia; la tabla TIPO_FACTURA es dinámica y cambia, lo que pretendo es darle al usuario en un informe la posibilidad de filtrar los tipos de facturas que desea en un CheckListBox o algo por el estilo..

supongamos que el usuario elegió los tipos de factura con ID 3, 4, 5.. el informe se genera con un STORED PROCEDURE selecteable (porque procesa otras cosas que simplifiqué aca y además quiero desacoplarlo de la aplicación) llamado INFORME_FACT, ahora la pregunta es como le paso de manera limpia los IDs al procedure ya que:

si se los paso cada uno como un parámetro distinto tengo que suponer un número máximo de tipos de facturas (lo que por ahi en el ej. tiene sentido, pero en otras situación por el estilo no quiero limitar el número..)

y ahora suponiendo que no fuera un STORED PROCEDURE sino un SQL que se guarda en un TIBQuery normal, como lo generaría uds. SIN MODIFICAR EL TEXTO SQL...? (sino es fácil vas agregando and ID_TIPO = A, etc. por cada un al texto sql y listo)

se me ocurrió la solución puede estar creando tablas temporarias y haciendo un
SELECT * FROM FACTURAS
WHERE ID_TIPO IN (SELECT ID_TIPO FROM TEMPORARIA) ???
como se hace esto en FB de tal manera que funcione bien en multiusuario??

graciasss!!
con un stored procedure no puedes hacerlo , no se le pueden pasar arrays.

lo mas facil seria crear el sql que filtre los datos agregando 'and did_tipo=a and .....'

la otra forma mas complicada , en vez de crear una tabla temporal ,puedes tener una tabla ya creada, e insertar los datos en dicha tabla antes de hacer el query. esta tabla puede tener un campo que se valla incrementando para cada usuario que inserta un conjunto de datos (puedes obtenerlo de un generador , o ir incrementandolo tu) , y luego solo hay que hacer el mismo select , pero indicando el identificador que agrupa los datos añadidos.

SELECT * FROM FACTURAS
WHERE ID_TIPO IN (SELECT ID_TIPO FROM TEMPORARIA WHERE ID_CONJUNTODATOS=X) ???

asi cada usuario inserta / borra su conjunto de datos , que luego usa para hacer el query.
eso si , luego hay que borrar para que la tablatemporal no crezca hasta el infinito.
Responder Con Cita
  #3  
Antiguo 23-11-2006
Avatar de Crandel
[Crandel] Crandel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Parana, Argentina
Posts: 1.475
Poder: 23
Crandel Va por buen camino
yo lo que haria seria crear un procedimiento que resuelva para un solo ID

Código SQL [-]
CREATE PROCEDURE INFORME_FACT (ID integer)
.....

Luego llamas a este procedimiento deste Delphi mediante una instruccion SQL, uniendo los diferentes informes

asi:
Código SQL [-]
select * from INFORME_FACT(3) union select * from  INFORME_FACT(4)

Espero que te guste esta solucion
__________________
[Crandel]
Responder Con Cita
  #4  
Antiguo 24-11-2006
pvizcay pvizcay is offline
Miembro
 
Registrado: jun 2006
Posts: 147
Poder: 19
pvizcay Va por buen camino
Talking conclusiones..

desde ya gracias a los dos por haber leido y contestado..
bueno estuve averiguando y pareciera que lo de la tabla temporaria es la mejor manera de ir, por lo visto FB no soporta tablas temporarias por lo que tendre que usar la variable CURRENT_TRANSACTION para asegurarme que no haya conflictos en un entorno multiusuario.. lo de los unions esta bueno pero tiene el inconveniente que tenés que modificar dinámicamente el texto de la consulta (si no entendí mal..), si son 3 IDS serían tres UNIONs y así sucesivamente.. mi idea era desacoplar completamente esto de la aplicación..
Responder Con Cita
  #5  
Antiguo 24-11-2006
pvizcay pvizcay is offline
Miembro
 
Registrado: jun 2006
Posts: 147
Poder: 19
pvizcay Va por buen camino
Unhappy conclusiones 2

lo cual me lleva a la conclusión de que no encontré manera de manejar esto de forma limpia en firebird (lo de limpio es cuestión de gustos obviamente) pero es obvio que esta solución no escala bien.. demasiadas tablas "temporarias" sin sentido (una para cada TIPO_FACTURA, TIPO_CHEQUE, TIPO_CAMBIO, TIPO_MONEDA, etc etc.) creo yo..
Responder Con Cita
  #6  
Antiguo 24-11-2006
Avatar de Crandel
[Crandel] Crandel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Parana, Argentina
Posts: 1.475
Poder: 23
Crandel Va por buen camino
otra idea (no parece muy limpia pero por ahi te gusta), pasale los parametros como registros de una tabla auxiliar de la base de datos.

Luego en un procedimiento vas creando las uniones dinamicamnete de acuerdo a la cantidad de registros de la tabla.
__________________
[Crandel]
Responder Con Cita
  #7  
Antiguo 25-11-2006
Avatar de RONPABLO
[RONPABLO] RONPABLO is offline
Miembro Premium
 
Registrado: oct 2004
Posts: 1.514
Poder: 22
RONPABLO Va por buen camino
se me ocurre una un poco diferente y es algo como lo siguiente:

Código SQL [-]
     codigos = '1,3,5,12';
     cadena = '';
     numero=0;
     j=1;
     i = strlen(:codigos);
     while(j<=i) do
        begin
          c = substr(FACTURA,j,j);
          if (c between '0' and '9') then
             begin
                cadena = cadena || cast(:c as varchar(1));
             end
          else if ((c=',') or (j=i)) then
          begin
             numero = cast(:cadena as integer);             
        select * from INFORME_FACT(:numero);
             cadena = '';
          end;
          j=j+1;
        end
ya el problema es cuando se manden muchos codigos en la cadena (como tal es algo q se me ocurrio y debe de tener muchos errores pero es solo una idea)

Última edición por RONPABLO fecha: 25-11-2006 a las 00:56:26.
Responder Con Cita
  #8  
Antiguo 25-11-2006
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
lo más fácil desde mi punto de vista es un sql del tipo:

Código SQL [-]
select * from facturas where nfactura in (3, 4, 5, 6, 7);

Si te ayudas de un TStringList, puedes usar su propiedad commaText para hacer la tira 3, 4, 5, 6. Yo utilicé un Combobox para que el usuario añada las facturas, así tienes el CommaText a mano y además el usuario tiene comodidades para añadir y eliminar las facturas que quiere ver.

Este SQL puedes almacenarlo en un archivo .inc como se hace en la mayoría de paquetes, así puedes modificar el SQL en el ordenador de tu cliente sin tener que recompilar la aplicación. O incluso (y es lo que yo hago), guardas el SQL en una tabla de tu programa, así lo cargas dinámicamente.

Hay otros trucos, por ejemplo:
Código Delphi [-]
const sqlFacturas = 'select * from facturas where nfactura in %s';

....
query1.sql.text := format(sqlfacturas, ['(3,4,56)']);
query1.Open;
Esa constante puedes almacenarla en la BBDD, archivo .inc etc.

Inconveniente, no estará compilada nunca en FB.

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #9  
Antiguo 04-12-2006
pvizcay pvizcay is offline
Miembro
 
Registrado: jun 2006
Posts: 147
Poder: 19
pvizcay Va por buen camino
hola,
tal vez a alguno le sirva este artículo de la borland developer network al respecto aunque en vez de un SP lo trata con querys..

http://bdn.borland.com/article/32076

saludos!
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
En un stored procedure, ¿Cómo uso un arreglo como param de entrada? cuxoapat Firebird e Interbase 0 04-03-2005 19:54:42
como hago este stored procedure edy_aca Firebird e Interbase 2 13-01-2005 17:32:26
Ver los Stored Procedure tgsistemas SQL 0 06-04-2004 18:18:22
Stored Procedure tgsistemas SQL 1 27-02-2004 14:10:33
Pasar Tabla Como Parametro en Stored Procedure elpinjum Firebird e Interbase 3 17-10-2003 11:37:41


La franja horaria es GMT +2. Ahora son las 00:51:30.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi