ISAppointment.BookedTime

Description

Booked date and time of the appointment.

Syntax

object.BookedTime

Part Attribute Type Description
object Required
The object always implements the ISAppointment interface
Restriction: This property is readonly.

Return Value

DateTime

Example

Display the booked date and time of the appointment.

Dim aPatient
Dim aProvider
Dim aFilter 
Dim aAppointments
Dim aFirstAppointment
Dim aBookedTime

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

aFilter.ProviderID = aProvider.Id
aFilter.PatientId = aPatient.Id
aFilter.DateFrom = #01/01/2018#
aFilter.DateTo = #01/01/2019#

set aAppointments = Profile.LoadAppointments(aFilter)

if aAppointments.Count > 0 then
  set aFirstAppointment = aAppointments.Item(0)
  aBookedTime = aFirstAppointment.BookedTime
  Profile.MsgBox(aBookedTime)
else
  Profile.MsgBox("aAppointments.Count = 0")
end if  
Note:

In Profile Client v8 on User Interface Booked Time can be found in Appointment Window > Start Time fields.

Version information

Added in v7.8.0