hongji.li
2023-11-07 1a1ba3ad5ed9e4380185aa1ccad20204a0e5f115
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
Quintiq file version 2.0
#parent: #root
Method OnOk () id:Method_DialogCreateEditScenarioFolder_OnOk
{
  #keys: '[134266.1.2007934730]'
  Body:
  [*
    // Disabled button to prevent the possibility of multiple firing
    btnOK.Enabled( false, '' )
    
    // When the user clicks ok, 
    // we either create or edit the data
    this.ApplyChanges();
    
    data := DataHolderDialogData.Data();
    
    if( isnull( data.WrappedInstance() ) )
    {
      newfolder := ScenarioManager.CreateFolder( data.Parent().astype( ScenarioFolder ),
                                                 data.Name(),
                                                 data.Comment(),
                                                 ApplicationMacroPlanner.GetUserName() );
      
      // Access the form, select the new scenario folder
      DataHolderForm.Data().SelectFolder( newfolder );
    }
    else
    {
      data.Commit();
    }
    
    this.Close();
  *]
}