ISClaimFilter.GuarantorId

Description

This filter property is used to load the claims with the specified Guarantor Id.

Syntax

object.GuarantorId

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

Return Value

int

Example

Display the number of the claims loaded on the basis of the selected filter, their dates, time and guarantors' full names.

Dim aFilter
Dim aClaims, aClaim
Dim aMessage
Dim aGuarantor
Dim i

Set aFilter = Profile.CreateClaimFilter
set aPatient = Profile.SelectPatient

aFilter.GuarantorId = aPatient.Id 

set aClaims = Profile.LoadClaims(aFilter)   

aMessage = "Claims Count = " & aClaims.Count & vbNewLine &_
  "Date/Time" & vbTab & vbTab & "Guarantor"
for i = 0 to aClaims.Count - 1
  set aClaim = aClaims.Item(i)
  set aGuarantor = Profile.PatientUtils.LoadPatientByID(aClaim.GuarantorId)  
  
  aMessage = aMessage & vbNewLine &_
    aClaim.Date & vbTab & aGuarantor.SurnameFirstName
next      

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Guarantor Id cannot be found, but Guarantor can be found in Organisation > Control Centre > Financial > Billing > Details > Payer.

Version information

Added in v7.8.0