ISGuideline.ApplyToDescendants

Description

This property is True if the guideline can be applied to the termset item descendants as well.

Syntax

object.ApplyToDescendants

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

Return Value

bool

Example

Display ApplyToDescendants for the guideline.

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

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

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

for i = 0 to aRecommendations.Count - 1
  set aRecommendation = aRecommendations.Item(i)
  
  set aGuideline = aRecommendation.Guideline
   
  aMessage = aMessage & vbNewLine & (i + 1) & ". " &_
    "-Name: " & aRecommendation.Name & vbNewLine &_
    "-Guideline: " & aGuideline.Name & vbNewLine &_
    "-Apply To Descendants: " & aGuideline.ApplyToDescendants & vbNewLine &_
    "-Concept: " & aGuideline.Concept.Name & vbNewLine   
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface the Applies to descendants checkbox can be checked in Maintain > Treatment Guidelines > Create a new guideline > Encounter tab.

Version information

Added in v7.8.0