ISPatientRecallPlan.CaseID

Description

ID of the case the patient's care plan is linked to.

Syntax

object.CaseID

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

Restriction: This property is readonly.

Return Value

int

Example

Display ID of the case the patient's care plan is linked to.

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 case " &_ 
    "the care plan '" & aPlan.Description & "'" &_
    " is linked to = " & aPlan.CaseID
next

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Case ID cannot be found. Case can be found in Clinical > Medical Record > Care Plans > Open active object(s) > General > Case.

Version information

Added in v7.8.0