ISPatientMeasureFilter.Concept

Description

This filter property is used to load the collection of the patient measures by the specified linked concept.

Syntax

object.Concept

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

Return Value

ISConcept

Example

Display the number of the patient measures loaded on the basis of the selected filter and some information about them.

Dim aPatient  
Dim aPatientMeasureFilter, aPhysQuantity
Dim aConcept
Dim aMeasures, aMeasure
Dim i
Dim aMessage 

set aPatient = Profile.SelectPatient 
set aPatientMeasureFilter = Profile.CreatePatientMeasureFilter
set aConcept = Profile.Concept("IH", "z..2T")
aPatientMeasureFilter.Concept = aConcept           
set aMeasures = aPatient.GetMeasuresByFilter(aPatientMeasureFilter, aPhysQuantity)

aMessage = "Measures Count = " & aMeasures.Count & vbNewLine &_
  "Measure" & vbTab & vbTab & vbTab & "GUID"
for i = 0 to aMeasures.Count - 1 
  set aMeasure = aMeasures.Item(i) 'ISHRI
  aMessage = aMessage & vbNewLine & (i + 1) & ") " & aMeasure.AsString & vbTab & vbTab &_
    aMeasure.GUID
next 

Profile.MsgBox(aMessage)  
Note: In Profile Client v8 on User Interface Concepts can be found in Maintain > Termset Maintenance > Details of Concept > Name or in Special > Terms > Details of Concept > Name.

Version information

Added in v7.8.0