ISClinicalView.SourceHTML

Description

The HTML template of the clinical view.

Syntax

object.SourceHTML

Part Attribute Type Description
object Required
The object always implements the ISClinicalView interface
Restriction: This property is readonly.

Return Value

string

Example

Display the number of the clinical views and some information about the ones with the specified caption, including their HTML templates.

Dim aPatient  
Dim aClinicalView, aClinicalViews
Dim i
Dim aMessage

set aPatient = Profile.SelectPatient
set aClinicalViews = aPatient.LoadClinicalViews
aMessage = "The number of the Clinical Views is " & aClinicalViews.Count & ": " & vbNewLine

for i = 0 to aClinicalViews.Count - 1
  set aClinicalView = aClinicalViews.Item(i)
  if aClinicalView.Caption = "Overview" then
    aMessage = aMessage & vbNewLine &_
      (i + 1) & ") " & aClinicalView.Caption & vbNewLine &_
      " PatientId: " & aClinicalView.PatientId & vbNewLine &_
      " CaseID: " & aClinicalView.CaseID & vbNewLine &_
      " ViewID: " & aClinicalView.ViewID & vbNewLine &_
      " Desc: " & aClinicalView.Desc & vbNewLine &_
      " URL: " & aClinicalView.URL & vbNewLine &_
      " Source HTML:" & vbNewLine & aClinicalView.SourceHTML & vbNewLine & vbNewLine &_
      " HTML:" & vbNewLine & aClinicalView.HTML & vbNewLine &_       
      " VB Processed HTML:" & vbNewLine & aClinicalView.VBProcessedHTML & vbNewLine
  end if         
next

Profile.MsgBox(aMessage)
Note:

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

Version information

Added in v7.8.0