请问在rave中做列合计怎么做？

Question

我有一个rave报表，把数据显示完后想在最后一行做个合计，怎么做？我自己老是不成功。请大家帮忙看看，谢谢！
begin
  if combobox1.text='工人推料日报表' then
    begin
      RvProject1.Open;
        st := copy(edit1.Text, 1, 7);
        mysql := '(Select liaop as check_liaop,yljl01 as point1,yljl02 as point2,yljl03 as point3,';
        mysql := mysql + 'cast(cast(yljl01 as decimal(18,2)) as varchar(20)) as ''per_point1'',';
        mysql := mysql + 'cast(cast(yljl02 as decimal(18,2)) as varchar(20)) as ''per_point2'',';
        mysql := mysql + 'cast(cast(yljl03 as decimal(18,2)) as varchar(20)) as ''per_point3'',';
        mysql := mysql + 'From tljl where substring(date,1,7)=''' + st + ''')';
        mysql := mysql + 'union Select ''合计'',Sum(yljl01) as check_liaop,Sum(yljl02) as point2 ,Sum(yljl03) as point3,';
        mysql := mysql + 'cast(cast(yljl01 as decimal(18,2)) as varchar(20)) as ''per_point1'',';
        mysql := mysql + 'cast(cast(yljl02 as decimal(18,2)) as varchar(20)) as ''per_point2'',';
        mysql := mysql + 'cast(cast(yljl03 as decimal(18,2)) as varchar(20)) as ''per_point3'',';
        mysql := mysql + 'From tljl where substring(date,1,7)=''' + st + '''';
        adoquery1.Active := false;
        adoquery1.SQL.Clear;
        adoquery1.SQL.Add(mysql);
        adoquery1.Active := true;
        rvproject1.Execute;
        RvProject1.Close;
        adoquery1.active:=false;
    end;