ISProfile.GetCaseFilters

Description

This function returns the filters for loading cases.

Syntax

object.GetCaseFilters()

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

Return Value

ISCaseClientFilters

Returns the filters for loading cases.

Example

Display the number of the filters for loading cases and their descriptions.

Dim aCaseFilters
Dim aCaseClientFilter 
Dim aCaseClientFilters
Dim aMessage

Set aCaseFilters = Profile.GetCaseFilters
aMessage = "Case Filters Count = " & aCaseFilters.Count 
  
for i = 0 to aCaseFilters.Count - 1
  set aCaseClientFilter = aCaseFilters.Item(i)
  aMessage = aMessage & vbNewLine & "  -" & aCaseClientFilter.Description   
next  
 
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