AYUDA CON FILTROS

[alvduqant]

Muy buenas, estoy intentando hacer una cosa y no se si es viable. A ver, yo tengo una base de datos DBF y me gustaría hacer un scopes por fechas y una vez hecho ese escope me gustaría que me ordenase los datos que me ha filtrado por otro campo de la BBDD, por ejemplo, quiero que me saque los registros desde la fecha "X" a la fecha "Y" y que dentro de ese rango me lo ordene por otro campo que tengo en la BBDD que se llama año, en orden ascendente.

¿Esto se puede hacer?, si es así, ¿me podrían echar una mano?.

Gracias de antemano.

[Carles]

A,

Crea un tag por fecha y años y listos.

[alvduqant]

El problema es que un campo es tipo fecha y el otro es tipo carácter, si lo paso todo a fecha no me filtra y si lo paso todo a carácter tampoco. ¿Alguna solución?. Gracias

[Carles]

A,

Prueba indexar con dtos( campofecha ) + campocaracter

[alvduqant]

Que va, no funciona. Desde luego, como algo tan sencillo se puede complicar tanto. Es filtrar por un campo y ordenar por otro.

Muchas gracias, si se te ocurre algo más te lo agradecería, pero estoy estancado. Estoy probando coger el alias que se me crea, ya filtrado por fechas, copiarlos a una tabla y en esa nueva tabla hacer la ordenación, pero no se hacerlo muy bien, por lo que estoy estancado.

Muchas gracias, de nuevo.

[carlos vargas]

Code: Select all  Expand view

...
INDEX ON dtos( fld_date ) + fld_char TAG datechar
...
dFechaIni := date()
dFechaFin := date() - 90
...
ALIAS->( ordsetfocus( "DATECHAR" ) )
ALIAS->( SetScope( dtos( dFechaIni), dtos( dFechaFin )  ) )
...
Browse()
...
ALIAS->( ClearScope() )
...
 

Code: Select all  Expand view

/*-------------------------------------------------------------------------------------------------*/
/*procedimientos para filtros rapidos en tablas*/
PROCEDURE ClearScope()

   /*elimina scope definidos*/
   OrdScope( TOPSCOPE    , NIL )
   OrdScope( BOTTOMSCOPE , NIL )

   /*salta al primer registro*/
   DBGoTop()

RETURN

/*-------------------------------------------------------------------------------------------------*/
/*procedimientos para filtros rapidos en tablas*/
PROCEDURE SetScope(xValorIni,xValorFin)
   DEFAULT xValorFin := xValorIni

   /*establece el scope*/
   OrdScope( TOPSCOPE,    xValorIni )
   OrdScope( BOTTOMSCOPE, xValorFin )

   /*salta al primer registro, activando el scope*/
   DBGoTop()

RETURN

/*-------------------------------------------------------------------------------------------------*/