Kind: LnSerieKind;
The Kind property returns a type of series.
Executing the example requires that the repository contains a workbook with the WORKBOOK identifier. The working area should contain a time series database.
Add links to the Express, Laner and Metabase system assemblies.
Sub UserProc;
Var
MB: IMetabase;
Workbook: IEaxAnalyzer;
Laner: ILaner;
Serie: ILanerSerie;
SourceSerie: ILanerCalculateSerie;
Begin
// Get the current repository
MB := MetabaseClass.Active;
// Get workbook
Workbook := MB.ItemById("WORKBOOK").Bind As IEaxAnalyzer;
// Get working area of indicators directory
Laner := Workbook.Laner;
// Get the first series of working area
Serie := Laner.Series.Item(0);
// Display revision key in the console if the series is based on indicator
If Serie.Kind = LnSerieKind.Source Then
SourceSerie := Serie As ILanerCalculateSerie;
If SourceSerie.RevisionKey <> 0 Then
Debug.WriteLine("Revision key: " + SourceSerie.RevisionKey.ToString);
End If;
End If;
End Sub UserProc;
After executing the example the console displays key of the current revision of the first series of working area.
See also: