FoxPro/Visual FoxPro - mostrar resultado

Hola !!, tengo el siguiente codigo en el boton aceptar de un formulario, el problema es que no muestra el contenido de agenda.nota en el edit1 del formulario.
Les agradeceria muchisimo si pudieran ayudarme con este pronblema.

SELECT FECHA
SELECT agenda
SET ORDER to afecha
SEEK DTOC(_DIARYDATE)
IF FOUND()
REPLACE THISFORMSET.FORM2.EDIT1.VALUE WITH AGENDA.NOTA

ELSE
replace agenda.nota WITH thisformset.form2.edit1.value
replace agenda.fecha WITH _DIARYDATE
endif

THISFORMSET.FORM2.EDIT1.VALUE supongo que es un control Edit, así que no puedes tratarlo como si fuera un campo y querer cambiar su valor con un Replace.

Es suficiente con:

THISFORMSET.FORM2.EDIT1.VALUE= agenda.nota

En el caso contrario, querer grabar el valor del mencionado EDIT en el campo NOTA de la tabla AGENDA sí debes usar REPLACE.

Por cierto, si esa búsqueda la estás haciendo por un campo DATE o DATETIME la clave de índice debería ser:

DTOS()
que convierte a un formato añomesdia, que es lo correcto para ordenamiento.

o DTOC( fecha, 1)
ya que el parametro 1 hace lo mismo que el DTOS.

Hola !!, la busquesda la estoy haciedo con _diarydate de un Control Calendar 10
Estoy en lo correcto ?