ISCaseClientFilter.Description

Description

The description of the case filter.

Syntax

object.Description

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

Restriction: This property is readonly.

Return Value

string

Example

Display the number of the case filters and some information about them.

Dim aCaseFilters, aCaseFilter 
Dim aMessage
Dim aCases, aCase
Dim i, j

Set aCaseFilters = Profile.GetCaseFilters
aMessage = "Case Filters Count = " & aCaseFilters.Count 
  
for i = 0 to aCaseFilters.Count - 1
  set aCaseFilter = aCaseFilters.Item(i)
  set aCases = aCaseFilter.GetCases
    
  aMessage = aMessage & vbNewLine & aCaseFilter.Description & " (" & aCases.Count & ")"   
   
  for j = 0 to aCases.Count - 1
    set aCase = aCases.Item(j)
    aMessage = aMessage & vbNewLine & (j + 1) & ") " & aCase.CaseTitle  
  next 'j  
next 'i  
                                    
Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Case Filters can be found in Clinical > Medical Record > Cases > Edit Filters.

Version information

Added in v7.8.0