ISOrgMember.SubTypeID

Description

ID of the sub type associated with the organisation node.

Syntax

object.SubTypeID

Part Attribute Type Description
object Required
The object always implements the ISOrgMember interface
Restriction: This property is readonly.

Return Value

int

Example

Display the name of the organisation node, its sub type and sub type ID.

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
  aMessage = aMessage & vbNewLine & "-------------------------" & vbNewLine & _ 
    "ORGANISATION NODE:  " & aOrgMember.Name & vbNewLine &_
    "SUB TYPE ID:  " & aOrgMember.CareTypeID
    
  set aSubType = aOrgMember.SubType
  if not aSubType is nothing then
    aMessage = aMessage & vbNewLine & "SUB TYPE:  " & aSubType.Description    
  end if       
next      

Profile.MsgBox(aMessage)  
Note:

In Profile Client v8 on User Interface Sub Type ID cannot be found.

Version information

Added in v7.8.0