ILanerTable.CommentValues

Fore Syntax

CommentValues(Row: Integer; Column: Integer): Array;

Fore.NET Syntax

CommentValues[Row: integer; Column: integer]: System.Array;

Parameters

Row. Row index.

Column. Column index.

Description

The CommentValues property returns identifiers of the attributes that are responsible for creation of comments for observation in the specified cell.

Comments

To get identifiers that are responsible for forming of prefixes and suffixes, use the ILanerTable.PrefixValues and ILanerTable.SuffixValues properties.

Fore Example

Executing the example requires a workbook with the WORKBOOK_PREFIX identifier. This workbook should use attributes for forming of comments, prefixes and suffixes of observations.

Add links to the Express, Laner and Metabase system assemblies.

Sub UserProc;
Var
    mb: IMetabase;
    EaxAn: IEaxAnalyzer;
    Laner: ILaner;
    Table: ILanerTable;
    i: Integer;
    Attr: Array Of Variant;
Begin
    // Get workbook
    mb := MetabaseClass.Active;
    EaxAn := mb.ItemById("WORKBOOK_PREFIX").Bind As IEaxAnalyzer;
    Laner := EaxAn.Laner;
    // Get workbook table
    Table := Laner.Execute;
    // Output comment value
    Attr := Table.CommentValues(0, 0);
    For i := 0 To Attr.Length - 1 Do
        Debug.WriteLine("Comment: " + Attr[i]);
    End For;
    // Output prefix value
    Attr := Table.PrefixValues(0, 0);
    For i := 0 To Attr.Length - 1 Do
        Debug.WriteLine("Prefix: " + Attr[i]);
    End For;
    // Output suffix value
    Attr := Table.SuffixValues(0, 0);
    For i := 0 To Attr.Length - 1 Do
        Debug.WriteLine("Suffix: " + Attr[i]);
    End For;
End Sub UserProc;

After executing the example the console window displays identifiers of attributes that are responsible for forming of comments, prefixes and suffixes of observations in the first cell of the workbook.

Fore.NET Example

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

Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Laner;
…
Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    EaxAn: IEaxAnalyzer;
    Laner: ILaner;
    Table: ILanerTable;
    i: Integer;
    Attr: System.Array;
Begin
    // Get workbook
    mb := Params.Metabase;
    EaxAn := mb.ItemById["WORKBOOK_PREFIX"].Bind() As IEaxAnalyzer;
    Laner := EaxAn.Laner;
    // Get workbook table
    Table := Laner.Execute();
    // Output comment value
    Attr := Table.CommentValues[0, 0];
    For i := 0 To Attr.Length - 1 Do
        System.Diagnostics.Debug.WriteLine("Comment: " + Attr[i]);
    End For;
    // Output prefix value
    Attr := Table.PrefixValues[0, 0];
    For i := 0 To Attr.Length - 1 Do
        System.Diagnostics.Debug.WriteLine("Prefix: " + Attr[i]);
    End For;
    // Output suffix value
    Attr := Table.SuffixValues[0, 0];
    For i := 0 To Attr.Length - 1 Do
        System.Diagnostics.Debug.WriteLine("Suffix: " + Attr[i]);
    End For;
End Sub;