IRdsDatabaseInstance.AttributeTypes

Syntax

AttributeTypes: IRdsAttributeTypeFolder;

Description

The AttributeTypes property returns contents of a dictionary root of MDM repository attribute types.

Example

Executing the example requires an MDM repository with the NSI_1 identifier.

Sub Main;

Var

MB: IMetabase;

NSI: IRdsDatabase;

NSIInst: IRdsDatabaseInstance;

Folder: IRdsAttributeTypeFolder;

Folders: IRdsAttributeTypeFolders;

Types: IRdsAttributeTypes;

i: Integer;

Begin

MB := MetabaseClass.Active;

NSI := MB.ItemById("NSI_1").Bind As IRdsDatabase;

NSIInst := NSI.Open(Null);

Folder := NSIInst.AttributeTypes;

Debug.WriteLine(Folders that are contained in a root of attributes types);

Debug.Indent;

//Folders that are contained in a root

Folders := Folder.Folders;

For i := 0 To Folders.Count - 1 Do

Debug.WriteLine(Folders.Item(i).Name);

End For;

Debug.Unindent;

Debug.WriteLine(Types of attributes that are contained in a root);

Debug.Indent;

//Types of attributes that are contained in a root

Types := Folder.Types;

For i := 0 To Types.Count - 1 Do

Debug.WriteLine(Types.Item(i).Name);

End For;

Debug.Unindent;

End Sub Main;

After executing the example names of all folders and attribute types contained in a dictionary root of MDM repository attribute types are displayed in the development environment console.