NumberingRule: TabFootnotesNumberingRule;
The NumberingRule property determines footnote numeration rule for different tables of several sheets.
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.
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(0, 0).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(0, 0).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: