FoxPro/Visual FoxPro - Fecha

Komo convierto una exprecion de tipo caracter: "150107" a formato de fecha.
prove con:

fecha= "150107"
fIngre=cTOd(fecha)
thisform.txtfecha.value=fIngre
thisform.refresh
pero no me sale, solo me muestra / /
Tengo en el load
set century off
SET DATE BRITISH
gracias por leer mi mensaje

xfecha=substr(fecha,1,2)+'/'+substr(fecha,3,2)+'/'+substr(fecha,5,2)
? xfecha

pon el SET CENTURY ON

y fecha="15/01/2007"


sUERTE