IRdsDatabase.Database

Syntax

Database: IDatabase;

Description

The Database property determines repository database, in which data of the MDM repository objects is contained.

Example

Executing the example requires that the repository contains a database with the NSI_BD identifier.

Sub UserProc;
Var
    MB: IMetabase;
    NSI: IRdsDatabase;
    CrInfo: IMetabaseObjectCreateInfo;
Begin
    MB := MetabaseClass.Active;
    CrInfo := MB.CreateCreateInfo;
    CrInfo.ClassID := MetabaseObjectClass.KE_CLASS_RDS_DATABASE;
    CrInfo.Id := "NSI_1";
    CrInfo.Name := "MDM repository";
    CrInfo.Parent := Null;
    NSI := MB.CreateObject(CrInfo).Edit As IRdsDatabase;
    NSI.Database := MB.ItemById("NSI_BD").Bind As IDatabase;
    (NSI As IMetabaseObject).Save;
End Sub UserProc;

After executing the example a new MDM repository with the NSI_1 identifier is created in a repository root.