FoxPro/Visual FoxPro - no muestra los datos que envio a mi objeto

Hola tengo el siguiente código, toma de una tabla un registro y lo muestra ya sea en un text o en un combo de mi formulario, pero el problema es cuando el campo se compone de mas valores y lo debo separar para ello utilizo las funciones LEFT y RIGHT y guardo el resultado en una variable la cual asigno al final al text que necesito, pero el problema es que no me muestra los datos del campo, al depurar el campo puedo ver que efectivamente mi variable tiene el valor del campo separado pero por alguna razón no lo muestra en el objeto...ojala puedan darle una revisa al código y si encuentran algo raro, agradeceré sus comentarios.

LOCAL var_dia,var_mes,var_año,var_m,vact_1,va_2,vact_2,vact_3,var_a,wsist,csist,wsist_1,wsist_2,wact
STORE "" TO var_dia,var_mes,var_año,var_m,vact_1,va_2,vact_2,vact_3,var_a,wsist,csist,wsist_1,wsist_2,wact
WITH THISFORM
SELECT datos_telemetria
GO TOP
*ASIGNO LOS CAMPOS DE MI TABLA A LOS COMBOS Y TEXT DE MI FORM
.txtid_teleme.VALUE = id_teleme
.txtfechaactivida.VALUE= fechaactividad
.cmdestado1.VALUE=estado &&NO MUESTRA DATOS
.cmdsistemaoequipo.VALUE= sistemaoequipo
.cmdestacion.VALUE = estacion
.txtobservaciones.VALUE= observaciones
.cmdotra_actividad.VALUE= otra_actividad
.cmdfallasmayores.VALUE= fallasmayores
***********************campos que han sido concatenados****************
*--fechareporte--*
var_dia= ALLTRIM(LEFT((fechareporte),2))
var_m=ALLTRIM(LEFT((fechareporte),5))
var_mes=ALLTRIM(RIGHT((var_m),2))
var_a=ALLTRIM(LEFT((fechareporte),8))
var_año=ALLTRIM(RIGHT((var_a),2))
.txtfecha_reporte_d.VALUE= var_dia
.txtfecha_reporte_m.VALUE= var_mes
.txtfecha_reporte_a.VALUE= var_año
*--sist--*
wsist=ALLTRIM(sist)
csist= LEN(wsist)
IF csist=3
wsist_1=LEFT((wsist),1)
wsist_2=RIGHT((wsist),1)
.cmdsist1.VALUE= (wsist_1) &&NO MUESTRA DATOS
.cmdsist2.VALUE= (wsist_2) &&NO MUESTRA DATOS
ENDIF
IF LEN(wsist)=1
.cmdsist1.VALUE= wsist
ENDIF
*--ACTIVIDAD--*
wact=ALLTRIM(actividad)
vact_1= LEFT((wact),1)
va_2=LEFT((wact),3)
vact_2=RIGHT((va_2),1)
vact_3=RIGHT((wact),1)
IF wact<>""
IF LEN(wact)=1
.cmdactividad1.VALUE= wact
ELSE
IF LEN(wact)=3
.cmdactividad1.VALUE= vact_1
.cmdactividad2.VALUE= vact_2
ELSE
IF LEN(wact)=5
.cmdactividad1.VALUE= vact_1 &&NO MUESTRA DATOS
.cmdactividad2.VALUE= vact_2 &&NO MUESTRA DATOS
.cmdactividad3.VALUE= vact_3 &&NO MUESTRA DATOS
ENDIF
ENDIF
ENDIF
ENDIF
wact=ALLTRIM(activ)
ENDWITH

saludos cordiales.

Ya lo resolví gracias...