> if LEN(ALLTRIM(thisform.text3.value)) >= 3 > SELECT depno,depname,mobile,tel,empname,empno from emp1; > where atc(trim(thisform.text3.value) ,empname)>0 ; > ORDER by empno; > into cursor crsMyCursor >>>Not sure if I got your description right - do you want something like this?:
>>* Procedure text3.InterActiveChange() >>Local lcEmpName >>lcEmpName = LOWER(Trim(NVL(thisform.text3.value,''))) >>If Len(m.lcEmpName) >= 3 >> SELECT * FROM emp1 WHERE LOWER(empname) Like '%&lcEmpName%' Into ... >>Endif >>>>
>>>SELECT depno,depname,mobile,tel,empname,empno from emp1;
>>> where atc(trim(thisform.text3.value) ,empname)>0 ;
>>> ORDER by empno;
>>> into cursor crsMyCursor
>>>
>>>
>>>thanks