This function returns the information about the clinical views as XML document.
object.asXmlDocument()
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISClinicalViews interface |
string
Display the information about the clinical views as XML document.
Dim aPatient
Dim aClinicalViews
Dim aMessage
set aPatient = Profile.SelectPatient
set aClinicalViews = aPatient.LoadClinicalViews
aMessage = "Clinical Views: " & vbNewLine &_
aClinicalViews.asXmlDocument & vbNewLine
aMessage = Replace(aMessage, "<", vbNewLine & "<")
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Xml Documents can be found in
.