finAccount object; new GetRelatedAccounts function added to return a list of related Accounts

A new function, GetRelatedAccounts, has been added to finAccount to return a collection of Accounts related to the current Account.

The function includes a number of parameters to filter the list of Accounts returned:

• Account Classes:
• includeLoanAccounts
• includeDepositAccounts
• includeDisbursementAccounts
• Account Roles; note, Owners are always returned
• includeGuarantors
• Account Status; note, Open Accounts are always included
• includeQuote
• includeClosed
• includeDeclinedAndUnwanted

Warning: the collection will include the current Account if it fits the criteria filters.

Sample code is shown below:

Dim AccountRelatedAccount As finAccountRelatedAccount
Dim AccountRelatedAccounts As finAccountRelatedAccounts

If Account.GetRelatedAccounts(AccountRelatedAccounts) Then
  For Each AccountRelatedAccount In AccountRelatedAccounts
    finBL.DebugPrintFormat("{0} Status={1} ", AccountRelatedAccount.AccountId, AccountRelatedAccount.AccountStatusText)
  Next
Else
  Main = False
End If