IMsModelSpace.DefaultObject

DefaultObject: IMetabaseObjectDescriptor;

DefaultObject: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor

Sub UserProc;
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    MObj: IMetabaseObject;
    Ms: IMsModelSpace;
Begin
    // Получаем репозиторий
    MB := MetabaseClass.Active;
    // Задаем базовые свойства контейнера моделирования
    CrInfo := MB.CreateCreateInfo;
    CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_MODELSPACE;
    CrInfo.Id := mb.GenerateId("MS");
    CrInfo.Name := "Контейнер моделирования на атрибутах";
    MObj := MB.CreateObject(CrInfo).Edit;
    Ms := MObj As IMsModelSpace;
    // Указываем базу данных временных рядов для хранения данных
    Ms.Rubricator := MB.ItemById("TSDB");
    // Задаем даты начала и окончания контейнера моделирования
    Ms.StartDate := DateTime.Parse("1.1.2000");
    Ms.EndDate := DateTime.Parse("1.1.2020");
    MObj.Save;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Ms;
Public Class StartParams
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    MObj: IMetabaseObject;
    Ms: IMsModelSpace;
Begin
        // Получаем репозиторий
    MB := Params.Metabase;
    // Задаем базовые свойства контейнера моделирования
    CrInfo := MB.CreateCreateInfo();
    CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_MODELSPACE As Int32;
    CrInfo.Id := mb.GenerateId("MS", 0);
    CrInfo.Name := "Контейнер моделирования на атрибутах";
    MObj := MB.CreateObject(CrInfo).Edit();
    Ms := MObj As IMsModelSpace;
    // Указываем базу данных временных рядов для хранения данных
    Ms.DefaultObject := MB.ItemById["TSDB"];
    // Задаем даты начала и окончания контейнера моделирования
    Ms.StartDate := DateTime.Parse("1.1.2000");
    Ms.EndDate := DateTime.Parse("1.1.2020");
    MObj.Save();    
End Sub;