Interesante esa solucion Roman,
pero he decidido hacer caso omiso a ese requerimiento,
para no complicar las cosas con esa BD he preferido
mostar los datos desde los ultimos 30 dias,
implementando este metodo:
y muerta la culebra por la cabeza
muchas gracias por la ayuda
Código Delphi
[-]
PFechaInicio.Date:= Date - 30;