Add(Value: IUserDimAttribute);
Value - атрибут, который необходимо добавить в индекс.
Метод Add осуществляет добавление атрибута, передаваемого посредством параметра Value, в индекс.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
UsDim: IUserDimension;
UsDimInds: IUserDimIndexes;
UsDimIndex: IUserDimIndex;
IndexAtr: IUserDimIndexAttributes;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("USER_DIM").Edit;
UsDim := MObj As IUserDimension;
UsDimInds := UsDim.Indexes;
If UsDimInds.Count <> 0 Then
UsDimIndex := UsDimInds.Item(0);
IndexAtr := UsDimIndex.Attributes;
If IndexAtr.FindByKey(UsDim.Attributes.Order.Key) = Null Then
IndexAtr.Add(UsDim.Attributes.Order);
End If;
End If;
MObj.Save;
End Sub Main;
После выполнения примера в первый индекс справочника будет добавлен атрибут, назначение которого - Порядок. Идентификатор вычисляемого справочника - «USER_DIM».
См. также: