Returns True if there are some restrictions on the patient's eligibility for services.
object.HasRestrictions
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatientEligibility interface |
bool
Display HasRestrictions for the patient.
Dim aPatient
Dim aPatEligibility
Dim aHasRestrictions
Set aPatient = Profile.SelectPatient
set aPatEligibility = Profile.GetLastPatientEligibility(aPatient.ID)
if aPatEligibility is nothing then
Profile.MsgBox ("There is no eligibility for this patient!")
else
aHasRestrictions = aPatEligibility.HasRestrictions
Profile.MsgBox (aHasRestrictions)
end if
In Profile Client v8 on User Interface the information about the eligibility restrictions can be found in
.