Thanks Sergey. Your suggestion worked. could you tell me why my code did not work properly? I would like to understand why it did not work. Thanks.


>Hi Henry,
>I use SEEK function because it simplifies code. Try
>

                IF NOT seek(alltrim(mpatlastname), ALIAS(),  "last_name")
>			do form pat_add    &&do form notfindapppatient
>			thisform.release()
>		ENDIF
>

>>>Correct your SEEK to use existing index tag.
>>>
>>Hi Sergey:
>>
>>Thank you for your response. I am lost here now.
>>
>>The users types in a few characters of the name or telephone number they want to locate and then the user clicks the select button. The the Find form shows up - it has a grid with the following code in the GotFocus event of the Find form.
>>
>>

thisform.refresh
>>do case
>>	case .not. isblank(mpatlastname)
>>		seek alltrim(mpatlastname) order tag last_name of patient.cdx
>>		if not found() and eof()
>>			do form pat_add    &&do form notfindapppatient
>>			thisform.release()
>>		endif
>>	case mservpatphone <> 0
>>		seek (mservpatphone) order tag phone of patient.cdx
>>		if not found() and eof()
>>			do form pat_add    &&do form notfindapppatient
>>			thisform.release()
>>		endif
>>	case mhlth_card <> 0
>>		seek (mhlth_card) order tag health_num of patient.cdx
>>		if not found() and eof()
>>			do form pat_add    &&do form notfindapppatient
>>			thisform.release()
>>		endif
>>ENDCASE

>>
>>Once found the user, clicks on the name and clicks Return on the Find form which then goes back to the calling form and populates the fields in the original form with data from the name searched for.
>>
>>Thanks again for your suggestions.