连续生产优化

admin

2024-10-22 ef42765827dbd7c60d23dffd9a5bd510d0d76617

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
35
36
37
38
39
40
41
42
43
44
45
Quintiq file version 2.0
#parent: #root
Method PTF_TestDuplicateScenario (
  output Real duration,
  output String response,
  String scenarioname,
  String newscenarioname
) as Boolean id:Method_LibPTF_pnlTestRunner_PTF_TestDuplicateScenario
{
  #keys: '[136682.0.314444051]'
  Body:
  [*
    issuccessful := false;
    
    scenario := select( ScenarioManager, ScenarioNode.astype( Scenario ), scenario, scenario.Name() = scenarioname );
    preconditionflag := not isnull(  scenario );
    
    if( preconditionflag )
    {
      startprecisionctr := OS::PrecisionCounter();
      dialog := construct( ScenarioManager_DialogCreateEditMPScenario );
      dialog.SetCopyData( scenario );
      dialog.EditorScenarioName().Text( newscenarioname );
      
      newscenario := dialog.CopyScenario( scenario,
                                          dialog.EditorScenarioName().Text(),
                                          dialog.EditorAssumption().Text(),
                                          dialog.EditorComment().Text(),
                                          dialog.RadioButtonGroupStorageState().BoundValue(),
                                          dialog.RadioButtonGroupMode().BoundValue() );
    
    
      SelectionScenario.Data( newscenario);
      duration   := this.PTF_GetDurationInMilisecond( startprecisionctr );
      response   := 'Duplicate Scenario' ;
      issuccessful := true;
    }
    else
    {
      response := 'PTF_TestCreateData: Precondition failed because < input value not correct >'; // Your precondition failed reason
    }
    
    return issuccessful;
  *]
}