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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method EditCurrency ( 
 |    Currency_MP selection, 
 |    internal[GUIComponent] parent 
 |  ) id:Method_DialogCreateEditCurrency_EditCurrency 
 |  { 
 |    #keys: '[11660.0.354467903]' 
 |    Body: 
 |    [* 
 |      // Edit currency 
 |       
 |      data := shadow( selection ); 
 |       
 |      Dialog.Data( data ); 
 |      result := this.DoModal( parent ); 
 |       
 |      if ( result > 0 ) 
 |      { 
 |        selection.Update( EditorID.Text(), // ID is read only, the changes wont be applied 
 |                          data.Name(), 
 |                          data.Symbol(), 
 |                          data.IsBase(), 
 |                          false ); 
 |      } 
 |    *] 
 |  } 
 |  
  |