>>>I get an error on this. What am I doing wrong?
>>>
>>>

>>>m.Success = .T.

>>>
>>>DO EligibilityValidation WITH ;
>>>	'NEW', ;
>>>	THISFORM.txtPat_No.Value, ;
>>>	DATE(), ;
>>>	@Success
>>>

>>
>>When you call a procedure you always pass parameters by reference, so:
>>DO EligibilityValidation WITH 'NEW', THISFORM.txtPat_No.Value, DATE(), Success
>>
>>
>>BTW what is Success?
>>I didn't see any declaration in your code, maybe it is declared in some part which I didn't see :-)
>
>do you see it now???? :-)
>He's provided as good an answer as any, as far as I'm concerned

Yep,
I saw it now.
Thank you :-)