The name of the patient associated with the activity that to be done.
object.PatientName
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISToDoItem interface |
string
Display the number of To Do Items loaded on the basis of the selected filter, the names and IDs of the patients associated with them.
Dim aFilters
Dim aFilter
Dim aToDoItems
Dim aToDoItem
Dim aMessage
Set aFilters = Profile.GetToDoFilters
set aFilter = aFilters.ToDoListFilter(0)
aFilter.MaxNumber = 6
aFilter.StartFrom = 1
set aToDoItems = Profile.LoadToDoItems(aFilter)
aMessage = "To Do Items Count = " & aToDoItems.Count
for i = 0 to aToDoItems.Count - 1
set aToDoItem = aToDoItems.Item(i)
aMessage = aMessage & vbNewLine & aToDoItem.PatientName & " (" &_
aToDoItem.PatientId & ") "
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface To Do Items can be found in
.