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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method NewAccount ( 
 |    internal[GUIComponent] parent, 
 |    Account parentaccount 
 |  ) as Account id:Method_ScenarioManager_DialogCreateEditAccount_NewAccount 
 |  { 
 |    #keys: '[11660.0.354467735]' 
 |    Body: 
 |    [* 
 |      // New account 
 |       
 |      data := ScenarioManager.KPI( relshadow,  
 |                                   Account, AsSortedAccount := ScenarioManager, 
 |                                   Name := '' ); 
 |      Dialog.ShowHideComponentForBatchEdit( false, true ); 
 |      data.Parent( relset, parentaccount ); 
 |       
 |      Dialog.Data( data ); 
 |      result := this.DoModal( parent ); 
 |       
 |      if( result > 0 ) 
 |      { 
 |        data.Commit(); 
 |      } 
 |       
 |      return data.WrappedInstance(); 
 |    *] 
 |  } 
 |  
  |