The daily Axapta WTF

[S.Kuskov]

Цитата:

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

Некомпилирующийся код не станет компилироваться от того, что его поставят под условие "if (0)".

Именно так. Но теоретически можно представить представить себе ситуацию когда не содержащий ошибок компиляции код таким образом скрывается от выполнения, но не скрывается от компиляции. Например, для того что бы работали перекрестные ссылки, или просто чтобы бы при очередной компиляции проверять не появились ли ошибки в этом коде, связанные с изменениями в других объектах.

[RVS]

Дивный код попался...

    TNow=TimeNow();
    super();
    switch(true)
    {

        case (23*3600 + 55*60 <tnow ):
            infolog.shutDown(true);
            return;
        break;
    }

... из рабочей Аксы.. она там вся почти такая. И ведь - все-таки работает ))

[Stitch_MS]

Коллега нашел: AX 2012 CU5, \Classes\RunBaseBatch\canGoBatch

/// <summary>
///    Returns false
/// </summary>
/// <returns>
///    false
/// </returns>
/// <remarks>
///    This method must be in this class because it is called from the dialogRunbase class.
/// </remarks>
/*MAN
The method must return false when the class is not batchable.
*/
public boolean canGoBatch()
{
    return true;
}

[user_ax]

Цитата:

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

Коллега нашел: AX 2012 CU5, \Classes\RunBaseBatch\canGoBatch

Спасибо, кэп

[lvan]

небось индусам отдавали на аутсорс комменты писать

[EVGL]

В последнее время много приходится работать с шаблонами Sure Step. Русская версия с руководством для руководителя проекта вызывает восторг, просто по полу катался:

Цитата:

Работа, связанная с любым изменением, начинается только после согласования расчетной стоимости и воздействия изменения на график посредством подписания рукописной формы запроса на изменение назначенными менеджерами проекта обеих сторон.

... подписание желательно кровью.

[belugin]

А мне стиль напомнил http://m.youtube.com/watch?v=e-qDHM0...%3De-qDHM0slB0

[kashperuk]

 .....
        catch (Exception::DuplicateKeyException)
        {
            // Prevent an endless loop
            if (tryCount < 5)
            {
                retry;
            }
            else
            {
                throw Exception::DuplicateKeyExceptionNotRecovered;
            }
        }

Интересно, на что они надеются, вызывая здесь Retry?

[gl00mie]

Может быть, на то, что в это время в другой сессии кто-нить удалит запись с таким же набором значений полей, входящих в уникальные индексы

[Vadik]

Цитата:

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

Интересно, на что они надеются, вызывая здесь Retry?

Варианты

• Есть обработка дубликатов в catch секции
• Код вырван из контекста (приведен не полностью)
• Действительно ерунда

Так как SERIALIZABLE уровень изоляции не используется, даже при использовании конструкций вида

ttsbegin;

if (exists())
{
    doSomethingBeforeUpdate();
    update();
}
else
{    
    doSomethingBeforeInsert();
    insert();
}

ttscommit;

в Create / Update сценарии в принципе не исключен вариант создания дубликата другим процесом во время doSomethingBeforeInsert(), так что в следуюший retry блок пойдет по "правильной" (update) ветке. Ну а если количество таких "промахов" превышает пороговое значение (в этом случае - 5) - наверное есть какие-то проблемы с логикой и пора признаться - "не шмогла". Как-то так

[kashperuk]

Цитата:

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

Варианты

• Есть обработка дубликатов в catch секции
• Код вырван из контекста (приведен не полностью)
• Действительно ерунда

Так как SERIALIZABLE уровень изоляции не используется, даже при использовании конструкций вида

ttsbegin;

if (exists())
{
    doSomethingBeforeUpdate();
    update();
}
else
{    
    doSomethingBeforeInsert();
    insert();
}

ttscommit;

в Create / Update сценарии в принципе не исключен вариант создания дубликата другим процесом во время doSomethingBeforeInsert(), так что в следуюший retry блок пойдет по "правильной" (update) ветке. Ну а если количество таких "промахов" превышает пороговое значение (в этом случае - 5) - наверное есть какие-то проблемы с логикой и пора признаться - "не шмогла". Как-то так

Кстати там именно такого плана код был, насколько мне сказали сегодня. (код не мой, я просто разместил объяву )

[demoded]

обновление приложения слоем...

[gl00mie]

