ISAppointmentFilter.DateTo

Description

This filter property is used to load the appointments till the specified date and time.

Syntax

object.DateTo

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

Return Value

DateTime

Example

Display the number of the appointments filtered till the specified date and time.

Dim aProvider
Dim aFilter 
Dim aAppointments
Dim aFirstAppointment

Set aPatient = Profile.SelectPatient
set aProvider = Profile.LoadProvider("PROV")
set aFilter = Profile.CreateAppointmentFilter

  
aFilter.ProviderID = aProvider.Id
aFilter.PatientId = aPatient.Id
aFilter.DateFrom = #01/01/2018 11:00:00#
aFilter.DateTo = #01/01/2019 12:00:00#

 
set aAppointments = Profile.LoadAppointments(aFilter)

Profile.MsgBox("The number of the appointments from " &_ 
  aFilter.DateFrom & " to " & aFilter.DateTo & " is " &_ 
  aAppointments.Count)

Note:

In Profile Client v8 on User Interface Date To cannot be found.

Version information

Added in v7.8.0