mac1=thisform.grid1.column1.text1.value AND typ=upper(ALLTRIM(thisform.grid1.column2.text1.Value)) &&this code worksthis part not
AND dat=UPPER(ALLTRIM(thisform.text5.value)) AND peri=UPPER(alltrim(thisform.combo2.value)) && this code not worksall 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 .... ENDIFthanks.