ISPatientProblemLoadParams.DiseaseConceptChildSearchDepth

Description

This parameter property limits the number of levels in the concept tree for the disease concepts search to load patient problems.

Syntax

object.DiseaseConceptChildSearchDepth

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

Return Value

int

Example

Display the number of the patient problems loaded on the basis of the selected parameter, their codes and descriptions.

Dim aParams
Dim aProblems, aProblem
Dim aMessage

Set aParams = Profile.MakePatientProblemLoadParams
aParams.DiseaseTermsetCode = "IH"
aParams.DiseaseConceptCode = "z..2b"
aParams.DiseaseConceptChildSearchDepth = 5 'Search the concepts using 5 levels below the specified concept
set aProblems = Profile.LoadPatientProblems(aParams)

aMessage = "Problems Count = " & aProblems.Count
for i = 0 to aProblems.Count - 1
  set aProblem = aProblems.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ") " & "Code: " & aProblem.DxCode &_
    " (Description: " & aProblem.DxDescription & ")" 
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Concept can be found in Maintain > Termset Maintenance or in Special > Terms.

Version information

Added in v8.2.0