This function returns the case types loaded on the basis of the selected filter.
object.LoadCaseTypes(aFilter)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
aFilter |
In, Required | The object that defines conditions for filtering
|
Display the number of case types, their titles and codes.
Dim aFilter
Dim aCaseTypes
Dim aCaseType
Dim aMessage
Set aFilter = Profile.CreateCaseTypesFilter
aFilter.Description = "Case Type 1"
set aCaseTypes = Profile.LoadCaseTypes(aFilter)
aMessage = "Case Types Count = " & aCaseTypes.Count
for i = 0 to aCaseTypes.Count - 1
set aCaseType = aCaseTypes.Item(i)
aMessage = aMessage & vbNewLine &_
"The title of the loaded case type is '" & aCaseType.Title & "'" &_
vbNewLine & "The code of the case type is " & aCaseType.Code
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Case Types can be found in
.