陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Quintiq file version 2.0
#parent: #root
StaticMethod MenuNew (
  LibUTF_IterationRun run,
  MacroPlan macroplan,
  NamedValueTree nvt_customerorder
) as CustomerOrder
{
  TextBody:
  [*
    dto := DTO_CustomerOrder::ConstructNew( run, nvt_customerorder );
    
    product := macroplan.FindProduct( dto.ProductID() );
    stockingpoint := macroplan.FindStockingPoint( dto.StockingPointID() );
    
    customerorder := CustomerOrder::Create( product, stockingpoint, dto.ID(), dto.StartDate(), dto.Quantity(), dto.Price(),
                                            dto.PriorityName(), dto.SalesSegmentName(), dto.CurrencyID(), dto.UnitOfMeasureName(), dto.IsExcludedFromFulfillmentKPIUser(), 
                                            "", "", "", "", dto.IsEligibleForNetting(), 
                                            dto.IsFirmed(),  false )   
    return customerorder;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}