IMath.RoundD

Fore Syntax

RoundD(Value: Decimal; Precision: Integer): Decimal;

Fore.NET Syntax

RoundD(Value: decimal; Precision: integer): decimal;

Parameters

Value. Rounded decimal high-precision number.

Precision. The number of decimal places, to which a number must be rounded.

Description

The RoundD method returns the result of rounding down a decimal high-precision number to the specified number of decimal places.

Comments

To define numbers of the Decimal type in the array, it is necessary to write the "m" character after the value of each number. For example: 0.001m.

If the number of decimal places is greater than 0, the number is rounded to the specified decimal places after the decimal separator.

If the number of decimal places is equal to 0, the number is rounded to the nearest integer.

If the number of decimal places is less than 0. the number is rounded to the left of the decimal separator.

Fore Example

To execute the example, add a link to the MathFin system assembly.

Sub UserProc;
Var
    r1, r2, r3, r4: Decimal;
Begin
    r1 := Math.RoundD(2.154956124m,1);
    Debug.WriteLine(r1);
    r2 := Math.RoundD(-50.654m,-2);
    Debug.WriteLine(r2);
    r3 := Math.RoundD(21.5m,-1);
    Debug.WriteLine(r3);
    r4 := Math.RoundD(-1.475m,2);
    Debug.WriteLine(r4);
End Sub UserProc;

After executing the example the console window displays rounding results:

A number and the number of decimal places are positive: 2.2
A number and the number of decimal places are negative: -100.
A number is positive and the number of decimal places is negative: 20
A number is negative and the number of decimal places is positive: -1.48.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.MathFin;
…
Public Shared Sub Main(Params: StartParams);
Var
    r1, r2, r3, r4: Decimal;
    Math: MathClass = New MathClass();
Begin
    r1 := Math.RoundD(2.154956124m,1);
    System.Diagnostics.Debug.WriteLine(r1);
    r2 := Math.RoundD(-50.654m,-2);
    System.Diagnostics.Debug.WriteLine(r2);
    r3 := Math.RoundD(21.5m,-1);
    System.Diagnostics.Debug.WriteLine(r3);
    r4 := Math.RoundD(-1.475m,2);
    System.Diagnostics.Debug.WriteLine(r4);
End Sub;