DesignCoding Studio

一切只要去努力!

定制颜色：
[ 显示模式： 摘要 | 列表 ]
2008-04-22

Oracle 使用游标

时间: 2008-04-22 11:29:47 作者: admin 阅读次数: 670
字体大小: 小 中 大
    procedure execWork is
      tmpworkId number;
      tmpstepId number;
      tmpforDay number;
      startDate date;
      useDay number;
      Cursor workCursor is Select workid,nextstepid from flowwork;
    begin
      
      open workCursor;  
      loop  
        fetch workCursor into tmpworkId,tmpstepId;  
           exit when workCursor%NOTFOUND;
           select forday into tmpforDay from flowstep where steporderno = tmpstepId;
           select workstartdate into startDate from flowworkstep where workid = tmpworkId and stepid = tmpstepId and state = 0 and workenddate is null;
           useDay := sysdate - startDate;
           if useDay > tmpforDay then
              update flowwork set workstate = 5;
           end if;
      end loop;
      close workCursor;
    end execWork;
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: Oracle Cursor