ISRecallPlanFilter.PlanCode

Description

This filter property is used to load the patient's care plans by the selected plan code.

Syntax

object.PlanCode

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

Return Value

string

Example

Display the number of the patient's care plans filtered by the selected plan code.

sub main   
  Dim aPatient
  Dim aFilter
  Dim aRecallPlans
  Dim aMessage
     
  Set aPatient = Profile.SelectPatient
  set aRecallPlans = aPatient.RecallPlans
  set aFilter = Profile.CreateRecallPlanFilter
  
  aFilter.PatientId = aPatient.Id
  aFilter.PlanCode = "IMMBC"
  
  set aRecallPlans = Profile.LoadRecallPlansExt(aFilter)  
   
  aMessage = aMessage & vbNewLine &_
    "The number of the patient's care plans filtered " &_
    "by plan code '" & aFilter.PlanCode & "' is " & aRecallPlans.Count
    
  Profile.MsgBox(aMessage)  
end sub

Note:

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

Version information

Added in v7.8.0