This filter property is used to load the claims from the specified date.
object.DateFrom
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISClaimFilter interface |
DateTime
Display the number of the claims loaded on the basis of the selected filter, their dates, time and POSes.
Dim aFilter
Dim aClaims, aClaim
Dim aMessage
Dim aPOS
Dim i
Set aFilter = Profile.CreateClaimFilter
aFilter.DateFrom = #06/06/2018#
aFilter.DateTo = #09/09/2019#
set aClaims = Profile.LoadClaims(aFilter)
aMessage = "Claims Count = " & aClaims.Count & vbNewLine &_
"Date/Time" & vbTab & vbTab & "Pos"
for i = 0 to aClaims.Count - 1
set aClaim = aClaims.Item(i)
set aPOS = Profile.LoadProviderById(aClaim.PosId)
aMessage = aMessage & vbNewLine &_
aClaim.Date & vbTab & aPOS.FullName & " (" & aPOS.Code & ")"
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Date can be found in
.