1.

declare

       --类型定义        cursor c_emp        is        select * from emp_info;        --定义一个游标变量v_cinfo c_emp%ROWTYPE ，该类型为游标c_emp中的一行数据类型        c_row c_emp%rowtype; begin        for c_row in c_emp loop          dbms_output.put_line(c_row.id||'-'||c_row.emp_id||'-'||c_row.emp_name||'-'||c_row.emp_sex);        end loop; end;

2.

--Fetch游标

--使用的时候必须要明确的打开和关闭

declare 

        --类型定义        cursor c_emp        is        select * from emp_info;        --定义一个游标变量v_cinfo c_emp%ROWTYPE ，该类型为游标c_emp中的一行数据类型        c_row c_emp%rowtype; begin        open c_emp;          loop            --提取一行数据到c_row            fetch c_emp into c_row;            --判读是否提取到值，没取到值就退出            --取到值c_job%notfound 是false             --取不到值c_job%notfound 是true            exit when c_emp%notfound;             dbms_output.put_line(c_row.id||'-'||c_row.emp_id||'-'||c_row.emp_name||'-'||c_row.emp_sex);          end loop;        --关闭游标       close c_emp; end;

3.

begin          update emp_info set emp_name='gxl@@' WHERE EMP_id=2;          if sql%isopen then            dbms_output.put_line('Openging');          else            dbms_output.put_line('closing');          end if;                     if sql%found then             dbms_output.put_line('游标指向了有效行');--判断游标是否指向有效行           else             dbms_output.put_line('Sorry');           end if;                          if sql%notfound then             dbms_output.put_line('Also Sorry');           else             dbms_output.put_line('Haha');           end if;                        dbms_output.put_line(sql%rowcount);                          exception                  when no_data_found then                   dbms_output.put_line('Sorry No data');                 when too_many_rows then                   dbms_output.put_line('Too Many rows');                 WHEN OTHERS THEN                   Dbms_Output.put_line('OTHERS!');

end;

4.

--3,使用游标和while循环来显示所有部门的的地理位置（用%found属性） --游标声明 declare          --类型定义        cursor c_emp        is        select * from emp_info;        --定义一个游标变量v_cinfo c_emp%ROWTYPE ，该类型为游标c_emp中的一行数据类型        c_row c_emp%rowtype; begin    --打开游标        open c_emp;        --给第一行喂数据        fetch c_emp into c_row;        --测试是否有数据，并执行循环          while c_emp%found loop            dbms_output.put_line('部门地点：'||c_row.emp_name);            --给下一行喂数据            fetch c_emp into c_row;          end loop;        close c_emp; end; 5.

declare        --类型定义        cursor c_emp(emp_id_i number)        is        select * from emp_info where emp_id = emp_id_i;        --定义一个游标变量v_cinfo c_emp%ROWTYPE ，该类型为游标c_emp中的一行数据类型        c_row c_emp%rowtype; begin         for c_row in c_emp(1) loop               dbms_output.put_line(c_row.id||'-'||c_row.emp_id||'-'||c_row.emp_name||'-'||c_row.emp_sex);         end loop; end;  

6.

--6：用更新游标来为雇员加佣金：(用if实现,创建一个与emp表一摸一样的emp1表，对emp1表进行修改操作),并将更新前后的数据输出出来 -               create table emp_info1 as select * from emp_info;        declare        cursor        csr_Update        is        select * from  emp_info1 for update OF emp_name;        empInfo csr_Update%rowtype;        emp_name_info  emp_info1.emp_name%TYPE;begin    FOR empInfo IN csr_Update LOOP      IF empInfo.emp_id<2 THEN        emp_name_info:='a';       elsif empInfo.emp_id=3 THEN      emp_name_info:='b';      END IF;      UPDATE emp_info1 SET emp_name=emp_name_info WHERE CURRENT OF csr_Update;     END LOOP;END;