FoxPro/Visual FoxPro - Filtro por fechas

Hola como puedo hacer para filtrar de mi tabla los campos con la fecha seleccionada desde un calendario, un objeto olecontrol.

Yo kiero que al dar clic en el dia me muestre las ventas hechas por dia, es decir que me muestre los campos que cumplan con laigualdad del calendario.

Debo crear una consulta, vista o que ?

una opcion
select tu tabla
set filter to fecha = tufecha
go top

otra
select * from tu tabla where fecha = tufecha into cursor tucursor

brow

Puedes capturar el Olecontrol la fecha, este tiene las propiedades day, month y year.

yo tengo algo parecido realizado, un calendario a la izq, de la pantalla y a la derecha muestro los turnos dados para ese dia seleccionado, yo uso particularmente el filtrado de la tabla segun la fecha seleccionada.
debes tomar el dia,mes y año del calendario, armar la fecha y ahi filtras.
debes programar el interactivechange del calendario asi cuando el usuario cambia de fecha tu filtras de nuevo la tabla.
saludos y cualquier duda me comentas.

Amigo Carlos Diaz :

Si estas utilizando el Microsoft DATE and TIME Picker entonces aqui te muestro la forma de capturar la fecha y filtrar los registros...

1) Con el siguiente codigo vas a capturar la fecha seleccionada en el Control DTPicker

WITH Thisform.DTPicker
dFech_pres = DATE(.Year,.Month,.Day) && Almacena la Fecha Registrada
ENDWITH

WAIT WINDOW "Fecha del Prestamo :" + DTOC(dFech_pres) TIMEOUT .5

2) Para Buscar por el dia seleccionado en el DTPICKER

LOCAL ldFecha
ldFecha = thisform.OleControl1.Object.Value
SELECT * from DATOS where (fecha >= ldFecha) ...

Espero haber respondido de esta forma a tu pregunta.

saludos,

Gabriel
(Lima-Perú)

Muy bueno, Excelente tu respuesta, lo aplique en mi form y resulto muy bien, resolví un pequeño problema que tenia hace días y había pensado dejarlo así. Muchas gracias

Buenas tardes,

EStimados, preciso de vuestra ayuda; espero no les sea incomodo.....Describo a continuacióbn mi necesidad:

THISFORM.TxtFecha.value = CMI.CTFECEMI
c_fecfac = .TxtFecha.value && donde; c_fecfac es una variable de reporte y almacena la fecha en formato "date", osea: 10/11/2022

ojo; neceito convertirla en caracter y me de en formato: 11102022 (diamesaño(4))

que ebo hacer?

Supuesto:
ldFecha = DATE(2022,11,10)
1) Práctica
lcFecha = CHRTRAN(TRANSFORM(m.ldFecha),CHR(47),"")

2) Embrollada

lcFecha = TranFecha(m.ldFecha)

Estimado, disculpa

Ese procedure es aplicable en programación de Visual Foxpro v9.0?... disculpa si no soy experto en el lenguaje. pasa que estoy concatenando campos para tener la "Clave de Autorizacion" para mi factura electronica, o talvez tienen un codigo fuente "pero para visual Foxpro". Osa gradeceria muchisimo

Si, por supuesto. SEría parte de un archivo prg (como User Defined Function)
Pero, alternativamente, si estás trabajando con un formulario, puedes incluirlo como método del formulario, quitando el ENDPROC y lo llamas como Thisform.TRanFecha(ldFecha).