The daily Axapta WTF

[oip]

Действительно непорядок. Во-первых, константы вместо макросов, во-вторых, можно было switch...case использовать, ну а в-третьих, вдруг война? А в военное время и таблица умножения поменяться может. А значит надо делать таблицу параметров.

PS. А в Вене действительно замечательно. Только недавно оттуда вернулся.

[AndyD]

Хм. Какие кейсы?
Там все в одну строчку кода можно свести.

numofpage = (factorForSpoiling ? (factorForSpoiling - 1) : factorForSpoiling) div 18 + 1;

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

[oip]

А ЧЮ где?

[AndyD]

Ну, я в конце смайл, вроде бы, вставил

[gl00mie]

Интересный код обнаружился в Ax*-классах при доступе к полям-массивам: к примеру, в AxSalesTable, в методе dimensionElement() (для 3-ки) или же setDimensionElement() (для 4-ки и выше) вместо вроде бы очевидной конструкции

fieldId2Ext(fieldnum(SalesTable, Dimension), _array)

используется

new SysDictField(tablenum(SalesTable), fieldnum(SalesTable, Dimension), _array).id()

Кто виноват в использовании такого "оптимального" кода в 3-ке, выяснить не удалось, а в 4-ке виной тому автор класса AxGenerateAxBCClass, а именно его метода setDimensionElement() (метод setArrayElement() не лучше), где по каким-то причинам зашит такой шаблон для методов доступа к элементам полей-массивов.

[TasmanianDevil]

Класс RAssetDisposalValue.
Безобразная передача параметров при инициализации экземпляров RAssetSumCalc дожила c 3-ки до DAX2009

