标签：oid graph div run nal als cat nali hit
static void createTransferOrder(Args _args)
{
InventJournalTable journalTable;
InventJournalTrans journalTrans;
InventJournalTableData journalTableData;
InventJournalTransData journalTransData;
InventTable inventTable;
InventDim inventDim;
InventJournalCheckPost journalCheckPost = new InventJournalCheckPost();
;
journalTableData = JournalTableData::newTable(journalTable);
journalTransData = journalTableData.journalStatic().newJournalTransData(journalTrans, journalTableData);
// Init journalTable
journalTable.clear();
journalTable.JournalId = journalTableData.nextJournalId();
journalTable.JournalType = InventJournalType::Transfer;
journalTable.JournalNameId = journalTableData.journalStatic().standardJournalNameId(journalTable.JournalType);
journalTableData.initFromJournalName(journalTableData.journalStatic().findJournalName(journalTable.JournalNameId));
journalTrans.clear();
journalTransData.initFromJournalTable();
journalTrans.TransDate = systemdateget();
journalTrans.initFromInventTable(InventTable::find("bx1025-wrnp"));
journalTrans.Qty = 10;
inventDim.clear();
// inventDim.inventSiteId = ‘1‘;
inventDim.InventLocationId = ‘1‘;
journalTrans.InventDimId = InventDim::findOrCreate(inventDim).inventDimId;
inventDim.clear();
// inventDim.InventSiteId = ‘2‘;
inventDim.InventLocationId = ‘ship‘;
journalTrans.ToInventDimId = InventDim::findOrCreate(inventDim).inventDimId;
journalTransData.create();
journalTable.insert();
// post
// if (InventJournalCheckPost::newPostJournal(journalTable).validate())
// {
// inventJournalCheckPost::newPostJournal(journalTable).run();
// }
}
创建转移单并过帐 job
标签：oid graph div run nal als cat nali hit
原文地址：https://www.cnblogs.com/xtwkh1973/p/10993119.html
