VISTA & GRID

Hola : Hace poco que estoy con el tema de VISTAS y tengo el siguiente
problema:
Creo una vista local 'tmpvinpdi' (buffering = 3 )
y la reflejo en un Grid.
En el "afterRowColChange" de un GRID coloco las siguientes líneas
LOCAL cDato
cDato = RTRIM(GETFLDSTATE(-1,'tmpvinpdi'))
nLargo = LEN(cDato)
nUnos = OCCURS('1',cDato)
IF nLargo <> nUnos
BEGIN TRANSACTION
IF TABLEUPDATE(.T.,.T.,'tmpvinpdi')
END TRANSACTION
ELSE
MESSAGEBOX("Error no pude actualizar.")
ROLLBACK
ENDIF
ENDIF
El problema es queno me actualiza la tabla original. Se que algo hago mal
pero nose que?.
Agradezco desde ya la ayuda.

Oscar Cáceres