视图测试

hongjli

2023-09-22 469f7785b494d443fb533d5d14165e6c3e48a823

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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
Quintiq file version 2.0
#parent: #root
Method OnOK () id:Method_DialogCreateEditOperation_OnOK
{
  #keys: '[139394.0.1386371196]'
  Body:
  [*
    // On ok
    this.ApplyChanges();
    
    data := DataHolderDialogData.Data();
    // Special handle for lead time and lot size because they don't bind to the real attributes
    // we are about to update
    data.HasUserMaximumQuantity( CheckboxHasUserLotSize.Checked() and CheckboxHasUserMaximumQuantity.Checked() );
    if( CheckboxHasUserLotSize.Checked() )
    {
      data.UserMinimumQuantity( ApplicationMacroPlanner.FormatStringToReal( EditFieldUserMinimumQuantity.Text() ) );
      data.UserMaximumQuantity( ApplicationMacroPlanner.FormatStringToReal( EditFieldUserMaximumQuantity.Text() ) );
      data.UserLotSize( ApplicationMacroPlanner.FormatStringToReal( EditFieldUserLotSize.Text() ) );
    }
    
    // New
    if( isnull( data.WrappedInstance() ) )
    {
      data.Commit();
    }
    else if( DataHolderDialogDatas.Data().Size() =1 )
    {
      data.WrappedInstance().Update( DropDownListUnit.Data(),
                                     EditFieldID.Text(),
                                     data.Name(),
                                     data.RoutingStep(),
                                     data.UserLeadTime(),
                                     data.StandardDeviationLeadTimeOperation(),
                                     data.Throughput(),
                                     data.HasUserLotSize(),
                                     data.UserMinimumQuantity(),
                                     data.HasUserMaximumQuantity(),
                                     data.UserMaximumQuantity(),
                                     data.UserLotSize(),
                                     data.CO2Emission(),
                                     false /*isfromdb*/ );
    }
    else
    {
      Operation::Update( DataHolderDialogDatas.Data(),
                         data.Unit(),
                         EditFieldID.Text(),
                         data.Name(),
                         CheckBoxBatchEditLeadTime.Checked(),
                         data.UserLeadTime(),
                         CheckBoxBatchEditStandardDeviation.Checked(),
                         data.StandardDeviationLeadTimeOperation(),
                         CheckBoxBatchEditThroughput.Checked(),
                         data.Throughput(),
                         CheckBoxBatchEditHasUserLotSize.Checked(),
                         data.HasUserLotSize(),
                         data.UserMinimumQuantity(),
                         data.HasUserMaximumQuantity(),
                         data.UserMaximumQuantity(),
                         data.UserLotSize(),
                         CheckboxBatchCO2.Checked(),
                         data.CO2Emission() );
    }
    
    this.Close();
  *]
}