ISCareTeamFilter.Principal

Description

This filter property is used to load the care team members by the specified 'Principal' value.

Syntax

object.Principal

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

Return Value

TSBooleanParamValue

Example

Display the number of the care team members filtered by the specified 'Principal' value.

Dim aPatient
Dim aCareTeamFilter
Dim aCareTeams
Dim aMessage

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

aCareTeamFilter.Patient = aPatient.Id
aCareTeamFilter.Principal = 0 'pvFalse 

set aCareTeams = Profile.LoadCareTeams(aCareTeamFilter)

aMessage = "The number of the patient's care team members loaded " &_
  "by the filtering condition (Principal Team Member = " &_
  aCareTeamFilter.Principal & ") is " & aCareTeams.Count
 
Profile.MsgBox (aMessage)  
Note:

In Profile Client v8 on User Interface Principal can be found in Clinical > Care Team > Edit Care Team > General or Clinical > Medical Record > Care Team > Edit Care Team > General.

Version information

Added in v7.8.0