public server static RAssetAmount postValue(RAssetId         _assetId,
                                             RAssetPostValue  _postValue,
                                             RAssetAmount     _assetAmount    = 0,
                                             RAssetStandardId _assetStandardId,
                                             RAssetTransDate  _assetTransDate = systemdateget())
{
    RAssetSumCalc       rAssetSumTransThisYear,
                        rAssetSumTransPriorYear,
                        rAssetSumTransDate;
    RAssetTransDate     prior_Years,
                        this_Year;
    RAssetAmount        assetAmount;
    ;

    this_Year    = dateEndYr(systemdateget());
    prior_Years  = dateEndYr(prevyr(systemdateget()));


    rAssetSumTransThisYear  = RAssetSumCalc_Trans::newAssetPeriod(RAssetTable::find(_assetId).AccountNum,
                                                                  _assetStandardId,
                                                                  this_Year,
                                                                  prior_Years);

[kashperuk]

В 6ке им это придется пофиксить, так как компилироваться такое уже не будет

[EVGL]

Если хочется от души посмеяться, рекомендую простенькую таблицу CustClassificationGroup из AX2009, особенно ее [нигде не используемые] методы find(), exist(). Из серии "как сделать в слове еще четыре ошибки"; так и представляется индус из Мумбая, которому дали тестовое задание - создать таблицу.

[kashperuk]

Нуу, работать то будет. Чуть странно с concurrencyModel, первый раз такое видел в коде. А так - ну, подумаешь, indentation плохой.

[Vadik]

Цитата:

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

Нуу, работать то будет. Чуть странно с concurrencyModel, первый раз такое видел в коде. А так - ну, подумаешь, indentation плохой.

Там все чуть более запущено чем просто проблемы с отступами - обрати внимание на первичный ключ на табличке

[kashperuk]

Цитата:

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

Там все чуть более запущено чем просто проблемы с отступами - обрати внимание на первичный ключ на табличке

RecId. Но и поиск тоже по RecId. То есть с точки зрения моделирования данных - все ОК.
Другое дело, что в этой табличке надо бы еще другой уникальный индекс создать. Но видимо табличка так часто используется, что пока не понадобилось

[Vadik]

Цитата:

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

RecId. Но и поиск тоже по RecId. То есть с точки зрения моделирования данных - все ОК

Да как сказать.. И рядом с ОК не стояло, если честно - см. на EDT, связь с другими таблицами не по RecId, а по Code строится. Представь на секунду, что ты в запросе связываешь клиентов и группы классификации - что получится?

Цитата:

Другое дело, что в этой табличке надо бы еще другой уникальный индекс создать. Но видимо табличка так часто используется, что пока не понадобилось

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

Я в принципе догадываюсь, зачем эти неиспользуемые find() и exist() методы создавались - чтобы тупо пройти формальную проверку на их наличие. Вопрос в том, как такое сумели в SYS слой закоммитить и на кой ляд вводили разрекламированные юнит-тесты

[gl00mie]

AX 2009 SP1 RU5, \Macros\SQLFormatting - вот и пользуйся после этого стандартными макросами

#define.SQLfrom('FROM')
#define.SQLOr('FROM')
#define.SQLAnd('AND')
#define.SQLNot('NOT')
#define.SQLOrder('ORDER')
#define.SQLBY('GROUP')

[a33ik]

Цитата:

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

actorForSpoiling = prodTableRun.QtySched / InventTableRun.qtyPerLayer / prodTableRun.MEM_NumOfLanes;
 numofpage = 1;
 if (factorForSpoiling > 198)
  numofpage = 12;
 else if (factorForSpoiling > 180)
  numofpage = 11;
 else if (factorForSpoiling > 162)
  numofpage = 10;
 else if (factorForSpoiling > 144)
  numofpage = 9;
 else if (factorForSpoiling > 126)
  numofpage = 8;
 else if (factorForSpoiling > 108)
  numofpage = 7;
 else if (factorForSpoiling > 90)
  numofpage = 6;
 else if (factorForSpoiling > 72)
  numofpage = 5;
 else if (factorForSpoiling > 54)
  numofpage = 4;
 else if (factorForSpoiling > 36)
  numofpage = 3;
 else if (factorForSpoiling > 18)
  numofpage = 2;

Цитата:

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

numofpage = (factorForSpoiling ? (factorForSpoiling - 1) : factorForSpoiling) div 18 + 1;

У меня нет знаний по аксапте и X++, но (по моему мнению) результаты работы при factorForSpoiling большем чем 215 будут разниться для приведённых участков кода...

[EVGL]

Цитата:

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

У меня нет знаний по аксапте и X++, но (по моему мнению) результаты работы при factorForSpoiling большем чем 215 будут разниться для приведённых участков кода...

Автор исходного кода не предполагал factorForSpoiling > 215. Речь идет, насколько я понимаю, о продольной резке полотна. По моим ощущениям больше 100 ножей не ставят.

[AndyD]

Предположил, что расписывать на 13 и больше страниц коллега (или не коллега) EVGL уже не осилил
Но вы правы. Для полноты соответствия, надо еще проверку на больше 12 вставить. Можно и одной строкой

PS Хотя, как выяснилось, речь шла вообще о другом

[TasmanianDevil]

DAX2009, формы строк журналов ГК, переопределенные validate'ы и modified'ы - часто используются в анализе содержимого полей подобные конструкции :

if (ledgerJournalTrans_ds.object(fieldnum(LedgerJournalTrans, AccountNum)).getValue()!="")

вместо нормального и привычного

if (ledgerJournalTrans.AccountNum)

Это какое-то новое мощное колдунство по новым технологиям DAX2009, индусский стиль или просто MBS перевел своих кодеров на посимвольную оплату труда ?

[kashperuk]

Однозначно индусский стиль

[TasmanianDevil]

Там же, в LedgerJournalTransDaily на источнике данных LedgerJournalTrans ...
Метод active() постоянно вызывает метод setFurtherPostingProtection(), который меняет возможность редактирования 7 полей (тип счета и счет, тип корр.счета и коррсчет, суммы дебет/кредит и валюту) по факту заполненности полей FurtherPostingType и FurtherPostingRecId. Вот как это делает наш неизвестный герой:

void setFurtherPostingProtection()
{
    int i;
    DictTable       dictTable = new DictTable(ledgerJournalTrans.TableId);
    FormDataObject  objectLedgerJournalTrans;
    boolean         preventEdit;
    ;

    preventEdit = ledgerJournalTrans.FurtherPostingType && ledgerJournalTrans.FurtherPostingRecId;

    for (i = 1; i <= dictTable.fieldCnt(); i++)
    {
        objectLedgerJournalTrans = ledgerJournalTrans_ds.object(dictTable.fieldCnt2Id(i));
        if (objectLedgerJournalTrans)
        {
            if (preventEdit)
            {
                switch (dictTable.fieldCnt2Id(i))
                {
                    case fieldnum(LedgerJournalTrans, AccountType),
                         fieldnum(LedgerJournalTrans, AccountNum),
                         fieldnum(LedgerJournalTrans, OffsetAccountType),
                         fieldnum(LedgerJournalTrans, OffsetAccount),
                         fieldnum(LedgerJournalTrans, AmountCurDebit),
                         fieldnum(LedgerJournalTrans, AmountCurCredit),
                         fieldnum(LedgerJournalTrans, CurrencyCode)  :
                        objectLedgerJournalTrans.allowEdit(false);
                        break;
                    default :
                        objectLedgerJournalTrans.allowEdit(true);
                }
            }
            else
            {
                objectLedgerJournalTrans.allowEdit(true);
            }
        }
    }
}

Это SYS-слой...
Есть мнение, что за такое в таком месте - надо бить ...
Наверное даже ногами и наверное даже по голове ...

[Vadik]

Цитата:

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

Однозначно индусский стиль

И кто ж, как и на что их (вне привязки к национальности - скажем, "этих людей") в таком случае тестирует при найме (помню ты рассказывал как валят кандидатов не умеющих генерировать качественный (с) код). И через скольких (в среднем) людей проходит код перед тем как попадет в релиз? Если конечно это не секрет
P.S. Я не ерничаю, просто наблюдаю какой-то непонятный процесс (вернее, два - набор персонала и процесс проверки кода при переносе в релиз) и хочется разобраться