ISProfilePatientGroupFilter.PatientGroupNameCompareOperation

Description

This filter property is used to load the patient groups which names contain the specified character string or are equal to it.

Syntax

object.PatientGroupNameCompareOperation

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

Return Value

TSFilterCompareOperation

Example

Display the number of the patient groups loaded on the basis of the selected filter and display their names.

Dim aFilter
Dim aPatientGroups
Dim aPatientGroup
Dim aMessage

Set aFilter = Profile.CreateProfilePatientGroupFilter
aFilter.PatientGroupName = "group"
aFilter.PatientGroupNameCompareOperation = 4 'sfcoContains
set aPatientGroups = Profile.LoadProfilePatientGroupsByFilter(aFilter)

aMessage = "Patient Groups Count: "  & aPatientGroups.Count
for i = 0 to aPatientGroups.Count - 1 
  set aPatientGroup = aPatientGroups.Item(i)
  aMessage = aMessage & vbNewLine & aPatientGroup.Name
next 

Profile.MsgBox(aMessage)  
Note:

In Profile Client v8 on User Interface Patient Groups can be found in Organisation > Work Centre > Clinical > Groups > Name.

Version information

Added in v7.9.1