ISPrivacyEntries.Item

Description

Each of the provider's privacy entries within the collection. Privacy entries are used to map the provider's privacy roles from different partitions.

Syntax

object.Item(aIndex)

Part	Attribute	Type	Description
`object`	Required	ISPrivacyEntries	The `object` always implements the ISPrivacyEntries interface
`aIndex`	In, Required	int	The index of the privacy entry

Restriction: This property is readonly.

Return Value

ISPrivacyEntry

Example

Display the number of the provider's privacy entries, their full names and descriptions.

Dim aFilter 
Dim aProviders
Dim aProvider
Dim aPrivacyEntries
Dim aPrivacyEntry
Dim aMessage

Set aFilter = Profile.CreateProvidersFilter
aFilter.Category = 2 'pcProvider
set aProviders = Profile.LoadProvidersByFilter(aFilter)

aMessage = aMessage & vbNewLine &_
  "The number of the providers is " & aProviders.Count & vbNewLine

for each aProvider in aProviders
  set aPrivacyEntries = aProvider.GetPrivacyEntries
  aMessage = aMessage & vbNewLine & aProvider.FullName & " has " &_
    aPrivacyEntries.Count & " privacy entries"

  for i = 0 to aPrivacyEntries.Count - 1 
    set aPrivacyEntry = aPrivacyEntries.Item (i)
      aMessage = aMessage & vbNewLine &_
        "  - " & aPrivacyEntry.Name & " (" & aPrivacyEntry.Description & ")" 
  next 'aPrivacyEntry    
next 'Provider  
Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Roles can be found in Organisation > People&Places > People and Places > Open the selected Provider > Basic > Roles > Roles (Works as POS Roles) The mapping of the provider's roles with the privacy entries can be found in Organisation > Preferences > IHN Preferences > IHN Privacy. Privacy Entries can be found in IHN > Common > Privacy Entries.

Version information

Added in v7.8.0