ISAppointments.Count

Description

The number of the appointments within the collection.

Syntax

object.Count

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

Return Value

int

Example

Display the number of the appointments within the collection.

Dim aPatient
Dim aProvider
Dim aFilter 
Dim aAppointments
Dim aMessage

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

aFilter.ProviderID = aProvider.Id
aFilter.PatientId = aPatient.Id

set aAppointments = Profile.LoadAppointments(aFilter)
aMessage = "Appointments Count = " & aAppointments.Count 

Profile.MsgBox(aMessage)  
Note:

In Profile Client v8 on User Interface Appointments can be found in Appointment Window > Booking.

Version information

Added in v7.8.0