ISPatient.MeasureConcepts

Description

Concepts of measure used to record the patient's clinical information.

Syntax

object.MeasureConcepts

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

Restriction: This property is readonly.

Return Value

ISCollection

Example

Display names of all measure concepts used in the patient's medical record.

Dim aPatient  
Dim aMeasureConcepts
Dim aMeasureConcept
Dim aMessage

Set aPatient = Profile.SelectPatient 
set aMeasureConcepts = aPatient.MeasureConcepts
aMessage = "Measure Concepts Count = " & aMeasureConcepts.Count

for i = 0 to aMeasureConcepts.Count - 1
  set aMeasureConcept = aPatient.MeasureConcepts.Item(i)
  aMessage = aMessage & vbNewLine
  aMessage = aMessage & aMeasureConcept.Name
next  

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Measures can be found in Clinical > Medical Record > Measures.

Version information

Added in v7.8.0