ISRecallObjectiveVersCollection.Item

Description

Each of the objective versions within the objective version collection.

Syntax

object.Item(aIndex)

Part	Attribute	Type	Description
`object`	Required	ISRecallObjectiveVersCollection	The `object` always implements the ISRecallObjectiveVersCollection interface
`aIndex`	In, Required	int	The index of the objective version

Restriction: This property is readonly.

Return Value

ISRecallObjectiveVers

Example

Display each of the objective versions within the objective version collection.

Dim aMacroResult, aPlans, aObjective, 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>" 
    
for i = 0 to aObjectives.Count - 1
  set aObjective = aObjectives.Item(i)
  aResultHTML = aResultHTML & _
    "<li>" & aObjective.DisplayName & "</li><br>"
next 
    
aMacroResult.Value = aResultHTML

Note:

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

Version information

Added in v7.8.0