IBindingDimCombo.DataSourceKeyDefined

Fore Syntax

DataSourceKeyDefined: Boolean;

Fore.NET Syntax

DataSourceKeyDefined: Boolean;

Description

The DataSourceKeyDefined property determines whether the DS_KEY parameter is present in binding string.

Comments

If the DataSourceKeyDefined property is set to True, the binding string describing the value editor contains the DS_KEY parameter. The value of this parameter is determined by the DataSourceKey property.

Fore Example

Sub DimComboBindingInfo(SourceBinding: String);
Var
    BM: IBindingManager;
    Binding: IBindingValue;
    DimComboBinding: IBindingDimCombo;
Begin
    BM := New BindingManager.Create;
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "DimCombo" Then
        DimComboBinding := Binding As IBindingDimCombo;
        //Check if the GROUP parameter is present
        If DimComboBinding.GroupDefined Then
            Debug.WriteLine("GROUP: " + DimComboBinding.Group);
        End If;
        //Check if the SCHEMA parameter is present
        If DimComboBinding.SchemaDefined Then
            Debug.WriteLine("SCHEMA: " + DimComboBinding.Schema);
        End If;
        //Check if the CUSTOMMULTISELECTTEXT parameter is present
        If DimComboBinding.CustomMultiselectTextDefined Then
            Debug.WriteLine("CUSTOMMULTISELECTTEXT: " + DimComboBinding.CustomMultiselectText);
        End If;
        //Check if the LEVELATTR parameter is present
        If DimComboBinding.LevelAttributeDefined Then
            Debug.WriteLine("LEVELATTR: " + DimComboBinding.LevelAttribute);
        End If;
        //Check if the ID parameter is present
        If DimComboBinding.ObjectDefined Then
            Debug.WriteLine("ID: " + DimComboBinding.Object);
        End If;
        //Check if the RDS parameter is present
        If DimComboBinding.RdsDefined Then
            Debug.WriteLine("RDS: " + DimComboBinding.Rds);
        End If;
        //Check if the SELECTIONMODE parameter is present
        If DimComboBinding.SelectionModeDefined Then
            Debug.WriteLine("SELECTIONMODE: " + DimComboBinding.SelectionMode.ToString);
        End If;
        //Check if the VALUE parameter is present
        If DimComboBinding.ValueDefined Then
            Debug.WriteLine("VALUE: " + DimComboBinding.Value);
        End If;
        //Check if the ATTRIBUTEVALUE parameter is present
        If DimComboBinding.ValueAttributeDefined Then
            Debug.WriteLine("ATTRIBUTEVALUE: " + DimComboBinding.ValueAttribute);
        End If;
        //Check if the DS_KEY parameter is present
        If DimComboBinding.DataSourceKeyDefined Then
            Debug.WriteLine("DS_KEY: " + DimComboBinding.DataSourceKey.ToString);
        End If;
        //Check if the PT_KEY parameter is present
        If DimComboBinding.PointKeyDefined Then
            Debug.WriteLine("PT_KEY: " + DimComboBinding.PointKey.ToString);
        End If;
        //Check if the DIM_KEY parameter is present
        If DimComboBinding.DimensionKeyDefined Then
            Debug.WriteLine("DIM_KEY: " + DimComboBinding.DimensionKey.ToString);
        End If;
    End If;
End Sub DimComboBindingInfo;

This function checks the binding string passed as the SourceBinding input parameter. If the binding string corresponds to the editor as a drop-down list of the dictionary, values of parameters will be displayed in the development 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.ForeSystem;

Sub DimComboBindingInfo(SourceBinding: String);
Var
    BM: BindingManager = New BindingManagerClass();
    Binding: IBindingValue;
    DimComboBinding: IBindingDimCombo;
Begin
    Binding := BM.CreateByValue(SourceBinding);
    If Binding.UI = "DimCombo" Then
        DimComboBinding := Binding As IBindingDimCombo;
        //Check if the GROUP parameter is present
        If DimComboBinding.GroupDefined Then
            System.Diagnostics.Debug.WriteLine("GROUP: " + DimComboBinding.Group);
        End If;
        //Check if the SCHEMA parameter is present
        If DimComboBinding.SchemaDefined Then
            System.Diagnostics.Debug.WriteLine("SCHEMA: " + DimComboBinding.Schema);
        End If;
        //Check if the CUSTOMMULTISELECTTEXT parameter is present
        If DimComboBinding.CustomMultiselectTextDefined Then
            System.Diagnostics.Debug.WriteLine("CUSTOMMULTISELECTTEXT: " + DimComboBinding.CustomMultiselectText);
        End If;
        //Check if the LEVELATTR parameter is present
        If DimComboBinding.LevelAttributeDefined Then
            System.Diagnostics.Debug.WriteLine("LEVELATTR: " + DimComboBinding.LevelAttribute);
        End If;
        //Check if the ID parameter is present
        If DimComboBinding.ObjectDefined Then
            System.Diagnostics.Debug.WriteLine("ID: " + DimComboBinding.Object);
        End If;
        //Check if the RDS parameter is present
        If DimComboBinding.RdsDefined Then
            System.Diagnostics.Debug.WriteLine("RDS: " + DimComboBinding.Rds);
        End If;
        //Check if the SELECTIONMODE parameter is present
        If DimComboBinding.SelectionModeDefined Then
            System.Diagnostics.Debug.WriteLine("SELECTIONMODE: " + DimComboBinding.SelectionMode.ToString());
        End If;
        //Check if the VALUE parameter is present
        If DimComboBinding.ValueDefined Then
            System.Diagnostics.Debug.WriteLine("VALUE: " + DimComboBinding.Value);
        End If;
        //Check if the ATTRIBUTEVALUE parameter is present
        If DimComboBinding.ValueAttributeDefined Then
            System.Diagnostics.Debug.WriteLine("ATTRIBUTEVALUE: " + DimComboBinding.ValueAttribute);
        End If;
        //Check if the DS_KEY parameter is present
        If DimComboBinding.DataSourceKeyDefined Then
            System.Diagnostics.Debug.WriteLine("DS_KEY: " + DimComboBinding.DataSourceKey.ToString());
        End If;
        //Check if the PT_KEY parameter is present
        If DimComboBinding.PointKeyDefined Then
            System.Diagnostics.Debug.WriteLine("PT_KEY: " + DimComboBinding.PointKey.ToString());
        End If;
        //Check if the DIM_KEY parameter is present
        If DimComboBinding.DimensionKeyDefined Then
            System.Diagnostics.Debug.WriteLine("DIM_KEY: " + DimComboBinding.DimensionKey.ToString());
        End If;
    End If;
End Sub DimComboBindingInfo;