IDimAttribute.ObjectLinked

Fore Syntax

ObjectLinked: Boolean;

Fore.NET Syntax

ObjectLinked: boolean;

Description

The ObjectLinked property determines whether dictionary attribute is a link to the repository object.

Comments

The property is read-only.

Returned values:

True. Attribute is a link to the repository object.
False. Attribute is not a link to the repository object.

To enable the "Attribute is a link to the repository object" attribute, use the IRdsAttribute.ObjectLinked.

Fore Example

Executing the example requires that repository contains a dictionary with the DIM identifier containing the attribute with the ATTR identifier.

Add links to the Metabase and Dimensions system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    dimension: IDimensionModel;
    attribute: IDimAttribute;
    attributes: IDimAttributes;
Begin
    MB := MetabaseClass.Active;
    dimension := mb.ItemById("DIM").Bind As IDimensionModel;
    attributes := dimension.Attributes;
    attribute := attributes.FindById("ATTR");
    If attribute.ObjectLinked = True Then
        Debug.WriteLine("Attribute is a link to the repository object");
        Else
            Debug.WriteLine("Attribute is not a link to the repository object");
    End If;
End Sub UserProc;

After executing the example it will be checked whether defined dictionary attribute is a repository object, the checking result will be displayed to the console.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore Example.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Dimensions;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    dimension: IDimensionModel;
    attribute: IDimAttribute;
    attributes: IDimAttributes;
Begin
    MB := Params.Metabase;
    dimension := mb.ItemById["DIM"].Bind() As IDimensionModel;
    attributes := dimension.Attributes;
    attribute := attributes.FindById("ATTR");
    If attribute.ObjectLinked = True Then
        System.Diagnostics.Debug.WriteLine("Attribute is a link to the repository object");
        Else
            System.Diagnostics.Debug.WriteLine("Attribute is not a link to the repository object");
    End If;
End Sub;