ISCareTeamFilter.OnlyActive

Description

This filter is used to load only active care team members.

Syntax

object.OnlyActive

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

Return Value

bool

Example

Display the number of the active care team members (filtered by the specified filtering criterion).

Dim aPatient
Dim aCareTeamFilter
Dim aCareTeams
Dim aMessage

Set aPatient = Profile.SelectPatient
set aCareTeamFilter = Profile.CreateCareTeamFilter

aCareTeamFilter.Patient = aPatient.Id
aCareTeamFilter.OnlyActive = true

set aCareTeams = Profile.LoadCareTeams(aCareTeamFilter)

aMessage = "The number of the patient's care team members loaded " &_
  "by the filtering condition (Only Active = " &_
  aCareTeamFilter.OnlyActive & ") is " & aCareTeams.Count
 
Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Only Active cannot be found.

Version information

Added in v7.8.0