I'd rather skip the evals altogether... using a scatter name object and GetPem(). See how it'd look

>If some reason this is less desireble I'd go for:
>
>

>lFound=.F.
>Select (cMembdepalias)
>SCAN WHILE lFound = .f.
	scatter name loRec memo
	with loRec
>	DO CASE
>		CASE Not Empty(cDepssn) And Not .ssn==cDepssn)
>
>		CASE Not (Alltrim.lastname)==cExtdeplastname)
>
>		CASE Not (Alltrim(.firstname))==Alltrim(GetPem(oExtmember,'dep'+cLoop+'fname')))
>		CASE Not .deptype ==cDeptype)
>		
>                CASE Not  .gender ==Getpem(oExtmember,'dep'+cLoop+'sex'))
>
>		CASE  .dob <>getpem(oExtmember, 'dep'+cLoop+'birth')
>
>                CASE .termdate <>getpem(oExtmember, 'dep'+cLoop+'termdt')
... etc etc
	endwith
endscan
... etc etc
>