Приложение AX 2012 R2 CU7 (6.2.1000.4051), при активации ключа Retail на формах заказов на продажу и заказов на покупку появляется кнопка "Добавить продукты", открывающая форму создания и изменения строк заказа на основе продуктов с возможностью фильтрации последних по каталогу. Там используется времяночка TmpRetailProductsToAdd, по данным которой при закрытии формы собственно создаются и изменияются строки заказа. Разработчикам пришло в голову, что пользователи могут на этой форме поменять не только количество, но и аналитики хранения/отслеживания номенклатуры, поэтому они завели "фиктивный" FormDS на базе InventDim (разумеется, запретив сохранять что-либо через него), а на сохранение времяночки повесили такой чудо-код (\Forms\RetailAddItems\Data Sources\TmpInventTable\Methods\write):

public void write()
{
    InventDim   inventDimLocal;

    inventDimLocal.ConfigId         = inventDim.ConfigId;
    inventDimLocal.InventColorId    = inventDim.InventColorId;
    inventDimLocal.InventSizeId     = inventDim.InventSizeId;
    inventDimLocal.InventStyleId    = inventDim.InventStyleId;
    inventDimLocal.InventSiteId     = inventDim.InventSiteId;
    inventDimLocal.InventLocationId = inventDim.InventLocationId;
    inventDimLocal.InventBatchId    = inventDim.InventBatchId;
    inventDimLocal.wmsLocationId    = inventDim.wmsLocationId;
    inventDimLocal.wmsPalletId      = inventDim.wmsPalletId;
    inventDimLocal.inventSerialId   = InventDim.inventSerialId;
  
    tmpInventTable.InventDim = InventDim::findOrCreate(inventDimLocal).InventDimId;

    super();
}

Разумеется, им было невдомек, что локализаторы в других странах, да и просто внедренцы нет-нет да и добавляют новые аналитики в InventDim

[gl00mie]

Приложение AX 2012 R2 CU7 (6.2.1000.4051), интересно, при каком параде планет здесь должен будет отработать бразильский функционал?..
\Data Dictionary\Tables\InventTransferTable\Methods\Update

