牛刀小试PLSQL编程之辟谷篇

条件分支语句
概述：PL/SQL中提供了三种条件分支语句：if---then、if---then---else、if---then---elsif---else
案例：若员工职位是PRESIDENT，则为其增加工资1000；若员工职位是MANAGER，则为其增加工资500；其它职位的员工工资只增加200

create or replace procedure my_pro(currNo number) isv_job emp.job%type;beginselect job into v_job from emp where empno=currNo;if v_job='PRESIDENT' thenupdate emp set sal=sal+1000 where empno=currNo;elsif v_job='MANAGER' thenupdate emp set sal=sal+500 where empno=currNo;elseupdate emp set sal=sal+200 where empno=currNo;end if;end;

控制结构语句
概述：常用的包括loop循环、while循环、for循环

--loop--loop是PL/SQL中最简单的循环语句，它以loop开头、以end loop结尾。这种循环至少会被执行一次--案例：输入用户名，并循环添加10个用户到users表中，用户编号从1开始增加create or replace procedure my_pro(currName varchar2) isv_num number:=1; --定义用户编号变量，并赋初值为1beginloopinsert into users values(v_num, currName);exit when v_num=10; --当编号为10时，退出循环v_num:=v_num+1;     --令编号自增end loop;end;

--while--只有条件为true时，才会执行循环体语句。它以while...loop开头、以end loop结尾--案例：输入用户名，并循环添加10个用户到users表中，用户编号从11开始增加create or replace procedure my_pro(currName varchar2) isv_num number:=11;beginwhile v_num<=20 loopinsert into users values(v_num, currName);v_num:=v_num+1;end loop;end;

--forbeginfor i in reverse 1..10 loopinsert into users values(i,'玄霄');end loop;end;

--goto--用于跳转到特定标号去执行语句。由于使用goto语句会增加程序的复杂性，使得应用程序可读性变差，故不建议使用--其基本语法为goto lable，这里的lable的是已经定义好的标号名declarei int :=1;beginloopdbms_output.put_line('输出 i=' || i);if i=10 thengoto myend; --跳转到myend标号的位置，再向下执行end if;i:=i+1;end loop;dbms_output.put_line('循环结束');<> --做一个标号dbms_output.put_line('循环结束22');end;

--null--它不会执行任何操作，并且会直接将控制传递到下一条语句。使用它的主要好处是可以提高PL/SQL的可读性declarev_sal emp.sal%type;v_name emp.ename%type;beginselect sal,ename into v_sal,v_name from emp where empno=&no;if v_sal<3000 thenupdate emp set comm=sal*0.1 where ename=v_name;elsenull; --可以认为它是一个空语句，什么都不干end if;end;

例外处理
概述：Oracle将例外分为预定义例外、非预定义例外、自定义例外三种
           预定义例外用于处理常见的Oracle错误
           非预定义例外则处理预定义例外不能处理的例外
           自定义例外用于处理与Oracle错误无关的其它情况
自定义例外：预定义例外和非预定义例外都是与Oracle错误相关的，并且出现的Oracle错误会隐含的触发相应的例外
                     而自定义例外与Oracle错误没有任何关联，它是由开发人员为特定情况所定义的例外

--自定义案例：编写一个PL/SQL块，接收一个员工的编号，并为其工资增加1000元，若该员工不存在，请提示create or replace procedure my_ex(myNo number) ismyex exception; --定义一个例外beginupdate emp set sal=sal+1000 where empno=myNo;if sql%notfound then --这里sql%notfound表示没有update成功raise myex;  --这里raise表示触发myex例外end if;exceptionwhen myex thendbms_output.put_line('错误：没有更新任何用户');end;

非预定义例外：它用于处理与预定义例外无关的Oracle错误
                         使用预定义例外只能处理21个Oracle错误，而当使用PL/SQL开发应用程序时，可能会遇到其它的一些Oracle错误
                         比如在PL/SQL块中执行DML语句时，违反了约束规定等等
预定义例外：它是由PL/SQL所提供的系统例外。当PL/SQL应用程序违反了Oracle规定的限制时，则会隐含的触发一个内部例外
                     PL/SQL为开发人员提供了二十多个预定义例外，下面介绍一些常用的例外

