ISOrgMember.CareTypeCode

Description

The code of the care type associated with the organisation node.

Syntax

object.CareTypeCode

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

Restriction: This property is readonly.

Return Value

string

Example

Display the name of the selected organisation node, its care type and care type code.

Dim aFilter
Dim aOrgMember
Dim aOrgMembers
Dim aCareType
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 &_
    "CARE TYPE CODE:  " & aOrgMember.CareTypeCode

  set aCareType = aOrgMember.CareType
  if not aCareType is nothing then
    aMessage = aMessage & vbNewLine & "CARE TYPE:  " & aCareType.Description
  end if       
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Care Type Code cannot be found.

Version information

Added in v7.8.0