// <GEERU>
public void update()
{
    #ISOCountryRegionCodes
    if (SysCountryRegionCode::isLegalEntityInCountryRegion([#isoRU]))
    {
        ttsbegin;
        this.setInventProfileId_RU();
        this.setInventProfileIdTo_RU();
        this.updateLinesInventProfile_RU();
        super();
        // <GBR>
        if (BrazilParameters::isEnabled())
        {
            this.SysExtensionSerializerMap::postUpdate();
        }
        // </GBR>
        ttscommit;
    }
    else
    {
        super();
    }
}
// </GEERU>

\Data Dictionary\Tables\BrazilParameters\Methods\isEnabled

public static boolean isEnabled()
{
    #ISOCountryRegionCodes
    return SysCountryRegionCode::isLegalEntityInCountryRegion([#isoBR]);
}

[EVGL]

Каждый раз, когда в русской компании натыкаешься на эти пункты меню, это вызывает неподдельное веселье аудитории. Нравится глубина проработки этой важной для страны темы: целый подмодуль "Alcohol*", включая журнал ежедневного потребления Alcohol Daily Journal, полная интеграция.

[Ivanhoe]

Угу, только участникам рынка и автоматизаторам (конечным) не смешно Есть слухи, что надо будет каждую продажу сразу регистрировать в единой гос. БД.

[kashperuk]

Цитата:

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

Приложение AX 2012 R2 CU7 (6.2.1000.4051), интересно, при каком параде планет здесь должен будет отработать бразильский функционал?..
\Data Dictionary\Tables\InventTransferTable\Methods\Update

// <GEERU>
public void update()
{
    #ISOCountryRegionCodes
    if (SysCountryRegionCode::isLegalEntityInCountryRegion([#isoRU]))
    {
        ttsbegin;
        this.setInventProfileId_RU();
        this.setInventProfileIdTo_RU();
        this.updateLinesInventProfile_RU();
        super();
        // <GBR>
        if (BrazilParameters::isEnabled())
        {
            this.SysExtensionSerializerMap::postUpdate();
        }
        // </GBR>
        ttscommit;
    }
    else
    {
        super();
    }
}
// </GEERU>

\Data Dictionary\Tables\BrazilParameters\Methods\isEnabled

public static boolean isEnabled()
{
    #ISOCountryRegionCodes
    return SysCountryRegionCode::isLegalEntityInCountryRegion([#isoBR]);
}

В Бразилию сообщил, и уже сегодня пофиксили.

[Cardagant]

Доброго времени суток!

Наткнулся на мелкий баг, решил выложить, кто хочет, исправьте

Заглянул в DAX 2009, Axapta 3.0, код аналогичен. В 2012й похоже уже всё красиво.

Форма ProdParameters, метод numberSeqPostInit()

NumberSeqReference      numberSeqReferenceProd;
NumberSeqReference      numberSeqReferenceRoute;
;
numberSeqReferenceProd  = ProdParameters::numberSeqReference();
numberSeqReferenceRoute = RouteParameters::numberSeqReference(); // инициализуется класс обработчик номерной серии для маршрутов

numberSequenceReference_ds.object(fieldnum(NumberSequenceReference, AllowSameAs)).visible(
    numberSeqReferenceProd.sameAsActive() || numberSeqReferenceProd.sameAsActive()); // но здесь почему-то используется только экзменпляр Prod'а, а Route в проверке не участвует
ctrlLabelSameAs.visible(numberSeqReferenceProd.sameAsActive() || numberSeqReferenceProd.sameAsActive()); // и здесь тоже

[pedrozzz]

2012 R2 CU7
В классе RunBaseQuery_RU переменная queryrun объявлена, как SysQueryRun, но в методах самого класса она инициализируется, как QueryRun

protected final void initQueryRun()
{
    ...
    query       = this.initNewQuery();
    queryrun    = new QueryRun(query);
}

public boolean unpack(container packedClass)
{
    ...
            if (packedQuery)
            {
                queryrun = new QueryRun(packedQuery);
            }
    ...
}

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

queryrun = new SysQueryRun(...)

[SRF]

AX 2012 CU7, форма SalesCopying, метод CustInvoiceTrans\upDateRemainderCache, некорректный расчет ранее возвращенного кол-ва для заказов отгруженных через функционал отложенного перехода права собственности, также ошибка есть в случае использования функционала проектов.

void upDateRemainderCache(CustInvoiceTrans _custInvoiceTrans)
{
    SalesQty qty;
    PdsCWInventQty cwQty;
    SalesLine       localSalesLine;
    // <GEERU>
    GoodsInRouteInventTransIdDelivery_RU inventTransIdDelivery_RU;
    // </GEERU>

    if (!creditNoteReturnRemainder.exists(_custInvoiceTrans.RecId))
    {
        localSalesLine = SalesLine::find(_custInvoiceTrans.InventTransId);
        [qty, cwQty] = SalesLine::pdsRemainReturnLotQtyAllCreditNote(_custInvoiceTrans.InventTransId, localSalesLine.ProjId);
        // <GEERU>
        if (SysCountryRegionCode::isLegalEntityInCountryRegion([#isoRU]))
        {
            inventTransIdDelivery_RU = _custInvoiceTrans.custInvoiceTrans_RU().InventTransIdDelivery_RU;
        }
        if (inventTransIdDelivery_RU)
        {
            qty = UnitOfMeasureConverter::convert(-SalesLine::qtyDeliveryToCreditNote_RU(inventTransIdDelivery_RU),
                                                  UnitOfMeasure::unitOfMeasureIdBySymbol(_custInvoiceTrans.inventTable().inventUnitId()),
                                                  UnitOfMeasure::unitOfMeasureIdBySymbol(_custInvoiceTrans.SalesUnit),
                                                  NoYes::Yes,
                                                  InventTable::itemProduct(_custInvoiceTrans.ItemId));

            qty = localSalesLine.type().invoicedInTotal() - qty;
        }
        // </GEERU>
        creditNoteReturnRemainder.insert(_custInvoiceTrans.RecId, qty);
        cwCreditNoteReturnRemainder.insert(_custInvoiceTrans.RecId, cwQty);
    }
}

Вместо строки

 localSalesLine = SalesLine::find(_custInvoiceTrans.InventTransId);

нужно вставить

 localSalesLine = SalesLine::findInventTransId(_custInvoiceTrans.InventTransId);

Если провалится в метод SalesLine :: pdsRemainReturnLotQtyAllCreditNote, то там тоже можно увидеть аналогичную ошибку

public server static container pdsRemainReturnLotQtyAllCreditNote(
    InventTransId   _inventTransId,
    ProjId _projId = SalesLine::find(_inventTransId).ProjId)