ISAppointmentFilter.GroupId

Description

This filter property is used to load the appointments by ID of the main appointment for the group of patients.

Syntax

object.GroupId

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

Return Value

int

Example

Display the number of the appointments filtered by ID of the main appointment for the group of patients.

Dim aPatient
Dim aProvider
Dim aFilter 
Dim aAppointments
Dim aFirstAppointment
Dim aGroupId

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)
  aGroupId = aFirstAppointment.GroupId
else
  aGroupId = 0  
end if

aFilter.GroupId = aGroupId
set aFilteredByGroupApps = Profile.LoadAppointments(aFilter)
MsgBox("The number of the appointments is" & aFilteredByGroupApps.Count)

Note:

In Profile Client v8 on User Interface Group ID cannot be found.

Version information

Added in v7.8.0