>>LPARAMETERS nColIndex >> >>DO prg1&& include use table1 IN 0,use divi IN 0,use temp IN 0 >>******************* >>lcType = ALLTRIM(UPPER(THISFORM.GRID2.column1.text1.VALUE))&& unknown member column1 >>*lcType = mac1.nam &&alias 'mac1' is not found >>USE temp IN 0 >>LOCATE FOR TYP = lcType >>IF !FOUND() >> APPEN BLANK >> REPLACE TYP WITH lcType in TEMP >> GO top >> thisform.grid1.refresh >>ELSE >> =MESSAGEBOX("found.....") >>endif >>>>
SELECT temp
in order to be processing in the correct work area