ISOrgMember.SubType

Description

The sub type of the organisation node.

Syntax

object.SubType

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

Restriction: This property is readonly.

Return Value

ISShortCode

Example

Display the sub type of the organisation node.

Dim aFilter
Dim aOrgMember
Dim aOrgMembers
Dim aSubType
Dim aMessage

Set aFilter = Profile.CreateOrgMembersFilter
set aOrgMembers = Profile.LoadOrgMembers(aFilter)

aMessage = "Org Nodes Count = " & aOrgMembers.Count
  for each aOrgMember in aOrgMembers
  set aSubType = aOrgMember.SubType
  if aSubType is nothing then
    aMessage = aMessage & vbNewLine & "Sub Type Not Defined"
  else 
    aMessage = aMessage & vbNewLine & "The sub type of the organisation node '" &_
      aOrgMember.Name & "' is " & aSubType.Description 
  end if       
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Sub Type can be found in Organisation > People & Places > Organisational Structure > Open the selected node > General > Type field.

Version information

Added in v7.8.0