Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Realizar una consulta sobre los registros que devuelve otra consulta (https://www.clubdelphi.com/foros/showthread.php?t=48529)

Borjaserrano 27-09-2007 09:54:56

Realizar una consulta sobre los registros que devuelve otra consulta
 
Hola amigos

He heredado una base de datos con un campo Fecha_alta de tipo VARCHAR(100), si!.. increíble!:)

Lo primero que he hecho ha sido convertir esos campos a Date, usando un CAST. A su vez he tenido que ir concatenando partes de esos campos dado que tenían formato 'dd.mm.aaaa', y tenía que convertir esto a 'dd/mm/aaaa'

La sentencia que he empleado para esto, es la siguiente:

Código SQL [-]
SELECT * FROM MyTable WHERE MyDATE_VARCHAR != 'No Date' AND MyDATE_VARCHAR != ''
and CAST((SUBSTRING ( MyDATE_VARCHAR FROM 7 FOR 4 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 4 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 1 FOR 2 )) AS DATE) > '01/01/2001'
and CAST((SUBSTRING ( MyDATE_VARCHAR FROM 7 FOR 4 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 4 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 1 FOR 2 )) AS DATE) > '01/01/2008'


¿Cual es el problema que tengo?

Tal y como podéis ver en la sentencia SQL primero evalúo que el campo no tenga el valor 'Sin Fecha'.. Si!!, este campo no solo puede contener fechas en formato 'dd.mm.aaaa', sino también la cadena, 'Sin fecha' !.

Por culpa de estos registros con el valor 'Sin fecha', la sentencia de antes me da errores al hacer el CAST de una cadena con ese valor (no se puede convertir a DATE).

Por tanto, lo que me gustaría hacer sería una consulta que devolviera todos los registros que no tengan este dichoso valor, y una vez obtenidos, realizar otra consulta distinta sobre ellos haciendo bien el CAST.

¿Alguna idea de cómo hacer esto?

Gracias de antemano.

Lepe 27-09-2007 11:12:13

El error no puede ser por el texto 'No Date' ya que en el where estas diciendo que esos registros no los seleccione, más bien puede haber registros con valor nulo (NULL) para el campo varchar, que obviamente, es distinto de la cadena vacía.

Yo lo haría de este modo:

crearía un nuevo campo en la tabla de tipo date. Valor por defecto NULL
ahora intento el copiado asi (Fecha es el nuevo campo de tipo Date):
Código SQL [-]
update mytable set Fecha = CAST((SUBSTRING ( MyDATE_VARCHAR FROM 7 FOR 4 )
||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 4 FOR 2 )
||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 1 FOR 2 )) AS DATE)

WHERE

MyDATE_VARCHAR <> 'No Date' 
AND MyDATE_VARCHAR <> ''
AND MyDATE_VARCHAR IS NOT NULL

Ahora los que tienen fecha, ya tienen su valor asignado.
Los que tienen 'No Date' o eran nulos o era un texto vacío, ya tienen un NULL, PERO es muy posible que haya registros con otros valores distintos, y sería bueno comprobarlo con:
Código SQL [-]
select fecha, fecha_VARCHAR
from mytable
where 
   fecha is null
AND MyDATE_VARCHAR <> 'No Date' 
AND MyDATE_VARCHAR <> ''
AND MyDATE_VARCHAR IS NOT NULL
Si esta consulta devuelve algún registro, tendrás que asignar el campo Fecha al valor que creas conveniente.


La verdad, no sé por qué usas el operador "!=" yo siempre he usado "<>" en Firebird.

Edito: hay una pequeña incongruencia en lo expuesto: Dices que quieres el formato dd/mm/aaaa, sin embargo, el SQL pone el formato aaaa/mm/dd. Yo no sé el formato que espera Firebird para una fecha, ya que siempre he usado la biblioteca rfunc que trae una UDF encodeDate.

Saludos

Borjaserrano 27-09-2007 12:12:53

Gracias por tu atención, Lepe

Realmente el error me viene por el casteo de un registro 'Sin emitir', dado que me devuelve un error "Overflow occurred during data type Conversion error from string "itir/ e/Si" (en realidad la cadena del registro es 'Sin emitir', no 'No date')

El tema del formato lo hice finalmente así, porque era como lo requería la base de datos.

Lo único que necesitaría sería hacer una primera consulta sin los registros 'Sin emitir', y después hacer una consulta sobre esos resultados.

He probado el crear una vista, y luego hacer una consulta sobre esa vista, pero me sigue dando el mismo error. Me imagino que esto será porque la vista llama a la table en cuestión y aplica todas las condiciones.

Lepe 27-09-2007 15:45:57

Si en el where estamos diciendo "WHERE MyDATE_VARCHAR <> 'Sin emitir' " todos esos registros no los procesa el update que puse, por tanto, ese error no debe producirse. Prueba mi sql en un TIbquery y usa "ibquery1.ExecSql" en lugar de "ibquery1.Open".

En la condición WHERE no puedes poner ese cast, porque entonces SI procesa los registros 'Sin emitir', y obviamente da el error.

