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 04-05-2007
Avatar de Durbed
Durbed Durbed is offline
Miembro
 
Registrado: ago 2004
Posts: 166
Poder: 20
Durbed Va por buen camino
Consulta que se resiste, Clausula IN

Tengo la siguiente estructura de base de datos para relacionar categorias con direcciones

y quiero obetener las direcciones que estan simultaneamente en mas de una categoria, es decir, quiero que me devuelva las direcciones que por ejemplo son clientes y proveedores al mismo tiempo. Como veis es una relacion de n a n y no me sale esa consulta.

He intentado con la clausula IN de la siguiente forma:
Código SQL [-]SELECT DISTINCT DIRECCIONES.COD_DIRECCION, DIRECCIONES.C_CONT FROM DIRECCIONES INNER JOIN DIR_CAT ON (DIRECCIONES.COD_DIRECCION = DIR_CAT.ID_DIR) INNER JOIN CATEGORIAS ON (DIR_CAT.ID_CAT = CATEGORIAS.ID_CATEGORIA) WHERE (CATEGORIAS.CATEGORIA = :Q) AND ((DIRECCIONES_COD_DIRECCION, DIRECCIONES.C_CONT) IN ( SELECT DISTINCT DIRECCIONES.COD_DIRECCION, DIRECCIONES.C_CONT FROM DIRECCIONES INNER JOIN DIR_CAT ON (DIRECCIONES.COD_DIRECCION = DIR_CAT.ID_DIR) INNER JOIN CATEGORIAS ON (DIR_CAT.ID_CAT = CATEGORIAS.ID_CATEGORIA) WHERE (CATEGORIAS.CATEGORIA = :P))

Y me da un error en el IN.

Un saludo y gracias.
__________________
Intentando hacer algo con Delphi 7 y Firebird 1.5
Responder Con Cita
  #2  
Antiguo 04-05-2007
[basti] basti is offline
Miembro Premium
 
Registrado: ago 2004
Posts: 388
Poder: 20
basti Va por buen camino
No estoy seguro, pero prueba con algo así:

Código SQL [-]
select direcciones.cod_direccion, direcciones.c_cont 
from direcciones as dir 
where direcciones.cod_direccion in (select id_dir from dir_cat group by id_dir
having count(id_cat) > 1)
Responder Con Cita
  #3  
Antiguo 05-05-2007
Avatar de fjcg02
[fjcg02] fjcg02 is offline
Miembro Premium
 
Registrado: dic 2003
Ubicación: Zamudio
Posts: 1.410
Poder: 22
fjcg02 Va camino a la fama
Sigue intentado hacerlo con este código

Código SQL [-]
SELECT  DIR.COD_DIRECCION, COUNT(DIR.C_CONT) AS VECES
FROM DIRECCIONES DIR, DIR_CAT, CATEGORIAS CAT
WHERE 
DIR.COD_DIRECCION = DIR_CAT.ID_DIR AND
DIR_CAT.ID_CAT = CAT.ID_CATEGORIA AND
CAT.CATEGORIA = :Q
GROUP BY DIRECCIONES.COD_DIRECCION
HAVING COUNT(DIRECCIONES.C_CONT) > 1
y dinos qué tal.

Suerte.
__________________
Cuando los grillos cantan, es que es de noche - viejo proverbio chino -
Responder Con Cita
  #4  
Antiguo 07-05-2007
Avatar de Durbed
Durbed Durbed is offline
Miembro
 
Registrado: ago 2004
Posts: 166
Poder: 20
Durbed Va por buen camino
Hola, no me ha funcionado ninguna de las dos , la clauula union puede ser la solucion? pero no me funciona, me da error
__________________
Intentando hacer algo con Delphi 7 y Firebird 1.5
Responder Con Cita
  #5  
Antiguo 07-05-2007
Avatar de fjcg02
[fjcg02] fjcg02 is offline
Miembro Premium
 
Registrado: dic 2003
Ubicación: Zamudio
Posts: 1.410
Poder: 22
fjcg02 Va camino a la fama
O te hemos entendido mal o no te explicas bien ( lo primero, seguro ).
He vuelto a leer la duda, y con mi consulta debiera salir perfectamente la información que quieres.

Código SQL [-]
SELECT  DIR.COD_DIRECCION, COUNT(DIR.C_CONT) AS VECES
FROM DIRECCIONES DIR, DIR_CAT, CATEGORIAS CAT
WHERE 
DIR.COD_DIRECCION = DIR_CAT.ID_DIR AND
DIR_CAT.ID_CAT = CAT.ID_CATEGORIA 
GROUP BY DIRECCIONES.COD_DIRECCION
HAVING COUNT(DIRECCIONES.C_CONT) > 1

Te tiene que salir esto ( siempre que tengas registros repetidos ).

COD_DIRECCION, VECES
uno,2
dos,3
cuatro, 5

Si quieres ir filtrando, prueba quitando la clausula HAVING

Código SQL [-]
SELECT  DIR.COD_DIRECCION, COUNT(DIR.C_CONT) AS VECES
FROM DIRECCIONES DIR, DIR_CAT, CATEGORIAS CAT
WHERE 
DIR.COD_DIRECCION = DIR_CAT.ID_DIR AND
DIR_CAT.ID_CAT = CAT.ID_CATEGORIA
GROUP BY DIRECCIONES.COD_DIRECCION

COD_DIRECCION, VECES
uno,2
dos,3
tres,1
cuatro, 5
cinco,1
seis,1

Observa que he quitado de la consulta el parámetro Q que tú incluías, que puede ser el motivo de que no te funcione. Aunque realmente és lo mismo que no funcione a que no te salga la información que quieres.

Suerte y un saludo
__________________
Cuando los grillos cantan, es que es de noche - viejo proverbio chino -
Responder Con Cita
  #6  
Antiguo 10-05-2007
Avatar de Durbed
Durbed Durbed is offline
Miembro
 
Registrado: ago 2004
Posts: 166
Poder: 20
Durbed Va por buen camino
Ya consegui hacer que funcionara, al final me quedo algo asi:
Código SQL [-]
SELECT D.* FROM DIRECCIONES D
LEFT OUTER JOIN DIR_CAT C0 ON (D.COD_DIRECCION = C0.ID_DIR) 
LEFT OUTER JOIN DIR_CAT C1 ON (D.COD_DIRECCION = C1.ID_DIR) 
...
WHERE
(C0.ID_CAT = 1) AND
(C1.ID_CAT = 3) AND
...

Un saludo y gracias a todos por la ayuda.
__________________
Intentando hacer algo con Delphi 7 y Firebird 1.5
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
Edit se resiste a recibir foco... aprendiz2 OOP 4 16-12-2006 01:41:06
Google se resiste a revelar la base de datos de sus usuarios vtdeleon Noticias 2 24-01-2006 16:23:16
Clausula LIKE federiconqn21 SQL 3 28-12-2005 15:49:13
Delete sin clausula where Fita Conexión con bases de datos 2 06-07-2005 01:35:04
Clausula UNION TJose Firebird e Interbase 3 15-05-2003 20:59:56


La franja horaria es GMT +2. Ahora son las 15:59:45.


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