IPrimaryMsSqlSPLD.DatabaseOnly

Синтаксис Fore

DatabaseOnly: String;

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

DatabaseOnly: String;

Описание

Свойство DatabaseOnly определяет идентификатор базы данных на сервере MS SQL, в которой хранятся данные репозитория.

Комментарии

Свойство актуально для использования, если на сервере задан тип СУБД Microsoft SQL Server 2008 и используется пользовательская схема в базе данных.

Свойство DatabaseOnly представляет только идентификатор базы данных без пользовательской схемы.

Пример 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";
    MbDef.Save;
End Sub UserProc;

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

Пример Fore.NET

Указанная процедура является точкой входа для .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";
    MbDef.Save();
End Sub;

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

См. также:

IPrimaryMsSqlSPLD