IPrimaryMsSqlSPLD.FileGroup

Синтаксис Fore

FileGroup: String;

Синтаксис Fore.NET

FileGroup: System.String;

Описание

Свойство FileGroup определяет файловую группу для создания таблиц.

По умолчанию используется значение DEFAULT, обозначающее, что если не введено пользовательское наименование, то при подключении должна использоваться файловая группа, установленная в свойствах базы данных по умолчанию.

Пример Fore

Для выполнения примера подключите к модулю системную сборку Metabase.

Sub UserProc;
Var
    MbMan: IMetabaseManager;
    MbDefs: IMetabaseDefinitions;
    MbDef: IMetabaseDefinition;
    MsSqlSPLD: IPrimaryMsSqlSPLD;
Begin
    MbMan := MetabaseManagerFactory.Active;
    MbDefs := MbMan.Definitions;
    MbDef := MbDefs.Add;
    MbDef.DriverId := "MSSQL2008";
    MbDef.Id := "Test_MSSQL";
    MbDef.Name := "Test_MSSQL";
    MbDef.Authentication := AuthenticationMode.Password;
    MbDef.SecurityPackage := "STANDARDSECURITYPACKAGE";
    MsSqlSPLD := MbDef.LogonData As IPrimaryMsSqlSPLD;
    MsSqlSPLD.Server := "Test_MS";
    MsSqlSPLD.DatabaseOnly := "DB_Repository";
    MsSqlSPLD.SchemaOnly := "UserSchema";
    MsSqlSPLD.FileGroup := "файловая группа на сервере БД";
    MbDef.Save;
End Sub UserProc;

После выполнения примера будет создано новое описание репозитория. Для подключения будет использоваться пользовательская схема «UserSchema» в указанной базе данных. На сервере «Test_MS» используется СУБД MS SQL Server 2008. Для создания таблиц будет использоваться «файловая группа на сервере БД».

Пример Fore.NET

Процедура Main является точкой входа для .NET-сборки.

Imports Prognoz.Platform.Interop.Metabase;

...

Public Shared Sub Main(Params: StartParams);
Var
    MbMan: IMetabaseManager;
    MbDefs: IMetabaseDefinitions;
    MbDef: IMetabaseDefinition;
    MsSqlSPLD: IPrimaryMsSqlSPLD;
    MF: IMetabaseManagerFactory;
Begin
    MF := New MetabaseManagerFactoryClass();
    MbMan := MF.Active;
    MbDefs := MbMan.Definitions;
    MbDef := MbDefs.Add();
    MbDef.DriverId := "MSSQL2008";
    MbDef.Id := "Test_MSSQL1";
    MbDef.Name := "Test_MSSQL1";
    MbDef.Authentication := AuthenticationMode.amPassword;
    MbDef.SecurityPackage := "STANDARDSECURITYPACKAGE";
    MsSqlSPLD := MbDef.LogonData As IPrimaryMsSqlSPLD;
    MsSqlSPLD.Server := "Test_MS";
    MsSqlSPLD.DatabaseOnly := "DB_Repository";
    MsSqlSPLD.SchemaOnly := "UserSchema";
    MsSqlSPLD.FileGroup := "файловая группа на сервере БД";
    MbDef.Save();
End Sub;

См. также: