hi all,
i try to locate, if found or not via this code,

this part it works

mac1=thisform.grid1.column1.text1.value AND typ=upper(ALLTRIM(thisform.grid1.column2.text1.Value)) &&this code works

this part not

AND dat=UPPER(ALLTRIM(thisform.text5.value))
AND peri=UPPER(alltrim(thisform.combo2.value)) && this code not works

all code as under

select table1
LOCATE FOR mac1=thisform.grid1.column1.text1.value AND typ=upper(ALLTRIM(thisform.grid1.column2.text1.Value)) AND peri=UPPER(alltrim(thisform.combo2.value)) and dat=UPPER(ALLTRIM(thisform.text5.value))

IF FOUND()
  =MESSAGEBOX("found")
else
....

ENDIF

thanks.