Ver Mensaje Individual
  #21  
Antiguo 07-05-2008
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Reputación: 21
AzidRain Va camino a la fama
Finalmente la solución salió:

Extract requiere que se le pase un valor tipo datetime por lo que es forzoso hacer un cast, al pasarle un parametro tdatetime simplemente no sabe como manejarlo y le es imposible hacer el cast o manejarlo directamente. Curiósamente si utiliza uno el parametro tipo date para otras funciones o bien comparando directamente mediante "<,>, o =". Para usarlo con extract hay que hacer esto:

Código Delphi [-]
ClientDataset2.Close;

 f :=   StringReplace( datetostr(efecha1.Date),'/','.',[rfReplaceAll]);

 SQLDataset1.ParamByName('fecha1').AsString :=  f;

 ClientDataset2.Open;

Y el query queda:
Código SQL [-]
  select * from facturas 
  where  extract(day from cast(:fecha1 as date)) >5

En el caso de Delphi, por claridad convertimos el valor del datepicker a un formato que nos reconozca FB, en este caso la fecha separada con puntos que es como FB reconoce que se trata de una fecha en formato "DD.MM.YYYY", si se la pasamos tal como la tiene el datepicker FB dará por hecho que es una fecha en formato americano tan solo por contener las diagonales.

Posteriormente en el query, hacemos un cast al contenido del parametro, que en este caso es una cadena simple, y lo convertimos en un valor date que extract si se digna en aceptar.

Y así si funciona, aunque implica unas líneas más de código.
__________________
AKA "El animalito" ||Cordobés a mucha honra||
Responder Con Cita