Для выполнения примера предполагается наличие в репозитории карты с идентификатором "New_Map_1".
Sub UserProc;
Var
MB: IMetabase;
Begin
MB := MetabaseClass.Active;
MB.SpecialObject(MetabaseSpecialObject.DefaultTopobase) := MB.ItemById("New_Map_1");
End Sub UserProc;
После выполнения примера для текущего репозитория в качестве карты по умолчанию будет установлена карта "New_Map_1".
См.также: