IMetabaseObjectCreateInfo.Id

Fore Syntax

Id: String;

Fore.NET Syntax

Id: String;

Description

The Id property determines an identifier of the repository object that is created.

Fore Example

Sub UserProc;
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    MObj: IMetabaseObject;
    DB: IDatabase;
Begin
    MB := MetabaseClass.Active;
    CrInfo := MB.CreateCreateInfo;
    CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_DATABASE;
    CrInfo.Id := "NewBD";
    CrInfo.Name := New database;
    CrInfo.Parent := MB.Root;
    MObj := MB.CreateObject(CrInfo).Edit;
    DB := MObj As IDatabase;
    DB.Authentication := AuthenticationMode.Password;
    DB.DriverId := "ORCL";
    DB.LogonData.ParamValue("SERVER") := "Test";
    DB.LogonData.ParamValue("SCHEME") := "TestShema";
    DB.UseMetabaseCredentials := True;
    MObj.Save;
End Sub UserProc;

After executing the example a new database is created in the repository root. The data are placed on the Test server in the TestShema scheme. The password authentication is used when connecting to the database. Login and password are taken from the credentials, specified on login to the platform.

Fore.NET Example

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Db;
Imports System;

Public Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    MObj: IMetabaseObject;
    DB: IDatabase;
Begin
    MB := Params.Metabase;
    CrInfo := MB.CreateCreateInfo();
    CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_DATABASE As Int32;
    CrInfo.Id := "NewBD";
    CrInfo.Name := New database;
    CrInfo.Parent := MB.Root;
    MObj := MB.CreateObject(CrInfo).Edit();
    DB := MObj As IDatabase;
    DB.Authentication := AuthenticationMode.amPassword;
    DB.DriverId := "ORCL";
    DB.LogonData.ParamValue["SERVER"] := "Test";
    DB.LogonData.ParamValue["SCHEME"] := "TestShema";
    DB.UseMetabaseCredentials := True;
    MObj.Save();
End Sub;