IEaxObject.Id

Copy example

Sub UserProc;
Var
    MB: IMetabase;
    Rep: IPrxReport;
    PivSlice: IEaxDataAreaSlice;
    GridObject: IEaxObject;
    Grid: IEaxGrid;
    Tab: IPrxTable;
    Sheet: ITabSheet;
    Range: ITabRange;
Begin
    // Get repository
    MB := MetabaseClass.Active;
    // Get express report
    Rep := MB.ItemById("REG_REPORT").Edit As IPrxReport;
    // Get data analytical area slice
    PivSlice := Rep.DataArea.Slices.Item(0);
    // Create a data slice copy
    PivSlice.Copy(EaxSliceCopyOptions.All);
    // Get object for working with table
    GridObject := PivSlice.Views.Item(0) As IEaxObject;
    // Change object identifier
    If GridObject.Id.IsEmpty Then
        GridObject.Id := "GridTab";
    End If;
    // Disable saving data to source
    GridObject.AllowSaveData := False;
    // Create a table copy
    Grid := PivSlice.Views.Item(0) As IEaxGrid;
    Tab := Rep.Sheets.Item(0) As IPrxTable;
    Sheet := Tab.TabSheet;
    Range := Sheet.ParseRange("A0:H6");
    Grid.Copy(Sheet, Range);
    // Save changes in express report
    (Rep As IMetabaseObject).Save;
End Sub UserProc;