ISPatientEligibility.PatientId

Description

ID of the patient eligible for services.

Syntax

object.PatientId

Part	Attribute	Type	Description
`object`	Required	ISPatientEligibility	The `object` always implements the ISPatientEligibility interface

Restriction: This property is readonly.

Return Value

int

Example

Display ID of the patient eligible for services.

Dim aPatient  
Dim aPatEligibility
Dim aPatientId

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
  aPatientId = aPatEligibility.PatientId
  Profile.MsgBox (aPatientId)
end if

Note: Only for Canada and Australia.

In Profile Client v8 on User Interface Patient Id cannot be found.

Version information

Added in v8.1.0