IImportRequestProviderParams.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;     ImportRequestDef: IImportRequestDefinition;     Params: IImportRequestProviderParams;     Obj: IMetabaseObject;     Bindings: ICubeMetaLoaderBindings;     Binding: ICubeMetaLoaderBinding;     DimM: IDimensionModel;     Instance: IImportRequestInstance; Begin     // Create data source for 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 import object     CrInfo := Mb.CreateCreateInfo;     CrInfo.ClassId := MetabaseObjectClass.KE_CLASS_IMPORTREQUEST;     CrInfo.Id := Mb.GenerateId("OBJ_IMPORTREQUEST_P", TSDBObj.Key);     CrInfo.Name := "Import object";     CrInfo.Parent := TSDBObj;     Obj := Mb.CreateObject(CrInfo).Edit;     // Specify data source     ImportRequestDef := Obj As IImportRequestDefinition;     ImportRequestDef.SourceType := ImportRequestSourceType.Provider;     // Specify data consumer     ImportRequestDef.DestinationRubricator := TSDB;     // Set import parameters     Params := ImportRequestDef.ProviderParams;     Params.Provider := TextProvider As IDatasetDataProvider;     Params.NewRevisionName := "Time series import";     Params.ImportObjectKey := Obj.Key;     Params.LoadType := CubeMetaLoaderLoadType.CreateAndUpdate;     Params.LoadMode := CubeLoadClearMode.DataAndMetadata;     Params.DuplicateCheck := CubeLoadDuplicateCheckSet.ValueAttribute Or CubeLoadDuplicateCheckSet.Value;     // Specify scenario, to which data is loaded     Params.ScenarioKey := (TSDB.ModelSpace As IMsModelSpace).ScenarioTree.Item(0).Key;     // Set attribute binding     Bindings := Params.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 Units attribute (UNIT)     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 attribute (CITY)     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 Indicatros attribute (INDICATOR)     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 for import of series observation values     Binding := Bindings.Add;     Binding.BindingType := CubeMetaLoaderBindingType.Value;     Binding.FieldType := CubeMetaLoaderFieldType.Name;     Binding.Field := "Value";     // Save changes in import object     Obj.Save;     // Import data     Instance := (ImportRequestDef As IMetabaseObject).Open(Null) As IImportRequestInstance;     Instance.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 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;     ImportRequestDef: IImportRequestDefinition;     ParamsImp: IImportRequestProviderParams;     Obj: IMetabaseObject;     Bindings: ICubeMetaLoaderBindings;     Binding: ICubeMetaLoaderBinding;     DimM: IDimensionModel;     Instance: IImportRequestInstance; Begin     // Create 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 import object     CrInfo := Mb.CreateCreateInfo();     CrInfo.ClassId := MetabaseObjectClass.KE_CLASS_IMPORTREQUEST As integer;     CrInfo.Id := Mb.GenerateId("OBJ_IMPORTREQUEST_P", TSDBObj.Key);     CrInfo.Name := "Import object";     CrInfo.Parent := TSDBObj;     Obj := Mb.CreateObject(CrInfo).Edit();     // Determine data source     ImportRequestDef := Obj As IImportRequestDefinition;     ImportRequestDef.SourceType := ImportRequestSourceType.irstProvider;     // Determine data consumer     ImportRequestDef.DestinationRubricator := TSDB;     // Set import parameters     ParamsImp := ImportRequestDef.ProviderParams;     ParamsImp.Provider := TextProvider As IDatasetDataProvider;     ParamsImp.NewRevisionName := "Import time series";     ParamsImp.ImportObjectKey := Obj.Key;     ParamsImp.LoadType := CubeMetaLoaderLoadType.cmlltCreateAndUpdate;     ParamsImp.LoadMode := CubeLoadClearMode.clcmDataAndMetadata;     ParamsImp.DuplicateCheck := CubeLoadDuplicateCheckSet.cldcValueAttribute Or CubeLoadDuplicateCheckSet.cldcValue;     // Set scenario, to which data will be loaded     ParamsImp.ScenarioKey := (TSDB.ModelSpace As IMsModelSpace).ScenarioTree.Item[0].Key As integer;     // Set attribute binding     Bindings := ParamsImp.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 attribute (UNIT)     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 attribute (CITY)     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 attribute (INDICATOR)     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 observations values     Binding := Bindings.Add();     Binding.BindingType := CubeMetaLoaderBindingType.cmlbtValue;     Binding.FieldType := CubeMetaLoaderFieldType.cmlftName;     Binding.Field := "Value";     // Save changes to import object     Obj.Save();     // Import data     Instance := (ImportRequestDef As IMetabaseObject).Open(Null) As IImportRequestInstance;     Instance.LoadData(); End Sub;

IImportRequestProviderParams.DuplicateCheck

Fore Syntax

Fore.NET Syntax

Description

Comments

Fore Example

Fore.NET Example