ISPatientRecallPlan.OptOn

Description

This property is True if the patient's care plan is opted-on the national immunisation register (NIR).

Syntax

object.OptOn

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

Return Value

bool

Example

Display OptOn for the patient's care plan.

Dim aPatient
Dim aRecallPlans
Dim aMessage
Dim aPlan

Set aPatient = Profile.SelectPatient
set aRecallPlans = aPatient.RecallPlans

if aRecallPlans.Count = 0 then
  Profile.MsgBox("The patient has no care plans!")
  exit sub
end if

for each aPlan in aRecallPlans
  aMessage = aMessage & vbNewLine & "The care plan '" &_ 
    aPlan.Description & "' is opted-on the national " &_
    "immunisation register (NIR) : - " & aPlan.OptOn 
next

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface the Opt on/Opt off checkbox can be checked in Clinical > Medical Record > Care Plans > Open active object(s) > General.

Version information

Added in v7.8.0