ICubeMetaLoader.DuplicateCheck

Executing the example requires a time series database with the TSDB_IMP identifier containing mandatory custom attributes with the CITY and INDICATOR identifiers. These attributes must be links to the dictionary. The child container of time series database must have several scenarios.

"CITY_KEY";"INDICATOR_KEY";"Year";"Value"

750;766;"1990";2,789

750;766;"1991";2,896

750;766;"1992";2,869

750;766;"1993";2,83

750;766;"1992";2,869

750;766;"1993";2,83

750;766;"1994";2,76

750;766;"1995";2,8

750;766;"1996";2,7867

750;766;"1997";2,8

750;766;"1998";2,8171

750;766;"1999";2,8286

750;766;"1998";2,8171

750;766;"1999";2,8286

750;766;"2000";2,896

750;766;"2001";2,895

750;766;"2002";2,866

750;766;"2003";2,837

750;766;"2004";2,849

750;766;"2002";2,866

750;766;"2003";2,837

750;766;"2004";2,849

750;766;"2005";2,824

750;766;"2006";2,799

750;766;"2007";2,774

750;766;"2008";2,749

750;766;"2009";2,889

750;766;"2010";2,695

750;766;"2011";2,704

750;766;"2012";2,713

750;766;"2013";2,712

750;766;"2014";2,711

750;766;"2015";2,718

Add links to the Cubes, Db, Dimensions, Dt, Metabase, Ms, Rds system assemblies.

Sub UserProc; Var     TextProvider: IDtTextProvider;     Mb: IMetabase;     TSDBObj: IMetabaseObject;     TSDB: IRubricator;     Attr: IMetaAttributes;     CrInfo: IMetabaseObjectCreateInfo;     Obj: IMetabaseObject;     Loader: ICubeMetaLoader;     Bindings: ICubeMetaLoaderBindings;     Binding: ICubeMetaLoaderBinding;     DimM: IDimensionModel; Begin     // Create data source to import from text file     TextProvider := New DtTextProvider.Create;     TextProvider.File := "D:\res_export.txt";     TextProvider.FormatType := DtTextFormatType.Delimited;     TextProvider.DelimitedColumnDelimiter := ";";     TextProvider.DelimitedTextQualifier := """";     TextProvider.Encoding := "WIN";     TextProvider.RangeHasHeader := True;     TextProvider.Open;     // Get time series database     Mb := MetabaseClass.Active;     TSDBObj := Mb.ItemById("TSDB_IMP").Bind;     TSDB := TSDBObj As IRubricator;     Attr := TSDB.Facts.Attributes;     // Create object to load time series     CrInfo := Mb.CreateCreateInfo;     CrInfo.ClassId := MetabaseObjectClass.KE_CLASS_CUBEMETALOADER;     CrInfo.Parent := TSDBObj;     CrInfo.Id := Mb.GenerateId("CUBEMETALOADER", TSDBObj.Key);     CrInfo.Permanent := False;     Obj := Mb.CreateObject(CrInfo).Edit;     Loader := Obj As ICubeMetaLoader;     // Set data source     Loader.Data := TextProvider As IDatasetDataProvider;     // Set data consumer     Loader.Rubricator := TSDB;     // Set data loading parameters     Loader.ImportObjectKey := Obj.Key;     Loader.NewRevisionName := "Update data";     Loader.LoadType := CubeMetaLoaderLoadType.CreateAndUpdate;     Loader.LoadMode := CubeLoadClearMode.DataAndMetadata;     Loader.DuplicateCheck := CubeLoadDuplicateCheckSet.ValueAttribute Or CubeLoadDuplicateCheckSet.Value;     // Determine scenario to which data will be loaded     Loader.ScenarioKey := (TSDB.ModelSpace As IMsModelSpace).ScenarioTree.Item(0).Key;     // Set attribute binding     Bindings := Loader.Bindings;     // Set calendar binding     Binding := Bindings.Add;     Binding.BindingType := CubeMetaLoaderBindingType.Calendar;     Binding.ByColumns := False;     Binding.CalendarDateFormat := "$Year$";     Binding.CalendarOptions.Levels := DimCalendarLevelSet.Year;     Binding.FieldType := CubeMetaLoaderFieldType.Name;     Binding.Field := "Year";     // Set binding of the Measurement Units (UNIT) attribute     Binding := Bindings.Add;     Binding.BindingType := CubeMetaLoaderBindingType.Unit;     Binding.FieldType := CubeMetaLoaderFieldType.ConstValue;     Binding.FieldValue := 1;     Binding.Attribute := "UNIT";     DimM := Attr.FindById("UNIT").ValuesObject.Bind As IDimensionModel;     Binding.Dimension := DimM;     Binding.Index := DimM.Indexes.Item(0).Id;     Binding.KeyAttribute := "KEY";     // Set binding of the Cities (CITY) attribute     Binding := Bindings.Add;     Binding.BindingType := CubeMetaLoaderBindingType.Attribute;     Binding.Attribute := "CITY";     Binding.FieldType := CubeMetaLoaderFieldType.Name;     Binding.Field := "CITY_KEY";     DimM := Attr.FindById("CITY").ValuesObject.Bind As IDimensionModel;     Binding.Dimension := DimM;     Binding.Index := DimM.Indexes.Item(0).Id;     Binding.KeyAttribute := "KEY";     Binding.NameAttribute := "NAME";     // Set binding of the Indicators (INDICATOR) attribute     Binding := Bindings.Add;     Binding.BindingType := CubeMetaLoaderBindingType.Attribute;     Binding.Attribute := "INDICATOR";     Binding.FieldType := CubeMetaLoaderFieldType.Name;     Binding.Field := "INDICATOR_KEY";     DimM := Attr.FindById("INDICATOR").ValuesObject.Bind As IDimensionModel;     Binding.Dimension := DimM;     Binding.Index := DimM.Indexes.Item(0).Id;     Binding.KeyAttribute := "KEY";     Binding.NameAttribute := "NAME";     // Set binding to import series observation values     Binding := Bindings.Add;     Binding.BindingType := CubeMetaLoaderBindingType.Value;     Binding.FieldType := CubeMetaLoaderFieldType.Name;     Binding.Field := "Value";     // Load data     Loader.LoadData; End Sub UserProc;

