Показать сообщение отдельно
Старый 21.02.2007, 15:42   #6  
rkorchagin is offline
rkorchagin
Участник
 
81 / 69 (3) ++++
Регистрация: 26.09.2006
e@gle
Если честно я не знаю что ответить, я инициализирую новый planned order так и вроде всё в порядке:
Цитата:
reqPO.clear();
reqTrans.clear();

reqPlanId = reqPlanSched::defaultStaticId();
reqPlan = reqPlan::find(reqPlanId);
if (!reqPlan.RecId)
this.addError("@SYS28502",KRBErrorLevel::E2_Warning);

reqPO.ReqPlanId = reqPlanId;
reqPO.RefType = ReqRefType::ItemPlannedOrder;

reqPO.initFromItemId(ItemId);


reqPo.ReqDateDlv = systemDateGet();
reqPO.Qty = str2num(ReqQuantity);
reqPO.PurchQty = str2num(ReqQuantity);

inventDim.InventLocationId = Warehouse;
reqPO.CovInventDimId = InventDim::findOrCreate(inventDim).inventDimId;
reqPO.PurchUnit = inventTableModule::find(ItemId,moduleInventPurchSales::Invent).UnitId;

reqPO.AgrSalesTypeAdv = AgrSalesTypeAdv::Standard;

//overwrite if item already exists
//if (itemid == "10002266")
//breakpoint;


this.deleteExistingReqPO(reqPO);

ttsbegin;

reqPO.insert();
reqTrans.insertFromReqPo(reqPO);

ttscommit;
Eldar9x
на вкладке Filters ничего не включено.

Михаил Андреев
программируем для финов, не знаю зачем им это. Но должно работать