ISRecommendation.Name

Description

The name of the patient's recommendation.

Syntax

object.Name

Part Attribute Type Description
object Required
The object always implements the ISRecommendation interface

Return Value

string

Example

Display the number of patient's recommendations and some information about them, including their names.

Dim aPatient
Dim aPatientID
Dim aRecommendations
Dim aRecommendation
Dim aMessage
Dim i

Set aPatient = Profile.SelectPatient
aPatientID = aPatient.ID 
set aRecommendations = Profile.LoadRecommendations(aPatientID)

aMessage = "Recommendations Count = " & aRecommendations.Count & vbNewLine &_
  vbNewLine 

for i = 0 to aRecommendations.Count - 1
  set aRecommendation = aRecommendations.Item(i)
  aMessage = aMessage & (i + 1) & ". " & "Name: " & aRecommendation.Name &_
    vbNewLine & "-Guideline: " & aRecommendation.Guideline.Name & vbNewLine 

  if not aRecommendation.Actions is nothing then
    aMessage = aMessage & "-Recommended actions: " & vbNewLine &_
      aRecommendation.Actions.Text & vbNewLine
  end if  
next      

Profile.MsgBox(aMessage)   
Note:

In Profile Client v8 on User Interface Name can be found in Maintain > Treatment Guidelines > Create a new guideline > Create a new recommendation > Name.

Version information

Added in v7.8.0