ISProfile.CreateFinancialTransactionFilter

Description

This function creates the filter for loading financial transactions.

Syntax

object.CreateFinancialTransactionFilter()

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

Return Value

ISFinancialTransactionFilter

Returns the filter for loading financial transactions.

Example

Display the number, the date and the amount of the financial transactions loaded on the basis of the selected filter.

Dim aFilter
Dim aTransactions
Dim aTransaction
Dim aMessage

set aFilter = Profile.CreateFinancialTransactionFilter
aFilter.ProviderCode = "MM"
aFilter.StartDate = #07/05/2019#
set aTransactions = Profile.LoadFinancialTransactions(aFilter) 
aMessage = "Financial Transactions Count = " & aTransactions.Count

for i = 0 to aTransactions.Count - 1
  set aTransaction = aTransactions.Item(i)
  aMessage = aMessage & vbNewLine &_
    " The transaction was created on " & aTransaction.Date &_ 
    ", with amount " & aTransaction.Amount & ". " 
next

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Financial Transactions can be found in Patient > Alter Patient > Transactions or in Financial > Invoice.

Version information

Added in v7.8.0