第一次使用游标

create or replace procedure proc_testasstrs varchar2(32);beginselect requestid into strs from eweaver.uf_worktable where requestdate=to_char(sysdate,'yyyy-mm-dd')dbms_output.put_line(strs);end proc_test;call proc_test(); 先定义一个cursor:create table t_temp(requestid varchar2(32));create or replace Procedure  P_MYPROCISrid VARCHAR2(32):='';rdate varchar2(20):=''; --定义 CURSOR MYCUR IS       select requestid,requestdate from eweaver.uf_worktableBEGIN     --打开     OPEN MYCUR;     --遍历     LOOP         FETCH MYCUR         INTO rid,rdate;         --无数据时退出         EXIT WHEN MYCUR%NOTFOUND;          --DO SOMETHING HERE;         update t_temp set requestid=rdate where requestid=rid;         commit;     END LOOP;END P_MYPROC;call p_myproc();select * from t_temp;