ISProfile.LoadCaseServices

Description

This function returns the case services loaded on the basis of the selected filter.

Syntax

object.LoadCaseServices(aFilter)

Part	Attribute	Type	Description
`object`	Required	ISProfile	The `object` always implements the ISProfile interface
`aFilter`	In, Required	ISCaseServiceFilter	The object that defines conditions for filtering

Return Value

ISCaseServices

Returns the case services loaded on the basis of the selected filter.

Example

Display the number of case services loaded on the basis of the selected filter and the reasons.

Dim aFilter
Dim aCaseServices
Dim aCaseService
Dim aMessage

Set aFilter = Profile.CreateCaseServiceFilter
aFilter.PosID = Profile.CurrentPOSId 
set aCaseServices = Profile.LoadCaseServices(aFilter)

aMessage = "Case Services Count = " & aCaseServices.Count
for i = 0 to aCaseServices.Count - 1
  set aCaseService = aCaseServices.Item(i)
  aMessage = aMessage & vbNewLine & aCaseService.Reason
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Case Services can be found in Case Admin > Case Sub-Refferal.

Version information