带参数的光标
cursor 光标名 [(参数名 数据类型[,参数名 数据类型]...)]
is select 语句;
案例
--查询某个部门中员工的姓名
SET SERVEROUTPUT ON
DECLARE
--定义带参数的光标
cursor cemp(dno number)is select first_name,last_name from EMPLOYEES where EMPLOYEES.DEPARTMENT_ID = dno;
pe_first_name EMPLOYEES.FIRST_NAME%TYPE;
pe_last_name EMPLOYEES.LAST_NAME%TYPE;
BEGIN
--打开光标
open cemp(60);
loop
--取出每个员工的姓名
FETCH cemp into pe_first_name,pe_last_name;
exit when cemp%notfound;
DBMS_OUTPUT.PUT_LINE(pe_first_name||' '||pe_last_name);
end loop;
--关闭光标
close cemp;
end;
/
网友评论