Nadya:

Found the problem. I remove all the editbox from the grid and left only the textbox. and commented the section that switch controls in the grid. My application did not required that type of functionality. Here is the code comented and the grid was left only with textbox control for display.

Do CASE
>	Case type("&l_fldname") = "N"
>		lcsub = ALLTRIM(STR(&l_fldname))
>		l_fldlen = l_fldlen + LEN(lcsub)
>	*	ThisForm.grdsearch.columns(l_numfld).removeobject('_editbox1')
>	Case type("&l_fldname") = "L"
>		lcsub = IIF(&l_fldname,"T","F")
>		l_fldlen = l_fldlen + 1
>	*	ThisForm.grdsearch.columns(l_numfld).removeobject('_editbox1')
>	Case type("&l_fldname") = "C" or type("&l_fldname") = "M"
>		l_fldlen = l_fldlen + LEN(&l_fldname)
>	*	ThisForm.grdsearch.columns(l_numfld).currentcontrol='_editbox1'
>	case type("&l_fldname") = "U"
>		dimension Error_Arry(1)
>		Error_Arry(1) = l_fldname
>		clear typeahead
>		MainMenu.UANMessageBox("SM-22", @Error_Arry)
>		return .f.
>	case type("&l_fldname") = "D"
>		*ThisForm.grdsearch.columns(l_numfld).removeobject('_editbox1')
>	Endcase

I will be on vacation on wednesday so catch you later.