long ll_row, ll_cnt, ll_group_no
dec{2} ldc_money[]
ll_group_no = 0
ll_cnt = dw_main.rowcount()
for ll_row = 1 to ll_cnt
if dw_main.describe("evaluate('if(oper_name = oper_name[1], 1, 0)', " + string(ll_row) + ")") = '1' then
ll_group_no ++
ldc_money[ll_group_no] = dec(dw_main.describe("evaluate('sum(money for group 1), " + string(ll_row) + ")"))
end if
next
long row = 1 //初始化第一组的第一行
real sumamount
IF dw_1.RowCount() = 0 THEN row = 0
DO WHILE row > 0
sumamount = dw_1.Object.amounts[row] //取此组的组小计带的值
...... //对取得的值进行相应的处理
//上面amounts是"在Trailer Group 1"带中,表达式如SUM(je for group 1)
row = dw_1.FindGroupChange(row + 1, 1) //取得下一组的第一行
LOOP //如果不是最后一组,则继续