The daily Axapta WTF

[EVGL]

Цитата:

Да. Но есть одно "но". В этом методе и без того 1246 строк .

Да уж, "цирконовцы" далеки от того, чтобы писать краткий и выразительный код.

[belugin]

При попытке удаления почтового ящика посредством CDOEXM

[EVGL]

[glibs]

aEremenko: DEP порождает ошибки компиляции в DAX 3.0

[EVGL]

Да-да. Только это была DAX 4.0, что нетрудно видеть по иконке. В общем, когда клиент в очередной раз "обвалился", Windows причислила Аксапту к полку вредоносных программ. А чем не "угроза"? Еще какая!

[glibs]

Цитата:

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

...
Только это была DAX 4.0
...

Ну и что? Можно подумать ее от версии к версии на корню переписывают...

[EVGL]

public void insert()
{
    this.calcCrediting();
 
    ttsBegin;
 
    super();

    if (this.furtherPostingType)
    {
        LedgerTransFurtherPosting::createFurtherPosting(this);
    }
    //CsGy 07.02.05. FLXMPFlexHungary
    if (isConfigurationkeyEnabled(configurationkeynum(FLXMPFlexHungary)))
        this.SFHAccountNumHU = LedgerTable::find(this.AccountNum).SFHAccountNumHU;
 
    ttsCommit;
}

[TasmanianDevil]

Интересный такой венгерский LedgerTrans.insert()
Абсолютно ненужное поле плюс нерабочий способ его простановки(отобразится при вставке, пропадет при перечитывании данных).

Нормальна ! (DJ Maкс, "День радио")

[malex]

ProdRouteType.update (на слое sys)

    if (0)
    {
        if  (prodRoute.BackorderStatus != prodRoute_Orig.BackorderStatus)
        {
            prodTable= prodRoute.prodTable(true);
            prodTable.status().setBackStatus();
            prodTable.doUpdate();
        }
    }

[sparur]

еще вот озадачило:

if ((((rowNumber - #maxRowsFirst) mod #maxRows) < #maxRows) && (pageNumber > 1))
{
...
}

Это из печати Табеля учета рабочего времени(Если кто не догадался)

[Jabberwocky]

Недавно на форуме поднималась тема об особенностях "индусского" кода, смею заверить, иной "канадский" код ничем не лучше... Наткнулся на образчик творчества, на этот раз это release update script:

update_recordset pdsRebateTable
    setting CustInvoiceTransRefRecId = pdsRebateTable.DEL_CustInvoiceTransRefRecId
       where   pdsRebateTable.DEL_CustInvoiceTransRefRecId;

[HorrR]

Длина названия метода в АХ ограничена 40ка символами, длина поля тоже 40ка. Методом тыка определил, что компиль аксапты очень просто определяет, есть ли парм-метод на AxBc классе - просто проверяет, есть ли в классе метод с названием: "parm"+имя поля. Вот и всё!!! И даже если тело метода поля не касается, компилю по барабану и наоборот, если даже метод правильный: возвращает и устанавливает значение нужного поля, но название у него не вышеупомянутое "parm"+имя поля - выдает BP. И вот тут же появилась мысль, а что будет, если имя поля будет больше 36ти символов? То есть метод с названием "parm"+название поле создать нельзя будет. И тут собсна и зарыто пасхальное яйцо. В таблице SalesTable есть стандартное поле InterCompanyAllowIndirectCreationOrig, метод в AxSalesTable как и предпологалось называется parmInterCompanyAllowIndirectCreationOri то есть без последней буквы в названии поля. А Аксапта хавает его!!! При этом если я создаю на своём классе подобный метод(без последней буквы в названии поля) - девиейшн конечно же присутствует. Вот такая маца, строки //BP deviation documented нигде не увидел, да и где она там может быть воткнута с другой стороны, так что каким образом сделано это исключение в одном экземпляре(хотя кто его знает, мож ещё такие поля есть ) - ХЗ. З.Ы В завершение вопрос: что мешало разработчикам Аксапты, ежели они поленились и не написали нормальный алгоритм распознавания парма и решили использовать фиксированый: "parm"+fieldname, сделать максимальную длину для названия метода на 4 символа больше, чем поля?

[HorrR]

И ещё один бок. Пощу отдельным сообщением, так как совершенно несвязаные вещи. Не знаю, может быть это многократно уже обсасывалось, но мне, как начинающем сразу попался в глаза тот факт, что в типизированную группу в проекте, куда нельзя поместить ни один обьект другого типа, запросто можно поместить вложенную групу с типом: олл и кидать в неё, что угодно. По-моему, это невероятно калично, до неприличия.

[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;

Остается только подчеркнуть: ребята и деачата, Австрии СРОЧНО нужны программисты!

[oip]

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

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

[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 ножей не ставят.

[Roman777]

Цитата:

Сообщение от 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;

Остается только подчеркнуть: ребята и деачата, Австрии СРОЧНО нужны программисты!

Может так:

    numofpage = trunc(((factorForSpoiling - 1) / 18) + 1);

?

[S.Kuskov]

Цитата:

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

Может так:

    numofpage = trunc(((factorForSpoiling - 1) / 18) + 1);

?

Я вместо trunc задействовал бы div

[AndyD]

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

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

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