ISProfile.GetEmbeddedObservationConcepts

Description

This function returns the embedded observation concepts.

Syntax

object.GetEmbeddedObservationConcepts()

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

Return Value

ISCollection

Returns the embedded observation concepts.

Example

Display the embedded observation concepts, their names and IDs.

Dim aConcepts
Dim aMessage
Dim i

Set aConcepts = Profile.GetEmbeddedObservationConcepts
for i = 0 to aConcepts.Count - 1
  set aConcept = aConcepts.Item(i)
  aMessage = aMessage & aConcept.Id & " " & aConcept.Name & vbNewLine 
next
Profile.MsgBox(aMessage)
Note:

In Profile Client v8 on User Interface Form which HRC is taken from can be found in Maintain > Templates > Health Record Collection Templates. The form that is used is defined by the preferences set in Maintain > Templates > Health Record Collection Templates > Inline Editing Objects field.

Version information

Added in v7.8.0