ISProblemDiagnosisFilter.ConfidenceID

Description

This filter property is used to load the diagnoses by the confidence level.

Syntax

object.ConfidenceID

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

Return Value

int

Example

Display the number of the diagnoses loaded on the basis of the selected filter, their codes, descriptions and confidence levels.

Dim aPatient
Dim aFilter
Dim aDiagnoses
Dim aDiagnosis
Dim aMessage

Set aPatient = Profile.SelectPatient  
set aFilter = Profile.CreateProblemDiagnosisFilter 
aFilter.PatientId = aPatient.ID
aFilter.ConfidenceID = 3 'cDefinitive 
set aDiagnoses = Profile.LoadDiagnoses(aFilter)

aMessage = "Diagnoses Count = " & aDiagnoses.Count
for i = 0 to aDiagnoses.Count - 1
  set aDiagnosis = aDiagnoses.Item(i)
  aMessage = aMessage & vbNewLine & "Code: " & aDiagnosis.DxCode &_ 
    "; Description: " & aDiagnosis.DxDescription & "; Confidence: " &_ 
    aDiagnosis.Confidence
next      

Profile.MsgBox(aMessage)

Note: The possible property values can be found in the enumeration TSConfidence.

In Profile Client v8 on User Interface Confidence can be found in Clinical > Medical Record > Problems > Open Problem > General > Confidence, in Clinical > Clinical Details > Problems > Open Problem > General > Confidence or in Patient > Cases > Clinical > Problems > Open Problem > General > Confidence.

Version information

Added in v7.8.0