<<SET FILTER TO " " + ALLTRIM(ThisForm.file.Value) + " " $ upper(fm); << OR " " + ALLTRIM(ThisForm.file.Value) + " " $ upper(sm)>Boris which words have problem, with your codes nothing found, which word have not problem alos found.
m.transchar = [,.:'"/\`~%#@$^&*()-+=",]+"[]" SET FILTER TO " " + ALLTRIM(ThisForm.file.Value) + " " $ UPPER(STRTRAN(fm,m.transchar,[])); OR " " + ALLTRIM(ThisForm.file.Value) + " " $ upper(STRTRAN(sm,m.transchar,[]))