ISProfile.CreateClaimFilter

Description

This function creates the filter for loading claims.

Syntax

object.CreateClaimFilter()

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

Return Value

ISClaimFilter

Returns the filter for loading claims.

Example

Display the number of the claims loaded on the basis of the selected filter, their dates and IDs.

Dim aFilter
Dim aClaims
Dim aClaim
Dim aMessage

Set aFilter = Profile.CreateClaimFilter
aFilter.DateFrom = #06/08/2018#
set aClaims = Profile.LoadClaims(aFilter)   

aMessage = "Claims Count = " & aClaims.Count
for i = 0 to aClaims.Count - 1
  set aClaim = aClaims.Item(i)
  aMessage = aMessage & vbNewLine & "ID of the claim for " & aClaim.Date &_
    " is " & aClaim.ID
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Claims can be found in Control Centre > Financial > Claims.

Version information

Added in v7.8.0