zero_divide          --当执行类似于【2/0】操作时，会触发该例外logon_denide         --当用户非法登录时，会触发该例外not_logged_on        --如果用户没有登录，便执行DML操作，会触发该例外storage_error        --如果超出了内存空间或内存被损坏，会触发该例外timeout_on_resource  --如果Oracle在等待资源时，出现了超时现象，会触发该例外--case_not_found：在开发PL/SQL块中编写case语句时，如果在where子句中没有包含必须的条件分支，则会触发该例外create or replace procedure my_pro(myno number) isv_sal emp.sal%type;beginselect sal into v_sal from emp where empno=myno;casewhen v_sal<1000 thenupdate emp set sal=sal+100 where empno=myno;when v_sal<2000 thenupdate emp set sal=sal+200 where empno=myno;end case;exceptionwhen case_not_found then --当查出来的薪水是3000的时候，便会触发该例外dbms_output.put_line('错误：case语句没有与'||v_sal||'相匹配的条件');end;--cursor_already_open：当重新打开已经打开的游标时，会隐含的触发该例外declarecursor cursor_emp is select ename,sal from emp;beginopen cursor_emp;for emp_record in cursor_emp loopdbms_output.put_line(emp_record.ename);end loop;exceptionwhen cursor_already_open thendbms_output.put_line('错误：游标已打开，请不要重复打开');end;--dup_val_on_index：在唯一索引所对应的列上插入重复值时，会隐含的触发该例外begininsert into dept values(10, '公关部', '北京');exceptionwhen dup_val_on_index thendbms_output.put_line('错误：在dept.detpno上不能出现重复值');end;--invaild_cursor：当视图在不合法的游标（如：从未打开的游标上提取数据或关闭未打开的游标等）上执行操作时，会触发该例外declarecursor cursor_emp is select ename,sal from emp;emp_record cursor_emp%rowtype;begin--open cursor_emp; --打开游标fetch cursor_emp into emp_record;dbms_output.put_line(emp_record.ename);close cursor_emp;exceptionwhen invalid_cursor thendbms_output.put_line('错误：请检测游标cursor_emp是否已打开');end;--invalid_number：当输入的数据有误时，会触发该例外beginupdate emp set sal=sal+'1oo'; --不如将数字100写成了1ooexceptionwhen invalid_number thendbms_output.put_line('错误：您所输入的数字1oo不正确');end;--no_data_found：当执行select--into--from没有返回行时，即查询到的数据不存在时，会触发该例外declarev_sal emp.sal%type;beginselect sal into v_sal from emp where ename='&name';exceptionwhen no_data_found thendbms_output.put_line('错误：该员工不存在');end;--too_many_rows：当执行select--into--from时，如果返回多行的值，即查询到的数据不止一条时，会触发该例外declarev_ename emp.ename%type;beginselect ename into v_ename from emp;exceptionwhen too_many_rows thendbms_output.put_line('错误：返回值应为一行，这里却返回了多行的数据');end;--value_error：在执行赋值操作时，若变量的长度不足以容纳实际数据，则会触发该例外declarev_ename varchar2(5);beginselect ename into v_ename from emp where empno=&no;dbms_output.put_line(v_ename);exceptionwhen value_error thendbms_output.put_line('错误：变量的长度不足');end;

Oracle分页

--无返回值的存储过程create table book(bookId number, bookName varchar2(50), publishHouse varchar2(50));--in表示这是一个输入参数，默认为in。out表示这是一个输出参数create or replace procedure my_pro_book(proBookId in number, proBookName in varchar2, proPublishHouse varchar2) isbegininsert into book values(proBookId, proBookName, proPublishHouse);end;--下面是Java代码CallableStatement cstmt = java.sql.Connection.prepareCall("{call my_pro_book(?,?,?)}");cstmt.setInt(1, 10);cstmt.setString(2, "盗墓笔记");cstmt.setString(3, "中国友谊出版公司");cstmt.execute();

