ISRecallObjectiveVersCollection.Count

Description

The number of the objective versions within the collection.

Syntax

object.Count

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

Return Value

int

Example

Display the number of the objective versions within the collection.

Dim aMacroResult, aPlans, aVisits, aObjectives, aPlan, aResultHTML 

set aPlans = Plans
set aVisits = Interventions
set aObjectives = Objectives

set aMacroResult = Profile.FindVariable("MacroResult")

aResultHTML = _
  "Plans Count: " & aPlans.Count & "<br>"
  
for i = 0 to aPlans.Count - 1
  set aPlan = aPlans.Item(i)
  aResultHTML = aResultHTML & _
    "<li>" & aPlan.Description & "</li><br>"
next 
  
aResultHTML = aResultHTML &_  
  "Objectives Count: " & aObjectives.Count & "<br>" &_
  "Visits Count: " & aVisits.Count & "<br>"
  
aMacroResult.Value = aResultHTML   
Note:

In Profile Client v8 on User Interface Objective Version Collection cannot be found.

Version information

Added in v7.8.0