ISInstructionTemplatesFilter.MeasureConceptCodeCompareOperation

Description

This filter property defines comparison rule to load the instruction templates by the specified measure concept code.

Syntax

object.MeasureConceptCodeCompareOperation

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

Return Value

TSFilterCompareOperation

Example

Display the number of the instruction templates loaded on the basis of the selected filter and some information about them.

Dim aFilter 
Dim aInstructionTemplates
Dim aInstructionTemplate
Dim aMessage 
Dim i
    
Set aFilter = Profile.CreateInstructionTemplatesFilter
aFilter.MeasureConceptCode = "z..2T"   
aFilter.MeasureConceptCodeCompareOperation = 4 'sfcoContains      
set aInstructionTemplates = Profile.LoadInstructionTemplates(aFilter)

aMessage = "Instruction Templates Count = " & aInstructionTemplates.Count
for i = 0 to aInstructionTemplates.Count - 1
  set aInstructionTemplate = aInstructionTemplates.Item(i) 
  aMessage = aMessage & vbNewLine &_
    (i + 1) & ")  " & aInstructionTemplate.Title
  if not aInstructionTemplate.Disease is nothing then
    aMessage = aMessage & vbNewLine & " - Disease: " & aInstructionTemplate.Disease.Name
  end if       
next         
                                                 
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Measure Concept Code can be found in Maintain > Templates > Instructions > Open Instruction Template > Measure.

Version information

Added in v8.3.0