[axalex]

Цитата:

Сообщение от AvrDen

Добрый день!
Периодически при разноске складских журналов возникает ошибка "Неправильное округление величины".
Ошибка возникает в InventJournalTrans/checkAmount

    if (this.CostAmount != Currency::amount(this.CostAmount))
        ok = checkFailed("@SYS2602");

В строке журнала поле CostAmount стоит сумма 8933,72
При этом в отладчике в поле CostAmount непонятно почему заносится очень странное значение(например 8933,719999999999), т.е. система не округлила сумму. При этом, если изменить в строке журнала сумму на 8933,73, то ошибка не возникает.

//исправление ошибки округления в складском журнале
static void InventJournalCostAmountRound(Args _args)
{
    InventJournalTrans  inventjournalTrans;
    InventJournalId     inventJournalId = "/*НОМЕР ЖУРНАЛА*/";
    ;

    ttsbegin;
    while select forupdate inventjournalTrans
        where inventjournalTrans.JournalId == inventJournalId
    {
        inventjournalTrans.CostAmount = Currency::amount(inventjournalTrans.CostAmount);
        inventjournalTrans.doUpdate();
    }
    ttscommit;
    info("Округление успешно");
}