Campo Filter de ADOTable

[Nelet]

Empezado por Onti

No deberia poner el mes?
(ademas asumimos todas la fechas están el mismo año)

Pues si....pero acabo de comer y llevo una torta monumental. Mea culpa.

Empezado por Sr.Escorpion

Ya eso lo habia probado con anterioridad y no funciona... no obstante estoy usando un ADOTable, no un ADOQuery

Bueno...con el ADOTable es igual, incluso tiene más sentido usar el Filter. Pero, ¿por que no te funciona?. ¿Te da algún error?. Quzá dependa del tipo de BD.

[Sr.Scorpion]

Empezado por Nelet

Pues si....pero acabo de comer y llevo una torta monumental. Mea culpa.


Bueno...con el ADOTable es igual, incluso tiene más sentido usar el Filter. Pero, ¿por que no te funciona?. ¿Te da algún error?. Quzá dependa del tipo de BD.

El error que me da dice... Argumentos incorrectos. Fuera del Intervalo permitido o en conflicto con otros...

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)= '+ '03';
ADOTable.Filtered:= True;

FCompra es el campo guardado en una BD de Access con el formato de fecha corta Ejemplo: 31/01/2007

Si ya tu hicistes la prueba por favor enviame el codigo.... por lo menos el que me pusistes arriba es un ADOQuery no un ADOTable

[Nelet]

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)= '+ '03';
ADOTable.Filtered:= True;

ese

Código Delphi [-]
+'03';

no me gusta nada.

Prueba así:

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)=3';
ADOTable.Filtered:= True;

El mes es de tipo numérico y tu le estás pasando un string.

[Sr.Scorpion]

Empezado por Nelet

Código Delphi [-]ADOTable.Filtered:= False; ADOTable.Filter:= 'Month(FCompra)= '+ '03'; ADOTable.Filtered:= True;

ese Código Delphi [-]+'03';

no me gusta nada.

Prueba así:

Código Delphi [-]ADOTable.Filtered:= False; ADOTable.Filter:= 'Month(FCompra)=3'; ADOTable.Filtered:= True;

El mes es de tipo numérico y tu le estás pasando un string.

Tampoco funciona... sigue dando el mismo mensaje... al parecer estamos dando vuelta en circulos y tirando piedras... creo que es muy dificil que funcione tu solucion segun lei en la ayuda en la propiedad Filter se pone el CAMPO y despues lo que le quieres asignar por lo que... si le pones Month(FCompra) el va a buscar en la DB un campo llamado asi, a lo mejor en el ADOQuery te funciono porque entiende la funcion Month pero no pasa igual en el ADOTable

Disculpenme si me equivoco... pero creo que es mejor q ustedes mismos hagan la prueban para q vean lo que les digo... rectifiquenme si me equivoco

Gracias

[Nelet]

Empezado por Sr.Escorpion

Disculpenme si me equivoco... pero creo que es mejor q ustedes mismos hagan la prueban para q vean lo que les digo... rectifiquenme si me equivoco

Discúlpame tu a mi. En SQL Server si funciona, pero en Access, no. Me hace falta una siesta.

De todas formas si sabes el año y el mes que estás buscando he probado algo en access que si funciona:

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'FCompra >= FECHA_INICIAL AND FCompra <= FECHA_FINAL';
ADOTable.Filtered:= True;

En access es lo único que se me ocurre que puedas hacer. Las fechas inicial y final deberás calcularlas dado un mes o un año.

Espero te sirva.

[Sr.Scorpion]

Empezado por Nelet

Discúlpame tu a mi. En SQL Server si funciona, pero en Access, no. Me hace falta una siesta.

De todas formas si sabes el año y el mes que estás buscando he probado algo en access que si funciona:
Código Delphi [-]ADOTable.Filtered:= False; ADOTable.Filter:= 'FCompra >= FECHA_INICIAL AND FCompra <= FECHA_FINAL'; ADOTable.Filtered:= True;


En access es lo único que se me ocurre que puedas hacer. Las fechas inicial y final deberás calcularlas dado un mes o un año.

Espero te sirva.

Eso es lo que tengo implementado.... pero resulta un poco engorroso hacer eso para cada mes... sin contar que si en febrero poner 01/02/2007 hasta 31/02/2007 da error porque febrero llega hasta 28... y asi pasa con los demas meses que tienen 30 y 31 dias..... en fin resulta bastante codigo para hacer tan pequeña cosa

[[Caral]]

Hola
Disculpen pero no se donde esta el problema de filtrar dos fechas.
Con dos componentes DateTimePicker:

Código Delphi [-]
 ADOTable1.Open;
 ADOTable1.Filter := 'FCompra >= '+DateToStr(DateTimePicker1.DateTime)+' AND FCompra <= '+DateToStr(DateTimePicker2.DateTime);
 ADOTable1.Filtered := True;

y ya.
Tambien se puede hacer con dos edit igual.
Saludos

[[Ivanzinho]]

Empezado por Sr.Scorpion

Eso es lo que tengo implementado.... pero resulta un poco engorroso hacer eso para cada mes... sin contar que si en febrero poner 01/02/2007 hasta 31/02/2007 da error porque febrero llega hasta 28... y asi pasa con los demas meses que tienen 30 y 31 dias..... en fin resulta bastante codigo para hacer tan pequeña cosa

Para evitarte eso puedes usar la función :

Código Delphi [-]
function EndOfAMonth ( const Year, Month : Word ) : TDateTime

Un saúdo

[luisgutierrezb]

Empezado por Sr.Scorpion

El error que me da dice... Argumentos incorrectos. Fuera del Intervalo permitido o en conflicto con otros...

A mi me da ese error por intentar filtrar una tabla que ya viene con "order by" desde la instruccion SQL, puedes usar la propiedad sort del adotable para ordernar el dataset y asi poder usar el filter