ISCountryItems.Count

Description

The number of the country items within the collection.

Syntax

object.Count

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

Restriction: This property is readonly.

Return Value

int

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