ISPatient.GetDefaultFeeRate

Description

This function returns default fee rate from Aero & Accession preferences.

Syntax

object.GetDefaultFeeRate(aFeeItem)

Part	Attribute	Type	Description
`object`	Required	ISPatient	The `object` always implements the ISPatient interface
`aFeeItem`	In, Required	TSAccessionInvoiceItem	The Accession item to pay for

Return Value

Double

Returns default fee rate from Aero & Accession preferences.

Example

Display default Accession Sign On Fee.

Dim aPatient  
Dim aDefFeeRate

Set aPatient = Profile.SelectPatient
aDefFeeRate = aPatient.GetDefaultFeeRate(0) 
Profile.MsgBox(aDefFeeRate)

Note:

In Profile Client v8 on User Interface default Accession Sign On Fee can be found in Organisation > Preferences > Aero & Accession > Patient > Setup > Default > Fees > SignOn Fee field, Accession Medication Refill Request Fee can be found in Organisation > Preferences > Aero & Accession > Patient > Setup > Default > Fees > Medication Refill Request Fee field, default fee rate of Questions can be found in Questions Service Code in Organisation > Preferences > Aero & Accession > Patient > Setup > Default > Questions > Service Code field.

Version information

Added in v7.8.0