ISRecallActionFilter.RecallVisitID

Description

This filter property is used to load the actions by ID of the intervention.

Syntax

object.RecallVisitID

Part Attribute Type Description
object Required
The object always implements the ISRecallActionFilter interface

Return Value

int

Example

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
Note:

In Profile Client v8 on User Interface Intervention ID cannot be found.

Version information

Added in v7.8.0