CreateTable([BuildFields: Boolean = True; ][Recursive: Boolean = True]);
BuildFields - параметр, определяющий создавать ли поля в таблице. Необязательный параметр. Значение по умолчанию True - создавать поля в таблице.
Recursive - параметр, определяющий допускаются ли в таблице дочерние элементы. Необязательный параметр. Значение по умолчанию True - дочерние элементы допускаются.
Метод CreateTable создает системную таблицу для хранения множественных значений атрибутов базы данных временных рядов.
Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором OBJ_FC и репозитория НСИ с идентификатором RDS_REPO. В репозитории НСИ должен присутствовать справочник с идентификатором DICT_COUNTRY.
Добавьте ссылки на системные сборки Metabase, Rds, Cubes.
Sub UserProc;
Var
MB: IMetabase;
Rubr: IRubricator;
Facts: IMetabaseObject;
Att: IMetaAttribute;
CollectionAtt: IMetaAttributes;
Begin
MB := MetabaseClass.Active;
Rubr := MB.ItemById("OBJ_FC").Bind As IRubricator;
Facts := (Rubr.Facts As IMetabaseObject).Edit;
Att := (Facts As IMetaDictionary).Attributes.Add;
Att.DataType := DbDataType.Integer;
Att.Id := "A_M_REF";
Att.Name := "Новый атрибут";
Att.Kind := (MetaAttributeKind.Collection) Or (MetaAttributeKind.Dimension);
Att.ValuesObject := MB.ItemByIdNamespace("DICT_COUNTRY", Mb.ItemById("RDS_REPO").Key);
Att.DataType := DbDataType.Integer;
Att.HasMultipleValues := True;
CollectionAtt := Att.CollectionAttributes;
CollectionAtt.BuildCollectionAttributes;
CollectionAtt.CreateTable(True);
Facts.Save;
End Sub UserProc;
После выполнения примера в справочнике, содержащем информацию о показателях базы данных временных рядов с идентификатором OBJ_FC, будет добавлен атрибут с наименованием «Новый атрибут». Данный атрибут является ссылкой на справочник и поддерживает множественные значения. Также будет создана системная таблица для хранения множественных значений.
См. также: