ISCareTeamFilter.RoleCode

Description

This filter property is used to load the care team members by the code of the care team role.

Syntax

object.RoleCode

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

Return Value

string

Example

Display the number of the care team members filtered by the code of the care team role.

Dim aPatient
Dim aCareTeamFilter
Dim aCareTeams
Dim aMessage

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

aCareTeamFilter.Patient = aPatient.Id
aCareTeamFilter.RoleCode = "1A"  

set aCareTeams = Profile.LoadCareTeams(aCareTeamFilter)

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

Note:

In Profile Client v8 on User Interface Care Team Role Code can be found in Maintain > Short Codes > Care Team Roles.

Version information

Added in v7.8.0