ISToDoItem.PatientId

Description

ID of the patient associated with the activity that to be done.

Syntax

object.PatientId

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

Restriction: This property is readonly.

Return Value

int

Example

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)

Note:

In Profile Client v8 on User Interface Patient ID cannot be found, but To Do Items can be found in Organisation > Work Centre > To Do List.

Version information

Added in v7.9.1