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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method NewFolder ( 
 |    internal[GUIComponent] parent 
 |  ) as Bookmark id:Method_DialogCreateEditBookmark_NewFolder_672 
 |  { 
 |    #keys: '[130238.0.368191076]' 
 |    Body: 
 |    [* 
 |      // New bookmark 
 |       
 |      data := ScenarioManager.Bookmark( relshadow, Name := "" ); // Temporary set Name to empty, will be based on user defined value 
 |      ValueHolderIsFolder.Value( "True" ); 
 |      Dialog.Data( data ); 
 |       
 |      this.SetTitle( true ); 
 |       
 |      result := Dialog.DoModal( parent ); 
 |       
 |      bookmark := null( Bookmark ); 
 |       
 |      if( result > 0 ) 
 |      {    
 |        bookmark := Bookmark::Create( EditorName.Text(), 
 |                                      this.GetParentFolderName(), 
 |                                      ScenarioManager, 
 |                                      true ); 
 |      } 
 |       
 |      return bookmark; 
 |    *] 
 |  } 
 |  
  |