ISProvider.RoleGrants

Description

The collection of the specific provider's roles that grant access to some actions within Profile.

Syntax

object.RoleGrants(aIncludeDeleted)

Part	Attribute	Type	Description
`object`	Required	ISProvider	The `object` always implements the ISProvider interface
`aIncludeDeleted`	In, Required	bool	If aIncludeDeleted = true, the revoked roles are included

Restriction: This property is readonly.

Return Value

ISCollection

Example

Display the collection of the specific provider's roles (and their names) that grant access to some actions within Profile.

Dim aFilter 
Dim aProviders, aProvider
Dim aRoles
Dim aRoleGrant
Dim aMessage

aIncludeDeleted = true

Set aFilter = Profile.CreateProvidersFilter
aFilter.Category = 2 'pcProvider

set aProviders = Profile.LoadProvidersByFilter(aFilter)

for each aProvider in aProviders
  aMessage = aMessage & vbNewLine & vbNewLine & aProvider.FullName

  set aRoles = aProvider.RoleGrants(aIncludeDeleted)
  if aRoles.Count = 0 then
    aMessage = aMessage & " has no roles being granted the access"  
  end if
  
  for i = 0 to aRoles.Count - 1 
    set aRoleGrant = aRoles.Item(i)
    aMessage = aMessage & vbNewLine & "      Role Name: " &_ 
      aRoleGrant.Grantee.RoleName 
  next 'i
next 'aProvider  
 
Profile.MsgBox (aMessage)

Note:

In Profile Client v8 on User Interface Role Grants can be found in Organisation > People&Places > People and Places > Open the selected Provider > Grants > Users and Roles.

Version information

Added in v8.3.0

parameter aIncludeDeleted added in v8.3.0