ISPatient.LoadRecallVisits

Description

This function returns the interventions of the patient.

Syntax

object.LoadRecallVisits(ImmunisationOnly = false)

Part	Attribute	Type	Description
`object`	Required	ISPatient	The `object` always implements the ISPatient interface
`ImmunisationOnly`	In, Required Default value is false	bool	If ImmunisationOnly = True the function returns only interventions of Immunisation type for the patient. Otherwise, all the patient's interventions are returned.

Return Value

ISPatientRecallVisits

Returns the interventions of the patient.

Example

Display the number of all interventions of the patient, their statuses and their code descriptions.

Dim aPatient  
Dim aRecallVisits
Dim aRecallVisit
Dim aImmunisationOnly
Dim aMessage

Set aPatient = Profile.SelectPatient
aImmunisationOnly = False
set aRecallVisits = aPatient.LoadRecallVisits(aImmunisationOnly)
aMessage = "Recall Visits Count = " & aRecallVisits.Count

for i = 0 to aRecallVisits.Count - 1
  set aRecallVisit = aRecallVisits.Item(i)
  aMessage = aMessage & vbNewLine & "'" & aRecallVisit.Description & "', " &_
    aRecallVisit.StatusAsString  
next

Profile.MsgBox (aMessage)

Note: Recall Visit is called Intervention.

In Profile Client v8 on User Interface Interventions can be found in Clinical > Medical Record > Care Plans.

Version information

Added in v7.8.0