--然后循环游标对数据进行更新：

复制代码 代码如下:

      commit;
--首先定一个游标把需要用到的一些数据存放到游标中:

复制代码 代码如下:

用游标实现，我觉得绝对这种方法比较安全的。
end;

        loop
        FOR everyRow IN D_CURSOR_CUS_INFO
  where  t3.owe_money_- t2.owe_money_  = a.heatingArea*5 and t3.OWE_MONEY_ > 0;
  CURSOR D_CURSOR_CUS_INFO IS
                 when s.stkbz='1' then 0-nvl(s.mj,0)
    select t3.id_           as id_,
             where t.YEAR_ = '2008-2009'
           t3.owe_money_    as owe_money_,
begin
                 when s.stkbz='0' then nvl(s.mj,0)
    left join (select s.bh,  sum(