ISAppointment.SessionName

Description

The name of the appointment template.

Syntax

object.SessionName

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

Restriction: This property is readonly.

Return Value

string

Example

Display the name of the appointment template.

Dim aPatient
Dim aProvider
Dim aFilter 
Dim aAppointments
Dim aFirstAppointment
Dim aSessionName

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#
aFilter.DateTo = #01/01/2019#

set aAppointments = Profile.LoadAppointments(aFilter)

if aAppointments.Count > 0 then
  set aFirstAppointment = aAppointments.Item(0)
  aSessionName = aFirstAppointment.SessionName
  Profile.MsgBox(aSessionName)
else
  Profile.MsgBox("aAppointments.Count = 0")
end if

Note: Appointment templates are not applied automatically to individual days. Instead, you do this by dragging and dropping the templates onto the Calendar.

In Profile Client v8 on User Interface Session Name can be found in Special > Calendar > Appointment Templates.

Version information

Added in v7.8.0