ISProfile.CurrentGranterID

Description

This function returns ID of the current granter.

Syntax

object.CurrentGranterID()

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

Return Value

int

Returns ID of the current granter.

Example

Display ID of the current granter.

Dim aCurrentGranterID
Dim aGranter
Dim aGranterName

aCurrentGranterID = Profile.CurrentGranterID
if aCurrentGranterID > 0 then
  set aGranter = Profile.LoadProviderById(aCurrentGranterID)
  aGranterName = aGranter.FullName
else
  aGranterName = " - " 
end if   

Profile.MsgBox ("Current Granter: " & aGranterName)

Note:

In Profile Client v8 on User Interface Current Granter ID cannot be found, but Current Granter can be found in File > Work for > Active item.

Version information

Added in v7.8.0