Глюки SP3. Журнал инвентаризации

[maxsmirnov]

История одного глюка

1. Глюк, каким он стал в Ах 3.0. SP3
2. История глюка в подробностях
3. Как лечить

1. При успешной разноске журнала инвентаризации, в котором есть более одной строки с одинаковой номенклатурой, эта номенклатура не разблокируется. В InventItemLocation остается выставленной галка CountingStarted, и в последствии при любых операциях с этой номенклатурой выдается ошибка "Номенклатура '%1' блокирована на складе '%2', так как она находится в процессе инвентаризации.", хотя в процессе инвентаризации она вовсе не находится.

Сразу оговорюсь, что мы ставили SP3 на SP1, минуя SP2, т.е. м.б этот глюк появился в SP2.

2. вот такой код и по сей день можно увидеть в слое sys таблицы InventItemLocation

PHP код:

static server void updateStopCountingJournal(InventJournalTrans inventJournalTrans)

...

while select otherTrans
where otherTrans.journalId      == inventJournalTrans.journalId     &&
otherTrans.itemId         == inventJournalTrans.itemId        &&
otherTrans.recId          != otherTrans.recId
{
    otherInventItemLocation  = InventItemLocation::find(inventJournalTrans.itemId, otherTrans.inventDimId);
    if (otherInventItemLocation.recId == inventItemLocation.recId)
    {
        doStop = false; //не снимать галку CountingStarted
        break;
    }
} 


легко заметить в эту выборку никогда ничего не попадало, т.к условие otherTrans.recId != otherTrans.recId всегда ложно
но замысел был, видимо, такой:
если в журнале есть несколько строк одной номенклатуры и одинаковым inventDimId (важно: не просто одинаковым inventDimId, а таким inventDimId который есть в InventItemLocation для этой номенклатуры. Если в InventItemLocation как обычно одинокая строка с inventDimId == "Axapta", то это условие упрощается до "если в журнале есть несколько строк одной номенклатуры"), то снимать галочку (единственную на все строки) нужно только тогда, когда будет разнесена последняя из строк.

в SP3 (или SP2? см. выше) он перекрыт слоем syp:

PHP код:

while select otherTrans
where otherTrans.journalId      == inventJournalTrans.journalId     &&
otherTrans.itemId         == inventJournalTrans.itemId        &&
otherTrans.recId          != inventJournalTrans.recId
{
    otherInventItemLocation  = InventItemLocation::find(inventJournalTrans.itemId, otherTrans.inventDimId);
    if (otherInventItemLocation.recId == inventItemLocation.recId)
    {
        doStop = false;
        break;
    }
} 


теперь глюк и приобрел свои современные свойства - галочка CountingStarted вообще не снимается, если в журнале инвентаризации две строки с одинаковой номенклатурой, а в inventItemLocation только одна строка

3. Как лечить.
Например, можно после разноски всего журнала проверять inventItemLocation.

в JournalCheckPost:

PHP код:

void run()
{
InventItemLocation  InventItemLocation;

... разноска

// и перед ttscommit:
if ( JournalTableData.journalTable().Posted == NoYes::Yes
    && InventJournalTable::find(this.parmJournalId()).JournalType == InventJournalType::Count)
{
    while select forupdate InventItemLocation
    where InventItemLocation.CountingStarted == NoYes::Yes
       && InventItemLocation.CountingJournalId == this.parmJournalId()
    {
        InventItemLocation.CountingStarted = NoYes::No;
        InventItemLocation.update();
    }
}

ttscommit; 


[Atar]

Вот уж SP4 скоро канет в лету, SP5 кое где есть, а воз и ныне там...

[Vadik]

Цитата:

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

Вот уж SP4 скоро канет в лету, SP5 кое где есть, а воз и ныне там...

В SP6 исправят (обещали). Партнеры в принципе могут пока с MBS заплатку стрясти, но самим исправить, как часто бывает, и быстрее и проще