PLSQL条件语句完成员工加薪功能（记录类型+游标case when+if+for update+where current of）
2017-07-24 11:23
489 查看
TEST1:请使用函数+plsql完成给员工加薪的功能。 CLERK 加薪 20%; SALESMAN 加薪30%; MANAGER 加薪35% SQL> select * from t; EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO ---------- ---------- ---------- ---------- ----------- ---------- ---------- ---------- 7369 SMITH CLERK 7902 1980/12/17 800 20 7499 ALLEN SALESMAN 7698 1981/2/20 1600 300 30 7521 WARD SALESMAN 7698 1981/2/22 1250 500 30 7566 JONES MANAGER 7839 1981/4/2 2975 20 7654 MARTIN SALESMAN 7698 1981/9/28 1250 1400 30 7698 BLAKE MANAGER 7839 1981/5/1 2850 30 7782 CLARK MANAGER 7839 1981/6/9 2450 10 7788 SCOTT ANALYST 7566 1982/12/9 3000 20 7839 KING PRESIDENT 1981/11/17 5000 10 7844 TURNER SALESMAN 7698 1981/9/8 1500 0 30 7876 ADAMS CLERK 7788 1983/1/12 1100 20 7900 JAMES CLERK 7698 1981/12/3 950 30 7902 FORD ANALYST 7566 1981/12/3 3000 20 7934 MILLER CLERK 7782 1982/1/23 1300 10 14 rows selected 总结： ①如果使用case when如果 case 发现when不存在判断条件时会触发异常。 if判断时不会出现这样的情况。以下进行了测试， 在进行if测试时，将不是条件中三种职业的sal值为空，原因是在调用函数时，l_result返回为空，1+null还是null,则sal就为空。所以最后调整程序 nvl处理了一下空值，经过测试，数据没有问题。 ② where current of cur_t，定义游标时使用for update. 测试： 创建函数： create or replace function call_func(l_job varchar2) return number as l_result number; begin case when l_job = 'CLERK' then l_result := 0.2; when l_job = 'SALESMAN' then l_result := 0.3; when l_job = 'MANAGER' then l_result := 0.35; end case; return l_result; end call_func; declare l_empno number; l_ename varchar2(20); l_job varchar2(20); l_ratio number; cursor cur_t is select empno, ename, job from t for update; begin open cur_t; loop fetch cur_t into l_empno, l_ename, l_job; exit when cur_t%notfound; l_ratio := call_func(l_job); update t set sal =sal* (1 + nvl(l_ratio,0 4000 )) where current of cur_t; dbms_output.put_line(l_empno || l_ename || '已经成功加薪'); commit; end loop; close cur_t; exception when others then dbms_output.put_line(sqlerrm); end; 执行结果： 27 / 7369SMITH已经成功加薪 7499ALLEN已经成功加薪 7521WARD已经成功加薪 7566JONES已经成功加薪 7654MARTIN已经成功加薪 7698BLAKE已经成功加薪 7782CLARK已经成功加薪 7788SCOTT已经成功加薪 ORA-06592: 执行 CASE 语句时未找到 CASE PL/SQL procedure successfully completed SQL> select * from t; EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO ---------- ---------- ---------- ---------- ----------- ---------- ---------- ---------- 7369 SMITH CLERK 7902 1980/12/17 960 20 7499 ALLEN SALESMAN 7698 1981/2/20 2080 300 30 7521 WARD SALESMAN 7698 1981/2/22 1625 500 30 7566 JONES MANAGER 7839 1981/4/2 4016.25 20 7654 MARTIN SALESMAN 7698 1981/9/28 1625 1400 30 7698 BLAKE MANAGER 7839 1981/5/1 3847.5 30 7782 CLARK MANAGER 7839 1981/6/9 3307.5 10 7788 SCOTT ANALYST 7566 1982/12/9 3000 20 7839 KING PRESIDENT 1981/11/17 5000 10 7844 TURNER SALESMAN 7698 1981/9/8 1500 0 30 7876 ADAMS CLERK 7788 1983/1/12 1100 20 7900 JAMES CLERK 7698 1981/12/3 950 30 7902 FORD ANALYST 7566 1981/12/3 3000 20 7934 MILLER CLERK 7782 1982/1/23 1300 10 14 rows selected 使用 if 语句判断 SQL> create or replace function call_func(l_job varchar2) return number as 2 l_result number; 3 begin 4 if l_job = 'CLERK' then 5 l_result := 0.2; 6 elsif l_job = 'SALESMAN' then 7 l_result := 0.3; 8 elsif l_job = 'MANAGER' then 9 l_result := 0.35; 10 end if; 11 return l_result; 12 end call_func; 13 / Function created 执行结果如下：通过以下执行结果，将不是条件中三种职业的sal值为空，原因是在调用函数时，l_result返回为空，1+null还是null,则sal就为空。所以最后调整程序 nvl处理了一下空值 SQL> select * from t; EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO ---------- ---------- ---------- ---------- ----------- ---------- ---------- ---------- 7369 SMITH CLERK 7902 1980/12/17 960 20 7499 ALLEN SALESMAN 7698 1981/2/20 2080 300 30 7521 WARD SALESMAN 7698 1981/2/22 1625 500 30 7566 JONES MANAGER 7839 1981/4/2 4016.25 20 7654 MARTIN SALESMAN 7698 1981/9/28 1625 1400 30 7698 BLAKE MANAGER 7839 1981/5/1 3847.5 30 7782 CLARK MANAGER 7839 1981/6/9 3307.5 10 7788 SCOTT ANALYST 7566 1982/12/9 20 7839 KING PRESIDENT 1981/11/17 10 7844 TURNER SALESMAN 7698 1981/9/8 1950 0 30 7876 ADAMS CLERK 7788 1983/1/12 1320 20 7900 JAMES CLERK 7698 1981/12/3 1140 30 7902 FORD ANALYST 7566 1981/12/3 20 7934 MILLER CLERK 7782 1982/1/23 1560 10 14 rows selected TEST2： 请使用PLSQL完成对SCOTT的emp表中的员工，按照不同的工作岗位类型，进行涨工资的操作 CLERK 涨幅500块 ANALYST 涨幅1000块 MANAGER 涨幅8% 其他岗位涨幅5% create or replace procedure p_test as --定义一个游标获取值 cursor cur_t is select empno, job, sal from t; --定义一个记录类型 type rec_emp_type is record( l_empno t.empno%type, l_job t.job%type, l_sal t.sal%type); rec_emp rec_emp_type; begin ---打开游标 open cur_t; --exit/continue语句必须出现在一个循环里 loop fetch cur_t into rec_emp; exit when cur_t%notfound; ---if判断 if rec_emp.l_job = 'CLERK' then update t set sal = sal + 500 where t.empno = rec_emp.l_empno; commit; elsif rec_emp.l_job = 'ANALYST' then update t set sal = sal + 100 where t.empno = rec_emp.l_empno; commit; elsif rec_emp.l_job = 'MANAGER' then update t set sal = sal * (1 + 0.08) where t.empno = rec_emp.l_empno; commit; else update t set sal = sal * (1 + 0.06) where t.empno = rec_emp.l_empno; commit; ---关闭游标 end if; end loop; close cur_t; end; 结果： SQL> select * from t; EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO ---------- ---------- ---------- ---------- ----------- ---------- ---------- ---------- 7369 SMITH CLERK 7902 1980/12/17 800 20 7499 ALLEN SALESMAN 7698 1981/2/20 1600 300 30 7521 WARD SALESMAN 7698 1981/2/22 1250 500 30 7566 JONES MANAGER 7839 1981/4/2 2975 20 7654 MARTIN SALESMAN 7698 1981/9/28 1250 1400 30 7698 BLAKE MANAGER 7839 1981/5/1 2850 30 7782 CLARK MANAGER 7839 1981/6/9 2450 10 7788 SCOTT ANALYST 7566 1982/12/9 3000 20 7839 KING PRESIDENT 1981/11/17 5000 10 7844 TURNER SALESMAN 7698 1981/9/8 1500 0 30 7876 ADAMS CLERK 7788 1983/1/12 1100 20 7900 JAMES CLERK 7698 1981/12/3 950 30 7902 FORD ANALYST 7566 1981/12/3 3000 20 7934 MILLER CLERK 7782 1982/1/23 1300 10 14 rows selected SQL> exec p_test; PL/SQL procedure successfully completed SQL> select * from t; EMPNO ENAME JOB MGR HIREDATE SAL COMM DEPTNO ---------- ---------- ---------- ---------- ----------- ---------- ---------- ---------- 7369 SMITH CLERK 7902 1980/12/17 1300 20 7499 ALLEN SALESMAN 7698 1981/2/20 1696 300 30 7521 WARD SALESMAN 7698 1981/2/22 1325 500 30 7566 JONES MANAGER 7839 1981/4/2 3213 20 7654 MARTIN SALESMAN 7698 1981/9/28 1325 1400 30 7698 BLAKE MANAGER 7839 1981/5/1 3078 30 7782 CLARK MANAGER 7839 1981/6/9 2646 10 7788 SCOTT ANALYST 7566 1982/12/9 3100 20 7839 KING PRESIDENT 1981/11/17 5300 10 7844 TURNER SALESMAN 7698 1981/9/8 1590 0 30 7876 ADAMS CLERK 7788 1983/1/12 1600 20 7900 JAMES CLERK 7698 1981/12/3 1450 30 7902 FORD ANALYST 7566 1981/12/3 3100 20 7934 MILLER CLERK 7782 1982/1/23 1800 10 14 rows selected SQL>
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 一条insert语句批量插入多条记录 AND 多条件游标更新 变CASE WHEN更新法提高速度
- linux shell 流程控制（条件if,循环【for,while】,选择【case】语句实例
- 题目：求1+2+…+n，要求不能使用乘除法、for、while、if、else、switch、case等关键字以及条件判断语句（A?B:C）。
- linux shell 流程控制（条件if,循环【for,while】,选择【case】语句实例
- 题目：求1+2+…+n，要求不能使用乘除法、for、while、if、else、switch、case等关键字以及条件判断语句（A?B:C）
- 每天学习一算法系列（12） (求1+2+…+n,不能使用乘除法,for、while、if 、else、switch、case 等关键字以及条件判断语句)
- 求1+2+3+...+n，要求不能使用乘除法、for、while、if、else、switch、case等关键字及条件判断语句（A?B:C）。
- 题目：求1+2+…+n，要求不能使用乘除法、for、while、if、else、switch、case等关键字以及条件判断语句（A?B:C）。
- C语言奇思妙想：求1+2+…+n，要求不能使用乘除法、for、while、if、else、s witch、case 等关键字以及条件判断语句（A?B:C）
- 实现1+2+3+...+n。要求不能使用乘除法，for，while，if，else，switch，case，等关键字及条件判断语句。
- linux shell 流程控制（条件if,循环【for,while】,选择【case】语句实例
- 求1+2+3+...+n，要求不能使用乘除法，for,while，if,else,switch,case等关键字以及条件判断语句
- 求1+2+…+n， 要求不能使用乘除法、for、while、if、else、switch、case等关键字以及条件判断语句（A?B:C）。
- 求1+2+…+n，要求不能使用乘除法、for、while、if、else、s witch、case 等关键字以及条件判断语句（A?B:C）和不用循环/goto/递归输出1~100的10种写法
- 求1+2+3+...+n，要求不能使用乘除法，for,while，if,else,switch,case等关键字以及条件判断语句
- Oracle游标之select for update和where current of 语句
- 【九度1506】求1+2+3+...+n，要求不能使用乘除法、for、while、if、else、switch、case等关键字及条件判断语句（A?B:C）。
- 求1+2+3+...+n，要求不能使用乘除法、for、while、if、else、switch、case等关键字及条件判断语句（A?B:C）
- linux shell 流程控制（条件if,循环【for,while】,选择【case】语句实例
- linux shell 流程控制（条件if,循环【for,while】,选择【case】语句实例