All patients in the system, who have the same Folder number.
object.FolderMembers
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISPatient interface |
Display the number of folder members and list their full names.
Dim aPatient
Dim aFolderMembers
Dim aFolderMember
Dim aMessage
Set aPatient = Profile.SelectPatient
set aFolderMembers = aPatient.FolderMembers
aMessage = "Folder Members Count = " & aFolderMembers.Count
for i = 0 to aFolderMembers.Count - 1
set aFolderMember = aFolderMembers.Item(i)
aMessage = aMessage & vbNewLine
aMessage = aMessage & " " & aFolderMember.LastName & ", " & aFolderMember.FirstName
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Folder Members can be found in
.