ISPatientRecallVisitVersCollection.Count

Description

The number of the patient's intervention versions within the collection.

Syntax

object.Count

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

Restriction: This property is readonly.

Return Value

int

Example

Display the tree structure of the intervention versions.

Dim aMacroResult
Dim aVisits
Dim aVisit
Dim aResultHTML 

Set aVisits = Interventions

set aMacroResult = Profile.FindVariable("MacroResult")

aResultHTML = _
  "Interventions Count: " & aVisits.Count & "<br>"
  
for i = 0 to aVisits.Count - 1
  set aVisit = aVisits.Item(i)
  aResultHTML = aResultHTML & _
    "<li>" & aVisit.Description & "</li><br>"
next 
  
  
aMacroResult.Value = aResultHTML

Note:

In Profile Client v8 on User Interface Collection of Intervention Versions can be found in Clinical > Medical Record > Care Plans > Text page.

Version information

Added in v7.8.0