Dear John,
The procedure am calling is included in valid event of grid textbox
pls see the code of the valid event, I dont how to attach my form in UT, if you know pls tell me , I will attach it

SELECT param2
SET DELETED ON
IF EMPTY(userid)
mrec=RECNO()
COUNT TO t for EMPTY(userid)
GO mrec
SET DELETED ON
IF t>1
DELETE
GO top
ELSE
replace gpsver WITH 'a'
endif
thisform.Refresh
endif
THISFORM.grid1.recordsource = ""
THISFORM.grid1.recordsource = "param2"
thisform.Refresh