>

>SELECT c_letter_series_masters
>DO CASE
>   CASE myLookup("cDepartment_code=lcDepartment_code AND cClient_code=lcClient_hospital_id")
>      lcLetter_series_masters_pk = c_letter_series_masters.cLetter_series_masters_pk
>      llFound = .T.
>   CASE myLookup("cDepartment_code = lcDepartment_code")
>      lcLetter_series_masters_pk = c_letter_series_masters.cLetter_series_masters_pk
>      llFound = .T.
>   CASE myLookup("cClient_code = lcClient_hospital_id")
>      lcLetter_series_masters_pk = cLetter_series_masters_pk
>      llFound = .T.
>   OTHERWISE
>      =MESSAGEBOX("Nothing found")
>      llFound = .F.
>ENDCASE
>
>
>FUNCTION myLookup
>LPARAMETERS tcLookup
>LOCATE FOR EVAL(tcLookup)
>RETURN FOUND()
>

>

LOL. I should have said without using functions. Also would you agree that this change would slow the code execution considerably if you're running this code in a loop? <g>