ISPatient.RecallVisits

Description

All interventions of the patient.

Syntax

object.RecallVisits

Part	Attribute	Type	Description
`object`	Required	ISPatient	The `object` always implements the ISPatient interface

Restriction: This property is readonly.

Return Value

ISPatientRecallVisitsSet

Example

Display the number of all due interventions of the patient, their code description and status.

Dim aPatient  
Dim aRecallVisits
Dim aRecallVisit
Dim aMessage

Set aPatient = Profile.SelectPatient
aRecallVisits = aPatient.RecallVisits.Due.Count
aMessage = "Recall Visits Count = " & aRecallVisits

for i = 0 to aRecallVisits - 1
  set aRecallVisit = aPatient.RecallVisits.Due.Item(i)
  aMessage = aMessage & vbNewLine 
  aMessage = aMessage & "'" & aRecallVisit.Description & "'" & ", "
  aMessage = aMessage & 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