This filter property is used to load the appointments that take place at regular intervals.
object.IncludeRecurrent
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISAppointmentFilter interface |
int
Display the number of the appointments filtered by the frequency of occurrence.
Dim aProvider
Dim aFilter
Dim aAppointments
Dim aFirstAppointment
Dim aIncludeRecurrent
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.IncludeRecurrent = 1
set aAppointments = Profile.LoadAppointments(aFilter)
Profile.MsgBox("The number of the recurring appointments is " & aAppointments.Count)
In Profile Client v8 on User Interface Include Recurrent cannot be found.