Ok kakaroto,
dia= substr(dtoc(date()), 1, 2)
mes= retorna_espanol( month(date()) )
Uso esta función porque si uso el cdow(date()) me debería
retornar en español el nombre del día pero cuando inserto el form
en un proyecto me lo regresa en inglés,, abajo indico la función
function retorna_espanol
lparameters valor
do case
case valor= 1
return ("Enero")
case valor= 2
return ("Febrero")
case valor= 3
return ("Marzo")
case valor= 4
return ("Abril")
case valor= 5
return ("Mayo")
case valor= 6
return ("Junio")
case valor= 7
return ("Julio")
case valor= 8
return ("Agosto")
case valor= 9
return ("Septiembre")
case valor= 10
return ("Octubre")
case valor= 11
return ("Noviembre")
case valor= 12
return ("Diciembre")
endcase
endfunc
anno= alltrim(str(date()))
resultado= dia + " de "+ mes +" del " +anno
Espero haberte ayudado
TAIKOS