yanweiyuan3
2023-10-27 d1d15b61dfcf7fd0f800b32359f082cf580ed556
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Quintiq file version 2.0
#parent: #root
Method OnOk () id:Method_DialogCreateEditStockingCost_OnOk
{
  #keys: '[145730.0.2094046569]'
  Body:
  [*
    // When the user clicks ok, we either create or edit the data
    isFromDB := false; // Indicate not from DB
    btnOk.Enabled( false, '' )
    this.ApplyChanges();
    data := DataHolderDialogData.Data();
    
    // Boolean to edit specific field in batch edit only
    stockingPointCosts := StockingPointCost::CreateUpdate( DataHolderStockingPoint.Data(),
                                                           DataHolderDialogDatas.Data(),
                                                           data.Account_MP(),
                                                           data.CostDriver(),
                                                           data.Start(),
                                                           CheckboxBatchEditTimeUnit.Checked(), data.TimeUnit(),
                                                           CheckboxBatchEditLengthOfTime.Checked(), data.LengthOfTime(),
                                                           CheckboxBatchEditCost.Checked(), data.Cost(),
                                                           isFromDB );
    
    // Select object after create
    if( not isnull( DataHolderForm.Data() ) )
    {
      ApplicationMacroPlanner.SelectListObjects( DataHolderForm.Data().lsAccountCosts(), stockingPointCosts );
    }
    
    this.Close();
  *]
}