ITabFootnotes.NumberingRule

Syntax

NumberingRule: TabFootnotesNumberingRule;

Description

The NumberingRule property determines footnote numeration rule for different tables of several sheets.

Comments

The property is relevant on working with tools where can be crated several tools and each of them is a separate table. For example, on working with regular report.

By default, footnote numeration continues for tables on separate sheets.

Example

Executing the example requires that the repository contains a regular report with the REGULAR_REPORT identifier. Add links to the Metabase, Report and Tab system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    Sheet: IPrxSheet;
    Report: IPrxReport;
    Footnotes1, Footnotes2: ITabFootnotes;
Begin
    MB := MetabaseClass.Active;
    Report := MB.ItemById("REGULAR_REPORT").Edit As IPrxReport;
    //Footnotes of the current sheet
    Sheet := Report.ActiveSheet;
    Footnotes1 := (Sheet As IPrxTable).TabSheet.Footnotes;
    Footnotes1.Add(00).Text := "First";
    //Footnotes of a new sheet
    Sheet := Report.Sheets.Add("NewSheet");
    Footnotes2 := (Sheet As IPrxTable).TabSheet.Footnotes;
    Footnotes2.NumberingRule := TabFootnotesNumberingRule.Restart;
    Footnotes2.StartingNumber := 10;
    Footnotes2.Add(00).Text := "Second";
    //Save
    Report.MetabaseObject.Save;
End Sub UserProc;

On executing the example a footnote will be created in the A0 cell of the active sheet. After that a new sheet where the A0 cell contains the footnote will be created in the report. New sheet will contain its proper footnote numeration and the first footnote number will be 10.

See also:

ITabFootnotes