![]() | |
ConneXionFindPolicyHistoryForCustomer Method |
Namespace: ConneXion
public ConneXionResult FindPolicyHistoryForCustomer( ref PolicyHistory PolicyHistory, ref PolicyHistory[] PolicyHistories )
Dim oConneXion As New ConneXion.ConneXion Dim oPolicyHistory As New ConneXion.PolicyHistory Dim oPolicyHistories() As ConneXion.PolicyHistory Dim oResult As ConneXion.ConneXionResult oPolicyHistory.TAMUserName = "EXEC" oPolicyHistory.TAMPassword = "PSWD" oPolicyHistory.TAMCentralAgency = "DEMOAG1" oPolicyHistory.LicenseKey = "1234567 1" oPolicyHistory.ClientID = "ANDENA1" oResult = oConneXion.FindPolicyHistoryForCustomer(oPolicyHistory, oPolicyHistories) If oResult.Success = True Then MessageBox.Show("FindPolicyHistoryForCustomer is successful") Else txtResult.Text = "Number: " & oResult.Number & vbCrLf & "Description: " & oResult.Description & vbCrLf & "TAMErrorNumber: " & oResult.TAMErrorNumber & vbCrLf & "TAMErroDesc: " & oResult.TAMDescription End If