ISCountryItems.Item

Description

Each of the country items within the collection.

Syntax

object.Item(aIndex)

Part	Attribute	Type	Description
`object`	Required	ISCountryItems	The `object` always implements the ISCountryItems interface
`aIndex`	In, Required	int	The index of the country item

Restriction: This property is readonly.

Return Value

ISCountryItem

Example

Display the country of the current health system, the country items within the collection and their short names.

Dim aCountry
Dim aCountryItems, aCountryItem
Dim aMessage

aCountry = Profile.GetHealthSystemCountryDescription 
set aCountryItems = Profile.LoadCountryList

aMessage = "Health system country: " & aCountry & vbNewLine &_
  "Country Items Count: " & aCountryItems.Count & vbNewLine

for i = 0 to aCountryItems.Count - 1 
  set aCountryItem = aCountryItems.Item(i)
  aMessage = aMessage & vbNewLine & (i+1) & ") " & aCountryItem.ShortName
next 
 
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Country Items for the patient can be found in Patient > Alter Patient > General > Street Address.

Version information

Added in v7.8.0