ISClaim.Claims

Description

Each of the claims within the collection. On User Interface Claims can be found in Organisation/Control Centre/Financial/Billing.

Syntax

object.Claims

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

Restriction: This property is readonly.

Return Value

ISList

Example

Display the date and the number of the linked claims for each claim loaded on the basis of the selected filter

Dim aFilter
Dim aClaims, aClaim, aLinkedClaims
Dim aMessage
Dim i

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

aMessage = "Claims Count = " & aClaims.Count
for i = 0 to aClaims.Count - 1
  set aClaim = aClaims.Item(i)
  set aLinkedClaims = aClaim.Claims

  aMessage = aMessage & vbNewLine & "The claim on date " & vbTab &_
    aClaim.Date & " has " & aLinkedClaims.Count & " linked claims."
next      

Profile.MsgBox(aMessage)

Note:

Version information

Added in v7.8.0