![]() | |
ConneXionFindClaimsForCustomer Method |
Namespace: ConneXion
NOTE: Although FindClaimsForCustomer calls for the PolicyIndex, it will trim whatever is set in that field down to the first seven characters (which is equivalent to the ClientID) and return all claims for that for that Client. So even if you set PolicyIndex to ABBOJO1-4, for example, ALL claims for ALL Policies for ABBOJO1 will be returned.
Dim oConneXionClaim As New ConneXion.ConneXion Dim oClaim As New ConneXion.Claim Dim oClaims() As ConneXion.Claim Dim oResult As ConneXion.ConneXionResult oClaim.TAMUsername = "EXEC" oClaim.TAMPassword = "PSWD" oClaim.PolicyIndex = "ABBOJO1-4" oResult = oConneXionClaim.FindClaimsForCustomer(oClaim, oClaims) If oResult.Success Then txtResult.Text = oResult.Description dgrdResult.DataSource = oClaims Else txtResult.Text = "Number: " & oResult.Number & vbCrLf & "Desc: " & oResult.Description & vbCrLf & "TAMErrorNumber: " & oResult.TAMErrorNumber & vbCrLf & "TAMErroDesc: " & oResult.TAMDescription End If