1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method NewUnitOfMeasure ( 
 |    internal[GUIComponent] parent 
 |  ) as UnitOfMeasure_MP id:Method_DialogCreateEditUnitOfMeasure_NewUnitOfMeasure 
 |  { 
 |    #keys: '[11660.0.257212529]' 
 |    Body: 
 |    [* 
 |      // New unit of measurement 
 |      result := this.DoModal( parent ); 
 |      newobj := null( UnitOfMeasure_MP ); 
 |       
 |      if( result > 0 ) 
 |      { 
 |        newobj := UnitOfMeasure_MP::Create( MacroPlan, 
 |                                            EditorName.Text(), 
 |                                            false, 
 |                                            false ); 
 |      } 
 |       
 |      return newobj; 
 |    *] 
 |  } 
 |  
  |