Article Details
Id:11637
Product:finPOWER Connect
Type:NEW
Version:2.00.02
Opened:08/01/2014
Closed:08/01/2014
Released:05/02/2014
Job: J012710

Page Sets; Functionality added to show address search form

New PageSet functionality allows the standard Address Search form to be shown. This form shows the results of a search and allows the search to be broadened, e.g., street number to be removed.

The sample code below shows the search form.

Dim AddressDetails As ISAddressDetails
Dim SelectedAddressDetails As ISAddressDetails

' Create Address to search
AddressDetails = finBL.CreateAddressDetails()
With AddressDetails
  .StreetAddressFull = txtStreetAddress.Text
  .City = txtCity.Text
  .Postcode = txtPostcode.Text
End With

' Search
If psh.FormShowAddressSearch(AddressDetails, SelectedAddressDetails) Then
  If SelectedAddressDetails Is Nothing Then
    ' Cancelled by User
  Else
    ' Update fields
    With SelectedAddressDetails
      txtStreetAddress.Text = .StreetAddressFull
      txtCity.Text = .City
      txtPostcode.Text = .Postcode
    End With
  End If
Else
  mUI.ErrorMessageShow()
End If