Clipper/FiveWin - variable fecha en fw ??

espero que me ayuden con un problema de variable fecha.
no entiendo porque no continua con la fecha en otra funcion.
esta sencillamente se pierde.
yo utilizo la funcion msgdate() para visualizar el calendrario
lo tengo de la misma forma en un get odbf:fecha1 con base de datos y funciona.
pero con get fecha1 con variable fecha1:=date() no funciona.alguien me puede
aclarar por que no sucede. por favor.saludos.

yo quiero que actualize mostrandolo en pantalla el primer redefine
de la fecha cadavez que selecione una fecha desde el calendario.
les repito con un get odbf:fecha1 funciona.

lo tengo asi:

local fecha1()
local fecha2()

REDEFINE GET fecha1 PICTURE "@D" ID 30 OF oDlg update
REDEFINE BTNBMP ID 29 RESOURCE "calendario" OF oDlg ACTION(fechas(fecha1),;
oDlg:Update() ) ;
TOOLTIP "Calendario" NOBORDER

static function fechas(fecha1)
local fecha:=date()
FECHA:=MSGDATE((fecha),"Seleccione una Fecha")
fecha1:=fecha
msginfo(fecha1) ------>> aca fecha1 es nada. ni traspasa la fecha que selecciono
return fecha1

Amigo que version de fw tienes?

Saludos

LEANDRO ALFONSO