ISPatient.LoadClinicalViews

Description

This function returns the clinical views available for the patient.

Syntax

object.LoadClinicalViews()

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

Return Value

ISClinicalViews

Returns the clinical views available for the patient.

Example

Display the clinical views available for the patient.

Dim aPatient  
Dim aClinicalViews
Dim aClinicalView
Dim aMessage

Set aPatient = Profile.SelectPatient
set aClinicalViews = aPatient.LoadClinicalViews
aMessage = "Clinical Views Count = " & aClinicalViews.Count

for i = 0 to aClinicalViews.Count - 1
  set aClinicalView = aClinicalViews.Item(i)
  aMessage = aMessage & vbNewLine
  aMessage = aMessage & aClinicalView.Caption
next

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Clinical Views can be found in Maintain > HTML Views Setup.

Version information

Added in v7.8.0