ISProfile.LoadRecallActions

Description

This function returns the actions loaded on the basis of the selected filter.

Syntax

object.LoadRecallActions(aFilter)

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface
`aFilter`	In, Required	ISRecallActionFilter	The object that defines conditions for filtering

Return Value

ISRecallActions

Returns the actions loaded on the basis of the selected filter.

Example

Display the number of the actions loaded on the basis of the selected filter, their descriptions and codes.

Dim aPatient
Dim aFilter 
Dim aRecallActions
Dim aRecallAction
Dim aMessage 

Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreateRecallActionFilter
aFilter.PatientId = aPatient.Id
set aRecallActions = Profile.LoadRecallActions(aFilter)

aMessage = "Actions Count = " & aRecallActions.Count
for i = 0 to aRecallActions.Count - 1
  set aRecallAction = aRecallActions.Item(i)
  aMessage = aMessage & vbNewLine & "Action: " &_
    aRecallAction.Description & vbNewLine & "Code: " & aRecallAction.Code 
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Recall Actions can be found in Clinical > Medical Record > Care Plans > Open active intervention > Actions.

Version information