/**
该存储过程的用途是首先列举所有的员工信息,然后将工资低于最低工资标准的员工信息提高到最低工资,
然后将在在给定日期入职前的员工工资+500
*/
create or replace procedure practice_cursor(in_min_sal emp.sal%type,
in_job_date varchar2) is
--在声明游标时候定义好了select语句的游标
cursor emp_cursor is
select * from emp e order by e.deptno;
--定义参数游标,该参数游标的作用是将工资少于min_sal的工资提高到min_sal。
cursor advance_sal(min_sal emp.sal%type) is
select e.empno, e.ename, e.job, e.mgr, e.hiredate, e.deptno
from emp e
where e.sal < min_sal
order by e.deptno
for update;
--使用表定义记录类型表量
emp_record emp%rowtype;
--使用游标定义纪录类型
advance_sal_record advance_sal%rowtype;
--定义动态游标类型
type before_hride_date is ref cursor return emp%rowtype;
--定义动态游标变量,在后续使用中要求返回所有在1981-02-01前入职的员工信息
before_hride_date_cursor before_hride_date;
begin
--程序段1------------------紧紧是打印所有的现有员工信息--------------------------------------------------------
dbms_output.put_line('调整工资前所有的员工信息如下:----------------------------------------');
open emp_cursor;
--使用简单loop循环获取数据
loop
--注意是fetch 游标 into 记录类型 ,不要搞反了啊
fetch emp_cursor
into emp_record;
exit when emp_cursor%notfound;
dbms_output.put_line('员工编号:' || emp_record.empno || ' 员工名字:' ||
emp_record.ename || ' 员工职位:' || emp_record.job ||
' 员工入职日期:' || emp_record.hiredate || ' 员工部门号:' ||
emp_record.deptno||' 员工工资:'||emp_record.sal);
end loop;
close emp_cursor;
--程序段2-----------------------------------------------------------------------------------------
open advance_sal(in_min_sal);
fetch advance_sal
into advance_sal_record;
while (advance_sal%found) loop
update emp e
set e.sal = in_min_sal
where e.empno = advance_sal_record.empno;
fetch advance_sal
into advance_sal_record;
end loop;
dbms_output.put_line('有' || advance_sal%rowcount ||
'名员工的工资低于最低工资,已经都被加到了最低标准');
close advance_sal;
dbms_output.put_line('调整最低工资标志后所有的员工信息如下:----------------------------------------');
open emp_cursor;
--使用简单loop循环获取数据
loop
--注意是fetch 游标 into 记录类型 ,不要搞反了啊
fetch emp_cursor
into emp_record;
exit when emp_cursor%notfound;
dbms_output.put_line('员工编号:' || emp_record.empno || ' 员工名字:' ||
emp_record.ename || ' 员工职位:' || emp_record.job ||
' 员工入职日期:' || emp_record.hiredate || ' 员工部门号:' ||
emp_record.deptno||' 员工工资:'||emp_record.sal);
end loop;
close emp_cursor;
--程序段3-----------------------------------------------------------------------------------------
open before_hride_date_cursor for select * from emp e where to_char(e.hiredate,'yyyy-mm-dd') > in_job_date for update;
loop
fetch before_hride_date_cursor into emp_record;
exit when before_hride_date_cursor%notfound;
update emp e set e.sal = e.sal+500 where e.empno = emp_record.empno;
end loop;
dbms_output.put_line('共有:'||before_hride_date_cursor%rowcount||'名员工是'||in_job_date||'前入职的,他们的工资都加了500');
close before_hride_date_cursor;
dbms_output.put_line('调整'||in_job_date||'前入职的所有的员工工资后的信息如下---------------------------');
open emp_cursor;
--使用简单loop循环获取数据
loop
--注意是fetch 游标 into 记录类型 ,不要搞反了啊
fetch emp_cursor
into emp_record;
exit when emp_cursor%notfound;
dbms_output.put_line('员工编号:' || emp_record.empno || ' 员工名字:' ||
emp_record.ename || ' 员工职位:' || emp_record.job ||
' 员工入职日期:' || emp_record.hiredate || ' 员工部门号:' ||
emp_record.deptno||' 员工工资:'||emp_record.sal);
end loop;
close emp_cursor;
exception
when others then
dbms_output.put_line(sqlcode||' ,'||sqlerrm);
end;
--测试部分
begin
practice_cursor(900, '1982-02-01');
end;
select * from emp e where to_char(e.hiredate,'yyyy-mm-dd') > '1980-02-01'