oracle中存储过程如何使用-创新互联
今天就跟大家聊聊有关oracle中存储过程如何使用,可能很多人都不太了解,为了让大家更加了解,小编给大家总结了以下内容,希望大家根据这篇文章可以有所收获。
让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名注册、网页空间、营销软件、网站建设、玉门网站维护、网站推广。一. 使用for循环游标:遍历所有职位为经理的雇员
1. 定义游标(游标就是一个小集合)
2. 定义游标变量
3. 使用for循环游标
declare -- 定义游标c_job cursor c_job is select empno, ename, job, sal from emp where job = 'MANAGER'; -- 定义游标变量c_row c_row c_job%rowtype; begin -- 循环游标,用游标变量c_row存循环出的值 for c_row in c_job loop dbms_output.put_line(c_row.empno || '-' || c_row.ename || '-' || c_row.job || '-' || c_row.sal); end loop; end;
二. fetch游标:遍历所有职位为经理的雇员
使用的时候必须明确的打开和关闭
declare --定义游标c_job cursor c_job is select empno, ename, job, sal from emp where job = 'MANAGER'; --定义游标变量c_row c_row c_job%rowtype; begin open c_job; loop --提取一行数据到c_row fetch c_job into c_row; --判读是否提取到值,没取到值就退出 exit when c_job%notfound; dbms_output.put_line(c_row.empno || '-' || c_row.ename || '-' || c_row.job || '-' || c_row.sal); end loop; --关闭游标 close c_job; end;
三. 使用游标和while循环:遍历所有部门的地理位置
--3,使用游标和while循环来显示所有部门的的地理位置(用%found属性) declare --声明游标 cursor csr_TestWhile is select loc from dept; --指定行指针 row_loc csr_TestWhile%rowtype; begin open csr_TestWhile; --给第一行数据 fetch csr_TestWhile into row_loc; --测试是否有数据,并执行循环 while csr_TestWhile%found loop dbms_output.put_line('部门地点:' || row_loc.LOC); --给下一行数据 fetch csr_TestWhile into row_loc; end loop; close csr_TestWhile; end;
四. 带参的游标:接受用户输入的部门编号
declare -- 带参的游标 cursor c_dept(p_deptNo number) is select * from emp where emp.deptno = p_deptNo; r_emp emp%rowtype; begin for r_emp in c_dept(20) loop dbms_output.put_line('员工号:' || r_emp.EMPNO || '员工名:' || r_emp.ENAME || '工资:' || r_emp.SAL); end loop; end;
五. 加锁的游标:对所有的salesman增加佣金500
declare --查询数据,加锁(for update of) cursor csr_addComm(p_job nvarchar2) is select * from emp where job = p_job for update of comm; r_addComm emp%rowtype; commInfo emp.comm%type; begin for r_addComm in csr_addComm('SALESMAN') loop commInfo := r_addComm.comm + 500; --更新数据(where current of) update emp set comm = commInfo where current of csr_addComm; end loop; end;
六. 使用计数器:找出两个工作时间最长的员工
declare cursor crs_testComput is select * from emp order by hiredate asc; --计数器 top_two number := 2; r_testComput crs_testComput%rowtype; begin open crs_testComput; fetch crs_testComput into r_testComput; while top_two > 0 loop dbms_output.put_line('员工姓名:' || r_testComput.ename || ' 工作时间:' || r_testComput.hiredate); --计速器减1 top_two := top_two - 1; fetch crs_testComput into r_testComput; end loop; close crs_testComput; end;
七. if/else判断:对所有员工按基本薪水的20%加薪,如果增加的薪水大于300就取消加薪
declare cursor crs_upadateSal is select * from emp for update of sal; r_updateSal crs_upadateSal%rowtype; salAdd emp.sal%type; salInfo emp.sal%type; begin for r_updateSal in crs_upadateSal loop salAdd := r_updateSal.sal * 0.2; if salAdd > 300 then salInfo := r_updateSal.sal; dbms_output.put_line(r_updateSal.ename || ': 加薪失败。' || '薪水维持在:' || r_updateSal.sal); else salInfo := r_updateSal.sal + salAdd; dbms_output.put_line(r_updateSal.ENAME || ': 加薪成功.' || '薪水变为:' || salInfo); end if; update emp set sal = salInfo where current of crs_upadateSal; end loop; end;
八. 使用case
when:按部门进行加薪
declare cursor crs_caseTest is select * from emp for update of sal; r_caseTest crs_caseTest%rowtype; salInfo emp.sal%type; begin for r_caseTest in crs_caseTest loop case when r_caseTest.deptno = 10 THEN salInfo := r_caseTest.sal * 1.05; when r_caseTest.deptno = 20 THEN salInfo := r_caseTest.sal * 1.1; when r_caseTest.deptno = 30 THEN salInfo := r_caseTest.sal * 1.15; when r_caseTest.deptno = 40 THEN salInfo := r_caseTest.sal * 1.2; end case; update emp set sal = salInfo where current of crs_caseTest; end loop; end;
九. 异常处理:数据回滚
set serveroutput on; declare d_name varchar2(20); begin d_name := 'developer'; savepoint A; insert into DEPT values (50, d_name, 'beijing'); savepoint B; insert into DEPT values (40, d_name, 'shanghai'); savepoint C; exception when others then dbms_output.put_line('error happens'); rollback to A; commit; end; /
十. 基本指令:
set serveroutput on size 1000000 format wrapped; --使DBMS_OUTPUT有效,并设置成较大buffer,防止"吃掉"最前面的空格 set linesize 256; --设置一行可以容纳的字符数 set pagesize 50; --设置一页有多少行数 set arraysize 5000; --设置来回数据显示量,这个值会影响autotrace时一致性读等数据 set newpage none; --页和页之间不设任何间隔 set long 5000; --LONG或CLOB显示的长度 set trimspool on; --将SPOOL输出中每行后面多余的空格去掉 set timing on; --设置查询耗时 col plan_plus_exp format a120; --autotrace后explain plan output的格式 set termout off; --在屏幕上暂不显示输出的内容,为下面的设置sql做准备 alter session set nls_date_format='yyyy-mm-dd hh34:mi:ss'; --设置时间格式
小知识:
下面的语句一定要在Command Window里面才能打印出内容
set serveroutput on; begin dbms_output.put_line('hello!'); end; /
看完上述内容,你们对oracle中存储过程如何使用有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注创新互联行业资讯频道,感谢大家的支持。
网页名称:oracle中存储过程如何使用-创新互联
路径分享:http://scyanting.com/article/csshoe.html