The code of the place of service linked to the organisation node.
object.Code
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISOrgMember interface |
string
Display the code of the place of service linked to the organisation node.
Dim aFilter
Dim aOrgMember
Dim aOrgMembers
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 & "The code of the POS linked to the " &_
"org node '" & aOrgMember.Name & "' is " & aOrgMember.Code
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Code can be found in
.