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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method OnOK () id:Method_DialogCreateEditOptimizerPuzzle_OnOK 
 |  { 
 |    #keys: '[146140.1.635854957]' 
 |    Body: 
 |    [* 
 |      // Clicks OK to save optimizer puzzle 
 |       
 |      wip := DataHolderOptimizerPuzzleWIP.Data(); 
 |       
 |      // Create 
 |      if( isnull( wip.OptimizerPuzzle() ) ) 
 |      { 
 |        OptimizerPuzzle::Create( MacroPlan,  
 |                                 EditFieldName.Text(), 
 |                                 EditFieldDescription.Text(), 
 |                                 false, // IsLastUsed 
 |                                 false, // isFromDB 
 |                                 wip ); 
 |      } 
 |      else 
 |      // Edit / Copy 
 |      { 
 |        wip.OptimizerPuzzle().Update( QuintiqUser::CurrentUser().Name(),  
 |                                      EditFieldName.Text(), 
 |                                      EditFieldDescription.Text(), 
 |                                      false ); // isFromDB  
 |       
 |      } 
 |       
 |      // Close dialog 
 |      this.Close(); 
 |    *] 
 |  } 
 |  
  |