This filter property is used to load the appointments by ID of the patient.
object.PatientId
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISAppointmentFilter interface |
int
Display the number of the appointments filtered by the patient's ID.
Dim aPatient
Dim aFilter
Dim aAppointments
Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreateAppointmentFilter
aFilter.PatientId = aPatient.Id
aFilter.DateFrom = #01/01/2018#
aFilter.DateTo = #21/12/2019#
set aAppointments = Profile.LoadAppointments(aFilter)
Profile.MsgBox("The number of appointments is " & aAppointments.Count)
In Profile Client v8 on User Interface Patient ID cannot be found.