En las consultas, el Sistema Gestor, primero evalúa la condición where, para saber los registros que debe seleccionar, posteriormente, los selecciona y ejecuta la parte Select / Update / Insert etc. Como ves en mi parte where no se hace ningún moldeo de tipos.

Edito: No necesitas 2 consultas, en una sola (la que puse anteriormente) lo hace todo. Pruébala ;)


Saludos

Caro 27-09-2007 15:52:01

Hola, porque en vez de guardar como cadena 'Sin emitir', simplemente lo guardas como null, porque cuando es null si funciona, al final igual significara para ti que los registros que tengan ese campo como nulo son los 'sin admitir', dos detallitos que he visto en el formato de la fecha lo estas concatenando 'aaa/mm/dd' cuando deberia ser 'mm/dd/aaaa' y en tu comparación ambos estan con > (mayor), supongo que se te ha ido.

Código SQL [-]
SELECT * FROM MyTable WHERE MyDATE_VARCHAR IS NOT NULL
AND (CAST((SUBSTRING ( MyDATE_VARCHAR FROM 4 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 1 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 7 FOR 4 )) AS DATE) > '01/01/2005'
AND CAST((SUBSTRING ( MyDATE_VARCHAR FROM 4 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 1 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 7 FOR 4 )) AS DATE) < '01/01/2008')


Saluditos

Borjaserrano 27-09-2007 17:57:19

Hm.. y qué os parecería el hacer una consulta anidada?:

Código SQL [-]
SELECT * FROM 
(SELECT * FROM MyTable WHERE MyDate_Varchar <> 'No Date' AND MyDate_Varchar <> '' AND MyDate_Varchar IS NOT NULL)
WHERE CAST((SUBSTRING ( MyDATE_VARCHAR FROM 4 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 1 FOR 2 )||'/'||SUBSTRING ( MyDATE_VARCHAR FROM 7 FOR 4 )) AS DATE) < '01/01/2008')

Esta consulta hace perfectamente lo que estaba buscando... pero solamente en el ordenador de uno de mis compis de trabajo!!!!. En el resto de ordenadores no funciona, ni tampoco en el servidor!. Estoy mirando la razón por la que pueda suceder esto. Tenemos todos el Firebird 1.5 instalado. El ordenador en el cual esta consulta funciona tiene un par de dll's de Firebird 2.0 instaladas en la GAC. No obstante he desinstalado el 1.5 y he instalado el 2.0 y me sigue sin funcionar este tipo de sentencias.

Tenéis una idea del porque de esto?. Tal vez hay algún paquete que se pueda instalar, que añada la posibilidad de usar estas consultas a Firebird?

Lepe 27-09-2007 20:46:53

Cita:

Empezado por Lepe (Mensaje 234298)
En la condición WHERE no puedes poner ese cast, porque entonces SI procesa los registros 'Sin emitir', y obviamente da el error.

No comment :eek::eek:

O no quiere leerme, o me tiene ignorado.... no sé.

egostar 27-09-2007 21:01:00

Cita:

Empezado por Lepe (Mensaje 234442)
No comment :eek::eek:

O no quiere leerme, o me tiene ignorado.... no sé.

Vamo amigo Lepe, no te sientas mal, no te ignoran, simplemente que ya se aferraron a una solución, verás que ahora si reaccionan :D:D

Yo mejor me callo la boca, no puedo dar una solucion:(

Salud OS

Borjaserrano 28-09-2007 08:45:55

No amigo Lepe, no te ignoro, solo que la consulta a la que te refieres conlleva añadir una columna a la tabla, y no puedo hacer dicha operación. Tenemos aproximadamente 500 bases de datos a las que habría que añadirles esa columna, y eso sería demasiado arriesgado.

Has probado la consulta que puse antes?. No entiendo como puede funcionar para un servidor de firebird, y para otro no..

Lepe 28-09-2007 11:59:59

ahh bueno, si es eso pues se dice y listo, no pasa nada ;).

En Firebird 1.5, cuando he puesto una fecha como string he tenido que hacerlo en formato mm/dd/aaaa, no sé si haciendo el cast de esa forma te lo acepte.

Saludos

Borjaserrano 28-09-2007 12:57:53

No me refería al tema del casteo, sino a hacer una consulta anidada simple, como por ejemplo

Código:

SELECT * FROM (SELECT * FROM TABLA WHERE Condicion <> 'VAL 1') WHERE Condicion = 'valor'
Esto haría perfectamente la función, dado que ejecutaría una consulta sobre otra consulta previamente hecha, pero no sé por que narices no me tira.. cuando en el pc que está a mi lado va sin problemas!! :mad:

Lepe 28-09-2007 14:57:54

Prueba así:
Código SQL [-]
SELECT (SELECT fecha FROM TABLA WHERE Condicion <> 'VAL 1') as fecha
from tabla
WHERE Condicion = 'valor'

Creo que debes especificar los campos, el comodin * no lo puedes usar.

En FB 1.5 no me permite un SubSelect en la parte FROM de la consulta principal, pero en la parte SELECT si.

Saludos

rastafarey 01-10-2007 23:19:44

Resp
 
Prueba con La sentencia case.


La franja horaria es GMT +2. Ahora son las 10:37:31.

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