This filter property is used to load the actions by ID of the intervention.
object.RecallVisitID
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISRecallActionFilter interface |
int
Display the number of the actions filtered by ID of the intervention.
sub main
Dim aPatient
Dim aFilter
Dim aRecallVisits
Dim aActions
Dim aMessage
Set aPatient = Profile.SelectPatient
set aFilter = Profile.CreateRecallActionFilter
set aRecallVisits = aPatient.RecallVisits.Due
if aRecallVisits.Count = 0 then
Profile.MsgBox ("This patient has no due interventions!")
else
aFilter.RecallVisitID = aRecallVisits.Item(0).ID
end if
set aActions = Profile.LoadRecallActions(aFilter)
aMessage = aMessage & vbNewLine & "The number of the actions " &_
"filtered by ID of the intervention is " & aActions.Count
Profile.MsgBox(aMessage)
end sub
In Profile Client v8 on User Interface Intervention ID cannot be found.