ISPatient.FolderMembers

Description

All patients in the system, who have the same Folder number.

Syntax

object.FolderMembers

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

Return Value

ISPatientFolderMembers

Example

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)   
Note:

In Profile Client v8 on User Interface Folder Members can be found in Patient > Alter Patient > Family > Folder Members.

Version information

Added in v7.8.0