AXForum  
Вернуться   AXForum > Прочие обсуждения > Курилка
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 13.07.2007, 11:47   #11  
EVGL is offline
EVGL
Banned
Соотечественники
Лучший по профессии 2017
Лучший по профессии 2015
Лучший по профессии 2014
 
4,445 / 3001 (0) ++++++++++
Регистрация: 09.07.2002
Адрес: Parndorf, AT
Похвально. У меня тоже вчера было какое-то особое настроение, так что для того вертикального решения, над которым я работаю в настоящий момент, я написал след. код:
X++:
// to cope with the apples and bananas problem
UnitQty addUnitQtyError(SPPProdUnitQtyMap _that)
{
    UnitQty qty;

    if (! _that.UnitQtyError)
        return 0;

    if (! this.UnitIdError)
        this.UnitIdError = _that.UnitIdError;
    if (! this.LanesNo)
       this.LanesNo      = _that.LanesNo;

    if (this.UnitIdError == _that.UnitIdError && this.LanesNo == _that.LanesNo) // ;-)
    {
        qty = _that.UnitQtyError;
    }
    else
    {
        qty = _that.UnitQtyError;

        if (_that.LanesNo && Unit::SPPisLengthUnit(_that.UnitIdError))
            qty = qty * _that.LanesNo; // ~ kg, m2, pcs

        if (this.LanesNo && Unit::SPPisLengthUnit(this.UnitIdError))
            qty = qty / this.LanesNo;  // ~ m

        // no conv. factor => throw error
        qty = UnitConvert::qty(qty, _that.UnitIdError, this.UnitIdError, this.prodTable().ItemId);
    }

    this.UnitQtyError += qty;

    return qty;
}

Последний раз редактировалось EVGL; 18.07.2007 в 12:39.
Теги
axapta, cil, d365fo, guid, rasset, uuid, uuidv7, баг

 


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 19:40.
Powered by vBulletin® v3.8.5. Перевод: zCarot
Контактная информация, Реклама.