ISClinicalView.VBProcessedHTML

Description

The clinical view HTML string presentation that contains all data after VBScript internal macros execution.

Syntax

object.VBProcessedHTML

Part	Attribute	Type	Description
`object`	Required	ISClinicalView	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 string presentations.

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 HTML Clinical Views can be found in Case Clinical > Overview > Clinical > Overview or in Patient > Alter Patient > General > Overview.

Version information

Added in v7.8.0