Запрос

[skazochnik]

Запрос победил.
Кому интересно

ttsbegin;
while select inventDim
where inventDim.InventLocationId == 'SKLAD1'
{
while select inventSum
where inventSum.InventDimId == inventDim.inventDimId
{
inventJournalTrans.JournalId = inventJournalTable.JournalId;
inventJournalTrans.JournalType = InventJournalType::Transfer;
inventJournalTrans.TransDate = systemdateget();
info(inventSum.ItemId);
inventJournalTrans.ItemId = inventSum.ItemId;
inventJournalTrans.inventDimId = inventSum.InventDimId;
inventJournalTrans.ToInventDimId = inventSum.InventDimId;
inventJournalTrans.Qty = -(inventSum.PhysicalInvent);
inventJournalTrans.CostPrice = inventSum.PostedValue;
inventJournalTrans.lineNum = InventJournalTrans::lastLineNum(inventJournalTrans.journalId) + 1;
inventJournalTrans.insert(NoYes::Yes);

}
//inventJournalTrans.insert(NoYes::Yes);
}

ttscommit;

едиственное Но
Как можно обойти такую фишку
"Складская аналитика 'Из' и 'На' должны отличаться"
тоесть у меня ИЗсклада = склад1 и НА склад = склад1,

[S.Kuskov]

Ну вы и вопросы формулируете.

Цитата:

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

едиственное Но
Как можно обойти такую фишку
"Складская аналитика 'Из' и 'На' должны отличаться"
тоесть у меня ИЗсклада = склад1 и НА склад = склад1,

Если все остальные складские аналитики не нужны (нужен только склад), то

ToInventDimId = InventDim::findOrCreateInventLocationId("НА склад").InventDimId;

А если нужно сохранить другие аналитики, то вот так

InventDimTo = InventDim::find(inventSum.InventDimId);
InventDimTo.InventLocationId = "НА склад";
// здесь также можно поменять ещё какието аналитики
ToInventDimId = InventDim::findOrCreate(InventDimTo).InventDimId;

[Wamr]

Цитата:

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

Запрос победил.
Кому интересно
...

Да Вы, батенька, тролль.
Давайте теперь устроим соревнование, кто больше замечаний напишет к приведенному коду

[skazochnik]

Цитата:

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

Да Вы, батенька, тролль.
Давайте теперь устроим соревнование, кто больше замечаний напишет к приведенному коду

Почти Троль
Пишите очень даже интересно

[ice]

Цитата:

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

Запрос победил.
Кому интересно

ttsbegin;
while select inventDim
where inventDim.InventLocationId == 'SKLAD1'
{
while select inventSum
where inventSum.InventDimId == inventDim.inventDimId
{
inventJournalTrans.JournalId = inventJournalTable.JournalId;
inventJournalTrans.JournalType = InventJournalType::Transfer;
inventJournalTrans.TransDate = systemdateget();
info(inventSum.ItemId);
inventJournalTrans.ItemId = inventSum.ItemId;
inventJournalTrans.inventDimId = inventSum.InventDimId;
inventJournalTrans.ToInventDimId = inventSum.InventDimId;
inventJournalTrans.Qty = -(inventSum.PhysicalInvent);
inventJournalTrans.CostPrice = inventSum.PostedValue;
inventJournalTrans.lineNum = InventJournalTrans::lastLineNum(inventJournalTrans.journalId) + 1;
inventJournalTrans.insert(NoYes::Yes);

}
//inventJournalTrans.insert(NoYes::Yes);
}

ttscommit;

едиственное Но
Как можно обойти такую фишку
"Складская аналитика 'Из' и 'На' должны отличаться"
тоесть у меня ИЗсклада = склад1 и НА склад = склад1,

по коду:ни в коем случае так не делайте!!!

в inventsum нет ни ИЗ ни НА, там содержатся остатки товара в разрезе аналитик.

PS Читайте документацию