Quintiq file version 2.0
|
#parent: #root
|
Method InstantiateAndSelectKB (
|
Scenario scenario
|
) as internal[KBFullID] id:Method_ScenarioManager_DialogCreateEditMPScenario_InstantiateAndSelectKB
|
{
|
#keys: '[11660.0.806122670]'
|
Body:
|
[*
|
//Instantiate knowledge
|
Domain.PublishKnowledge();
|
editor := CKBEditor::Create();
|
kbfullid := maxselect ( DataHolderKB.Data(), Elements.KBFullID, k, k.Name().ToUpper() = ScenarioManager.CompanyKBName().ToUpper(), k.ChangeNr() );
|
ids := editor.GetKBs();
|
mid := selectobject (ids, Elements, e, e.Domain() = kbfullid.Domain() and e.Name() = kbfullid.Name(), true)
|
modelkb := editor.GetModelKB( mid );
|
|
//get a copy so we could edit
|
saveid := modelkb.CKB().ID();
|
saveid.Version( "1.0.0.0" );
|
saveid.Branch( EditorBranch.Text() );
|
|
//Perform the actual saveAs action
|
editor.SaveKBAs( modelkb, modelkb.CKB().ID(), '');
|
saveid.ChangeNr( 1 );
|
|
//Select the new KB for the MDS
|
ApplicationLibMacroPlanner.SelectKB( scenario, saveid );
|
|
return saveid;
|
*]
|
}
|