--有返回值的存储过程(非列表)create or replace procedure my_pro_book(proBookId in number, proBookName out varchar2, proPublishHouse out varchar2) isbeginselect bookName,publishHouse into proBookName,proPublishHouse from book where bookId=proBookId;end;--下面是Java代码CallableStatement cstmt = java.sql.Connection.prepareCall("{call my_pro_book(?,?,?)}");cstmt.setInt(1, 10); //给第一个问号赋值cstmt.registerOutParameter(2, oracle.jdbc.OracleTypes.VARCHAR); //给第二个问号赋值，可以理解为注册值cstmt.registerOutParameter(3, oracle.jdbc.OracleTypes.VARCHAR); //给第三个问号赋值cstmt.execute(); //执行该存储过程String publishHouse = cstmt.getString(3); //取出该存储过程的返回值。注意所取参数值的问号顺序，它由该参数的位置决定

--有返回值的存储过程(列表[结果集])--说明：由于Oracle存储过程没有返回值，它的所有返回值都是通过out参数替代的，列表同样也不例外--说明：但由于是集合，所以不能用一般的参数，必须要用packagecreate or replace package my_package_emp as type my_cursor is ref cursor;end my_package_emp; --创建一个my_package_book包，并在该包中声明了一个my_cursor类型的游标create or replace procedure my_pro_emp(currNo in number, cursor_emp out my_package_emp.my_cursor) isbeginopen cursor_emp for select * from emp where deptno=currNo;end;--下面是Java代码CallableStatement cstmt = java.sql.Connection.prepareCall("{call my_pro_emp(?,?)}");cstmt.setInt(1, 10);cstmt.registerOutParameter(2, oracle.jdbc.OracleTypes.CURSOR); //此时为该参数注册的类型为CURSORcstmt.execute();ResultSet rs = (ResultSet)cstmt.getObject(2) //得到结果集。用ResultSet接收getObject()返回值的同时，注意造型while(rs.next()){System.out.println(rs.getInt(1)+" "+rs.getString(2));}

--编写Oracle分页的存储过程create or replace package my_package_pagination as type my_cursor_pagination is ref cursor;create or replace procedure my_pro_pagination(tableName in varchar2,                                               --表名pageSize in number,                                                  --分页大小。即每页显示的记录数pageNumber in number,                                                --当前页码rowCount out number,                                                 --总记录数pageCount out number,                                                --总页数cursor_pagination out my_package_pagination.my_cursor_pagination) is --返回的记录集v_sql varchar2(1000);                                                --定义分页的SQL语句字符串v_beginNo number:=(pageNumber-1)*pageSize+1;v_endNo number:=pageNumber*pageSize;beginv_sql:='select * from (select rownum myno, aa.* from (select * from '||tableName||' order by sal) aa where rownum<='||v_endNo||') where myno>='||v_beginNo;open cursor_pagination for v_sql;          --关联游标和SQL语句v_sql:='select count(*) from '||tableName; --组织一个SQL语句execute immediate v_sql into rowCount;     --执行一个SQL语句，并将返回的值赋给rowCountif mod(rowCount,pageSize)=0 then           --计算pageCountpageCount:=rowCount/pageSize;elsepageCount:=rowCount/pageSize+1;end if;close cursor_pagination; --关闭游标end;--以下是Java代码CallableStatement cstmt = java.sql.Connection.prepareCall("{call my_pro_pagination(?,?,?,?,?,?)}");cstmt.setString(1, "emp");                                      --指定表名，即待分页显示的表cstmt.setInt(2, 5);                                             --指定分页大小cstmt.setInt(3, 2);                                             --指定显示的当前页码cstmt.registerOutParameter(4, oracle.jdbc.OracleTypes.INTEGER); --注册总记录数cstmt.registerOutParameter(5, oracle.jdbc.OracleTypes.INTEGER); --注册总页数cstmt.registerOutParameter(6, oracle.jdbc.OracleTypes.CURSOR);  --注册返回的结果集cstmt.execute();Integer rowCount = cstmt.getInt(4);          --取出总记录数Integer pageCount = cstmt.getInt(5);         --取出总页数ResultSet rs = (ResultSet)cstmt.getObject(6) --得到结果集while(rs.next()){System.out.println("编号：" + rs.getInt(1) + "  姓名：" + rs.getString(2) + "  工资：" + rs.getFloat(6));}