FoxPro/Visual FoxPro - guardar un campo ultimo en una variable

Tengo solo un registro en mi bd y la idea es que la clave se valla incrementando tomando como referencia la ultima clave introducida
Tengo el siguiente codigo
OPEN DATABASE &TABLAS\BASE_BITACORA SHARED &&ABRE LA BD DE FORMA COMPARTIDA
USE datos_rama SHARED
*GO BOTTOM
GO 1
wid=id_clave
wincremento=VAL(LEFT(wid,1))+1

evento interactiveChange(THISFORM.cmdestacion.VALUE)
THISFORM.txtid.VALUE = ALLTRIM(STR(wincremento)-(THISFORM.cmdestacion.VALUE))

El detalle es que marca error, porque no me aguarda ninguno valor en la variable wid
Les agradezco cualquier consejo que puedan darme. Envió saludos cordiales.

Nota debe de quedar asi
Si mi campo es id=1ARA la idea es que lo separe para que lo incremente en uno y a la hora de guardar guarde 2MER (de acuerdo a la estación seleccionada)

Algunos puntos: No sera que la variable wincremento no es publica?Lo que miro raro es esta linea:

THISFORM.txtid.VALUE = ALLTRIM(STR(wincremento)-(THISFORM.cmdestacion.VALUE))

no deberia ser :

THISFORM.txtid.VALUE = ALLTRIM(STR(wincremento) +(THISFORM.cmdestacion.VALUE))

con el signo "+"

Ademas al evento no se le pueden pasar parametros. Por lo tanto debes usar una variable publica o una propiedad.