Kevin Kok Khah Whey
2023-09-25 34d29be6a3eb0c025da50b77f2107c4ad259c6c0
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
Quintiq file version 2.0
#parent: #root
Method OnOk () id:Method_DialogCreateEditCampaignType_OnOk
{
  #keys: '[139394.0.1555032668]'
  Body:
  [*
    // On ok
    this.ApplyChanges();
    
    data := DataHolderDialogData.Data();
    
    // Manually ApplyChanges for HasInputMaxQuantity and HasInputMaxDuration
    data.HasInputMaxQuantity( EditFieldDefaultMaxQty.ActionLinkText() = Translations::MP_WebDesigner_Disable() );
    data.HasInputMaxDuration( DurationSelectorMaxDuration.ActionLinkText() = Translations::MP_WebDesigner_Disable() );
      
    // New
    if( isnull( data.WrappedInstance() ) )
    {
      newcampaigntype := CampaignType_MP::Create( DropDownListUnit.Data(),
                                                  EditFieldName.Text(),
                                                  data.DefaultMinQuantity(),
                                                  data.DefaultMaxQuantity(),
                                                  data.DefaultMinDuration(),
                                                  data.DefaultMaxDuration(),
                                                  ColorSelectorColor.Color(),
                                                  data.HasInputMaxQuantity() and RadioButtonGroupQuantityDuration.BoundValue() = GlobalParameters_MP::GetCampaignTransitionsTypeQuantity(),
                                                  data.HasInputMaxDuration() and RadioButtonGroupQuantityDuration.BoundValue() = GlobalParameters_MP::GetCampaignTransitionsTypeDuration(),
                                                  false /*isfromdb*/ );
        
      // Access form, select the new campaign type
      DataHolderForm.Data().ListCampaignType().SelectByKey( newcampaigntype.Key() );
    }
    else
    {
      data.WrappedInstance().Update( data.Unit(),
                                     EditFieldName.Text(), // Read-only, apply changes to shadow is not taking place for read-only attribute when editing
                                     RadioButtonGroupQuantityDuration.BoundValue(),
                                     data.DefaultMinQuantity(),
                                     data.DefaultMaxQuantity(),
                                     data.DefaultMinDuration(),
                                     data.DefaultMaxDuration(),
                                     ColorSelectorColor.Color(),
                                     data.HasInputMaxQuantity() and RadioButtonGroupQuantityDuration.BoundValue() = GlobalParameters_MP::GetCampaignTransitionsTypeQuantity(),
                                     data.HasInputMaxDuration() and RadioButtonGroupQuantityDuration.BoundValue() = GlobalParameters_MP::GetCampaignTransitionsTypeDuration(),
                                     false /*isfromdb*/ );                               
    }
    this.Close();
  *]
}