yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
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 DeleteScenario (
  String scenarioname,
  output String feedback_o
)
{
  TextBody:
  [*
    // derred Nov-11-2014 (created)
    // DO NOT set LatestScenarioName directly as scenario creation might failed
    
    scenarioManager := this.ScenarioManager();
    scenario := select( scenarioManager, ScenarioNode.astype( ScenarioMP ), scenario, scenario.Name() = scenarioname );
    
    if( not isnull( scenario ) )
    {
      scenario.Delete();
    
      feedback_o := 'Delete Scenario: Scenario ' + scenarioname + ' has been deleted successfully';
    }
    else
    {
      feedback_o := "Delete Scenario: Scenario " + scenarioname + " does not exist";
    }
  *]
}