Status is a mask for filtering appointments. The appointment will be selected if at least one of its statuses complies with the filter mask. If the mask is empty, it is not taken into account when filtering. The mask is formed by summing up the elements TSAppointment.Status.
object.Status
| Part | Attribute | Type | Description |
|---|---|---|---|
object |
Required | The object always implements the
ISAppointmentFilter interface |
int
Display the appointments filtered by the statuses "Booked" and "Did not attend".
Dim aProvider
Dim aFilter
Dim aAppointments
Dim aFirstAppointment
Dim aStatus
Set aPos = Profile.LoadProvider("LONSDALE")
set aPatient = Profile.SelectPatient
set aProvider = Profile.LoadProvider("PROV")
set aFilter = Profile.CreateAppointmentFilter
aFilter.ProviderID = aProvider.Id
aFilter.PatientId = aPatient.Id
aFilter.DateFrom = #13/12/2018#
aFilter.DateTo = #29/12/2018#
aFilter.Status = 514 ' sasDidNotAttend + sasBooked
set aAppointments = Profile.LoadAppointments(aFilter)
Profile.MsgBox("The number of the appointments is " & aAppointments.Count) In Profile Client v8 on User Interface Appointment Status can be found in .