Ошибка суммы!!!

[JohnK]

Есть 20-30 чисел, хранятся в БД.
dim Sum as Currency
Считываю, суммирую и вывожу Format(Sum,"0.00")

Иногда выдает сумму отличную на 0,02 - 0,03 сотых!
ВОПРОС. Как этого избежать так как речь идет о бухгалтерии.

[codemaster]

Есть 20-30 чисел, хранятся в БД.
dim Sum as Currency
Считываю, суммирую и вывожу Format(Sum,"0.00")

Иногда выдает сумму отличную на 0,02 - 0,03 сотых!
ВОПРОС. Как этого избежать так как речь идет о бухгалтерии.

Тип поля БД? Как суммируешь ?

[Shurrik]

Если программа для бухгалтерии, то рационально хранить суммы в копейках (длинное целое), тогда любые вычисления автоматически будут округляться, а при выводе раздели сумму на 100.

[alibek]

Не логично.
Логично не изобретать велосипед, а использовать тип данных Currency (в DAO dbCurrency, в ADO adCurrency).

[codemaster]

Не логично.
Логично не изобретать велосипед, а использовать тип данных Currency (в DAO dbCurrency, в ADO adCurrency).

Вполне логично если система обработки распределенная
и разношерстная. Например
в одном уважаемом немецком банке часть инф. системы
крутится под Mainframe от IBM "суммы" действительно
пишутся в виде целых центов
сделано это из соображений производительности

[alibek]

В таком случае банк мухлюет
В Currency отображается два знака после запятой, но расчеты ведутся с точностью до 4 знаков после запятой (т.е. до сотых цента/копейки). А если все считать в целых центах, то ошибки округления будут выходить немаленькие. Для крупного банка дневной оборот в три-четыре сотни тысяч евро вполне обыденен, а это 30000000-40000000 евроцентов. Пусть банк берет себе только половину от ошибок округления, это получается несколько сотен евро в день. И это только в одном банке (отделении).

[codemaster]

В таком случае банк мухлюет
В Currency отображается два знака после запятой, но расчеты ведутся с точностью до 4 знаков после запятой (т.е. до сотых цента/копейки).

Показал шефу. Он с перепугу решил даже закрывать счет в DB и преводить деньги в росс. банк.

Ну и где ведутся расчеты с клиентами
с точностью до 4 знаков после запятой (т.е. до сотых цента/копейки) Я идиот! Убейте меня, кто-нибудь! [/b]

[alibek]

Бедный шеф
Нет, как считает банк это вопрос иной. Другое дело, что если банк все-же захочет вести расчеты с максимальной точностью, то на базе Currency это возможно, а на базе Integer не получится (или придется считать не в центах, а в сотых центов и делить на 10000).

[Ennor]

Ага, что по своей сути аналогично тому же Currency. А насчет производительности - этот тип никогда и не был типом с плавающей запятой, это тип с фиксированной запятой. Так что реально там все хранится в виде, характерном для целых типов, и только при вычислениях "вспоминается", что надо делить на 10 000. Кроме того, в нем 8 байт, а не 4.

[JohnK]

Использовал Currency,
не то.


А как насчет Round?