mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-05 06:36:55 +01:00
8 lines
270 B
AL
8 lines
270 B
AL
codeunit 50601 "Directed Rounding Bad"
|
|
{
|
|
procedure FloorAmount(Value: Decimal; Precision: Decimal): Decimal
|
|
begin
|
|
// For negative values, '<' rounds toward zero rather than toward negative infinity.
|
|
exit(Round(Value, Precision, '<'));
|
|
end;
|
|
}
|