This function returns the tasks loaded on the basis of the selected filter.
object.LoadTasks(
[pFilter])
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
pFilter |
In, Optional | The object that defines conditions for
filtering |
Display the number of tasks loaded on the basis of the selected filter and their descriptions.
Dim aPatient
Dim pFilter
Dim aTasks
Dim aTask
Dim aMessage
Set aPatient = Profile.SelectPatient
set pFilter = Profile.CreateTasksFilter
pFilter.PatientId = aPatient.ID
set aTasks = Profile.LoadTasks(pFilter)
aMessage = "Tasks Count = " & aTasks.Count & vbNewLine
for i = 0 to aTasks.Count - 1
set aTask = aTasks.Item(i)
aMessage = aMessage & vbNewLine & aTask.Description
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Tasks can be found in
.