mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-05 06:36:55 +01:00
10 lines
289 B
AL
10 lines
289 B
AL
codeunit 50600 "Directed Rounding Good"
|
|
{
|
|
procedure RoundAmount(Value: Decimal; Precision: Decimal; IncreaseMagnitude: Boolean): Decimal
|
|
begin
|
|
if IncreaseMagnitude then
|
|
exit(Round(Value, Precision, '>'));
|
|
|
|
exit(Round(Value, Precision, '<'));
|
|
end;
|
|
}
|