{
PurchReqTable purchReqTable;
PurchReqLine purchReqLine.;
purchReqTable.clear();
purchReqTable.initValue();
purchReqTable.PurchReqId = NumberSeq::newGetNum(PurchReqTable::numRefPurchReqId()).num();
purchReqTable.PurchReqName = 'Requisition';
purchReqTable.insert();
purchReqLine.clear();
purchReqLine.initValue();
purchReqLine.InventDimId = 'Dim-0001';
purchReqLine.LineNum = 1;
purchReqLine.initFromPurchReqTable(purchReqTable);
purchReqLine.ItemId = 'Test-001';
purchReqLine.BuyingLegalEntity = CompanyInfo::find().RecId;
purchReqLine.InventDimIdDataArea = curext();
purchReqLine.PurchQty = 2;
purchReqLine.modifiedField(fieldNum(purchReqLine,ItemId));
purchReqLine.insert();
}
No comments:
Post a Comment