After executing the example the data from the "D:\res_export.txt" file will be imported to the time series database for the first scenario, and duplicate data will be excluded.

Fore.NET Example

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

Imports Prognoz.Platform.Interop.Cubes;
Imports Prognoz.Platform.Interop.Db;
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Dt;
Imports Prognoz.Platform.Interop.Ms;
Imports Prognoz.Platform.Interop.Rds;

Public Shared Sub Main(Params: StartParams); Var     TextProvider: IDtTextProvider;     Mb: IMetabase;     TSDBObj: IMetabaseObject;     TSDB: IRubricator;     Attr: IMetaAttributes;     CrInfo: IMetabaseObjectCreateInfo;     Obj: IMetabaseObject;     Loader: ICubeMetaLoader;     Bindings: ICubeMetaLoaderBindings;     Binding: ICubeMetaLoaderBinding;     DimM: IDimensionModel; Begin     // Create a data source to import from text file     TextProvider := New DtTextProvider.Create();     TextProvider.File := "D:\res_export.txt";     TextProvider.FormatType := DtTextFormatType.tftDelimited;     TextProvider.DelimitedColumnDelimiter := ";";     TextProvider.DelimitedTextQualifier := """";     TextProvider.Encoding := "WIN";     TextProvider.RangeHasHeader := True;     TextProvider.Open();     // Get time series database     Mb := Params.Metabase;     TSDBObj := Mb.ItemById["TSDB_IMP"].Bind();     TSDB := TSDBObj As IRubricator;     Attr := TSDB.Facts.Attributes;     // Create an object to load time series     CrInfo := Mb.CreateCreateInfo();     CrInfo.ClassId := MetabaseObjectClass.KE_CLASS_CUBEMETALOADER As integer;     CrInfo.Parent := TSDBObj;     CrInfo.Id := Mb.GenerateId("CUBEMETALOADER", TSDBObj.Key);     CrInfo.Permanent := False;     Obj := Mb.CreateObject(CrInfo).Edit();     Loader := Obj As ICubeMetaLoader;     // Determine data source     Loader.Data := TextProvider As IDatasetDataProvider;     // Determine data consumer     Loader.Rubricator := TSDB;     // Set data loading parameters     Loader.ImportObjectKey := Obj.Key;     Loader.NewRevisionName := "Update data";     Loader.LoadType := CubeMetaLoaderLoadType.cmlltCreateAndUpdate;     Loader.LoadMode := CubeLoadClearMode.clcmDataAndMetadata;     Loader.DuplicateCheck := CubeLoadDuplicateCheckSet.cldcValueAttribute Or CubeLoadDuplicateCheckSet.cldcValue;     // Set scenario to which data will be loaded     Loader.ScenarioKey := (TSDB.ModelSpace As IMsModelSpace).ScenarioTree.Item[0].Key As integer;     // Set attribute binding     Bindings := Loader.Bindings;     // Set calendar binding     Binding := Bindings.Add();     Binding.BindingType := CubeMetaLoaderBindingType.cmlbtCalendar;     Binding.ByColumns := False;     Binding.CalendarDateFormat := "$Year$";     Binding.CalendarOptions.Levels := DimCalendarLevelSet.dclsYear;     Binding.FieldType := CubeMetaLoaderFieldType.cmlftName;     Binding.Field := "Year";     // Set binding of the Measurement Units (UNIT) attribute     Binding := Bindings.Add();     Binding.BindingType := CubeMetaLoaderBindingType.cmlbtUnit;     Binding.FieldType := CubeMetaLoaderFieldType.cmlftConstValue;     Binding.FieldValue := 1;     Binding.Attribute := "UNIT";     DimM := Attr.FindById("UNIT").ValuesObject.Bind() As IDimensionModel;     Binding.Dimension := DimM;     Binding.Index := DimM.Indexes.Item[0].Id;     Binding.KeyAttribute := "KEY";     // Set binding of the Cities (CITY) attribute     Binding := Bindings.Add();     Binding.BindingType := CubeMetaLoaderBindingType.cmlbtAttribute;     Binding.Attribute := "CITY";     Binding.FieldType := CubeMetaLoaderFieldType.cmlftName;     Binding.Field := "CITY_KEY";     DimM := Attr.FindById("CITY").ValuesObject.Bind() As IDimensionModel;     Binding.Dimension := DimM;     Binding.Index := DimM.Indexes.Item[0].Id;     Binding.KeyAttribute := "KEY";     Binding.NameAttribute := "NAME";     // Set binding of the Factors (INDICATOR) attribute     Binding := Bindings.Add();     Binding.BindingType := CubeMetaLoaderBindingType.cmlbtAttribute;     Binding.Attribute := "INDICATOR";     Binding.FieldType := CubeMetaLoaderFieldType.cmlftName;     Binding.Field := "INDICATOR_KEY";     DimM := Attr.FindById("INDICATOR").ValuesObject.Bind() As IDimensionModel;     Binding.Dimension := DimM;     Binding.Index := DimM.Indexes.Item[0].Id;     Binding.KeyAttribute := "KEY";     Binding.NameAttribute := "NAME";     // Set binding to import series observation values     Binding := Bindings.Add();     Binding.BindingType := CubeMetaLoaderBindingType.cmlbtValue;     Binding.FieldType := CubeMetaLoaderFieldType.cmlftName;     Binding.Field := "Value";     // Load data     Loader.LoadData(); End Sub;

ICubeMetaLoader.DuplicateCheck

Fore Syntax

Fore.NET Syntax

Description

Comments

Fore Example

Fore.NET Example