hongjli
2023-10-17 609d17f466b80466d7069871e54ec78542bcd991
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
Quintiq file version 2.0
#parent: pnlActions/btnOk
Response OnClick () id:Response_pnlActions_btnOk_OnClick
{
  #keys: '[414702.0.373821479]'
  DefinitionID: 'Responsedef_WebButton_OnClick'
  QuillAction
  {
    Body:
    [*
      Form.ApplyChanges();
      
      data := DataHolderDialogData.Data().WrappedInstance();
      if ( isnull( data ) ) {
        GlobalOTDSOP.CapacityAllocationResultsRuleConfiguration( relnew,
                                                                 PanelMaterialCode  := efPanelMaterialCode.Text(),
                                                                 ModuleMaterialCode := efModuleMaterialCode.Text(),
                                                                 Division           := efDivision.Text(),
                                                                 StockingPointID    := efStockingPointID.Text()
                                                                );
      } else {
        data.Delete();
        GlobalOTDSOP.CapacityAllocationResultsRuleConfiguration( relnew,
                                                                 PanelMaterialCode  := efPanelMaterialCode.Text(),
                                                                 ModuleMaterialCode := efModuleMaterialCode.Text(),
                                                                 Division           := efDivision.Text(),
                                                                 StockingPointID    := efStockingPointID.Text()
                                                                );
      }
      
      
      Form.Close();
    *]
    GroupServerCalls: false
  }
}