GetScale

Returns the scale of a given currency.

Syntax

<HsvCurrencies>.GetScale(lCurrencyID)

Argument	Description
lCurrencyID	Long (ByVal). The currency’s ID.

Return Value

Integer. Returns the currency’s scale.

Example

The following function takes a currency’s label and returns its scale. The currency’s ID is obtained with GetCurrencyID.

Function getCurrencyScale(sCurr As String) As String
Dim cCurrencies As HsvCurrencies, lCurrID As Long
'g_cMetadata is a previously set HsvMetadata object reference
Set cCurrencies = g_cMetadata.Currencies
lCurrID = cCurrencies.GetCurrencyID(sCurr)
getCurrencyScale = cCurrencies.GetScale(lCurrID)
End Function