Afrunding af kroner/øre

Jeg kan ikke Delphi, så du får noget pseudokode:

double Afrund(double value,int roundUp,double fraction){
  double remainder = value % fraction;
  if(remainder != 0){
    value = value - remainder + roundUp * fraction;
  }
  return value;
}

F.eks:
Afrund(123.44, 1, 0.25); //1 for at runde op
Afrund(123.44, 0, 0.25); //0 for at runde ned

/1

Mit forslag:

type
  UpOrDown = (Up, Down);

function MRound(amt : extended; mode : UpOrDown; scale : integer): extended;

var
  tmp : extended;

begin
  tmp := amt * (100 div scale);
  if mode = Up then
    MRound := ceil(tmp) / (100 div scale)
  else
    MRound := floor(tmp) / (100 div scale);
end;

Men men men.

Genrelt bør du aldrig gemme beløb i floating point typer !!

Hvad mener du med 'Genrelt bør du aldrig gemme beløb i floating point typer' ?
(jeg bruger Currency type når jeg henter og gemmer i databasen)

Jeg faldt senere over http://www.eksperten.dk/spm/825395

Men jeg har en mistanke om at der er et eller andet når man runder op til de helt store værdier - jeg tror der er sneget et 0 for meget på.

Currency er fixed point ikke floating point, så den bør være OK.

Så bare ret min extended til currency.

Grunden til at jeg bragte det på banen er at 123.44 er en floating point konstant ikke en currency konstant.

Jeg gemmer beløb i heltalsfelter ved at gemme værdien i ører. Når jeg gemmer, multipliceres der med 100 (12344) og når jeg skal læse divideres med 100 (-> 123.44). Der er selvfølgelig noget arbejde frem og tilbage og hvis Arne eller andre har kritik vil jeg gerne snylte lidt på Hugos spørgsmål og høre hvad det er.

Tilsvarende gemmer jeg tidsintervaller omregnet til minutter.

Det er helt fint. Det svarer stort set til hvad currency gør. currency er en 64 bit integer med implicit 4 decimaler. Om du bruger 32 bit integer og 2 decimaler eller 64 bit integer og 4 decimaler gør ikke nogen principiel forskel. 32 bit integer med 2 decimaler kan dog kun klare op til ca. 21 millioner kroner (og kan kun klare hele ører ikke 1/10 ører, men det er ikke noget problem i Danmark).

Men floating point duer ikke til beløb.

Floating point er fremragende til mål som har usikkerhed.

Din bogholder ser helt forkert ud i hovedet, hvis du siger at der er 1132.15 kroner +/- 0.001 krone i kassen.

Det er ligegyldigt om du har 49.5 km eller 49.5 km +/- 10 centimeter til og fra arbejde (det giver faktisk ingen mening, fordi usikkerheden på hvor du holder i indkørslen er større).

arne_V> jeg tror jeg vil prøve at anvende den med de +/- kroner når jeg snakker med min chef første gang her efter jul - han er revisor :-)  jeg tror også han kan præstere en spændende ansigtskulør hvis man siger sådan.

Arne. Tak for tippet om Currency - noget jeg ikke havde sat mit ordentlig ind i.

I øvrigt. Ser revisorer ikke altid forkerte ud i ansigtet?

og et svar fra mig