ISPatient.RecallPlans

Description

All care plans for the patient.

Syntax

object.RecallPlans

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

Restriction: This property is readonly.

Return Value

ISPatientRecallPlans

Example

Display all care plans for the patient.

Dim aPatient  
Dim aRecallPlans
Dim aRecallPlan
Dim aMessage

Set aPatient = Profile.SelectPatient
set aRecallPlans = aPatient.RecallPlans
aMessage = "Recall Plans Count = " & aRecallPlans.Count

for i = 0 to aRecallPlans.Count - 1
  set aRecallPlan = aRecallPlans.Item(i)
  aMessage = aMessage & vbNewLine 
  aMessage = aMessage & aRecallPlan.EnrolmentDate & ", "
  aMessage = aMessage & "'" & aRecallPlan.Description & "'" 
next

Profile.MsgBox (aMessage)

Note:

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

Version information

Added in v7.8.0