? /**
? 该存储过程的用途是首先列举所有的员工信息，然后将工资低于最低工资标准的员工信息提高到最低工资，
? 然后将在在给定日期入职前的员工工资+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;