編寫三個公式：

一、FeeCount，用於累加資料。放在詳細資訊

whileprintingrecords;
global CurrencyVar ptotal;
ptotal := ptotal + {DataTableYS.WaterFee};

二、SumFeeNum，用於最終顯示小計資訊，一般放在頁尾。

whileprintingrecords;
global CurrencyVar ptotal;

三、FeeReset，使用者將小計至0，與SumFeeNum一樣放在頁尾。

EvaluateAfter({@SumFeeNum});
global CurrencyVar ptotal;
ptotal:=0;

注意：whileprintingrecords 表示獲取資料之後，顯示列印資料之前。EvaluateAfter({@SumFeeNum})指執行完SumFeeNum後，再執行。因為要獲取顯示的小計資訊（即執行完SumFeeNum）後再置零，才能保證保證小計資訊能正常顯示，否則小計始終顯示0。