ISPatientRecallPlan.ID

Description

ID of the patient's care plan.

Syntax

object.ID

Part Attribute Type Description
object Required
The object always implements the ISPatientRecallPlan interface
Restriction: This property is readonly.

Return Value

int

Example

Display ID of 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 & "ID of the patient's " &_ 
    "care plan '" & aPlan.Description & "' is " & aPlan.ID 
next

Profile.MsgBox(aMessage) 
Note:

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

Version information

Added in v7.8.0