Dimensions > Dimensions Assembly Interfaces > ICustomDimOrders > ICustomDimOrders.Delete
Delete(Index: Integer): Boolean;
Index. Attribute index is in sorting list.
The Delete method deletes attributes with the specified index and returns attribute whether the deletion was successful.
The method returns True, if attribute was deleted and False, if deletion is impossible for some reasons.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Cube: IStandardCube;
CustDim: ICustomDimension;
CustAtrs: ICustomDimAttributes;
CustDimOrd: ICustomDimOrders;
s: String;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("CUBE_SEP1").Edit;
Cube := MObj As IStandardCube;
CustDim := Cube.FactDimension.Dimension As ICustomDimension;
CustAtrs := CustDim.Attributes;
CustDimOrd := CustAtrs.Orders;
If CustDimOrd.Delete(CustDimOrd.Count - 1) Then
s := "Yes";
Else
s := "No";
End If;
MObj.Save;
End Sub UserProc;
After executing the example the "s" variable contains Yes, if the last attribute is successfully removed from the list of sorting.
See also: