Información de un grid

Hola expertos.
Tengo una caja de texto en la cual ingreso un código existente en una base de datos, la información correspondiente al código me la muestra en un grid, donde esa información la puedo modificar o ingresar un dato nuevo y hago una validación donde me aseguro que la información que modifico o creo sea correcta. Hasta aquí me funciona perfecta mente.
La cuestión es que cuando vuelvo a la caja de texto e ingreso un código nuevo bien el me lo muestra de nuevo en el grid pero las validaciones que había establecido para asegurarme de que los datos sean correctos no me funciona. Este es el código que utilizo:
cod=alltrim(thisform.grdinfo.column1.text1.value)
vstr= " select codigo,descripcio,unidadmed from mtmercia where codigo=?cod "
if sqlexec(conexdb2,vstr,"mercia") <=0
wait windows "error consultando codigo!!!"
else
if eof()
wait windows "codigo no existe!!!"
return 0
else
if empty(thisform.grdinfo.column3.text1.value)
thisform.refresh()
thisform.grdinfo.column5.text1.value=mercia.descripcio
endif
if empty(thisform.grdinfo.column4.text1.value)
thisform.refresh()
thisform.grdinfo.column2.text1.value=mercia.unidadmed
*thisform.grdinfo.column4.text1.refresh()
Endif
Endif
Endif
No se que estoy haciendo o no se que me falta..
Si me pueden ayudar mil gracias de antemano