Oracle实践-PL/SQL基础之存储过程

Oracle实践--PL/SQL基础之存储过程

PL/SQL基础之存储过程

存储过程：过程是用于完成特定任务的子程序(代码的集合)

/*

  子程序的优点：1.模块化，将程序分解为逻辑模块；

                2.可重用性，可以被任意数目的程序调用；

                3，可维护性，简化维护操作；

                4.安全性：通过设置权限，使数据更安全

*/

--存储过程1，打印HelloWorld

create or replace procedure my_prois   --用于声明一些变量 v_string varchar2(20) :='helloworld!';begin dbms_output.put_line(v_string);end;

调用方式有三种：

begin my_pro;--这种方式调用无参的存储过程，括号可以省略 my_pro();end;

call my_pro();--无参的也必须带括号

在command中输入 set serveroutput on  execute my_pro();

--存储过程2，带参数的，默认是输入参数

create or replace procedure my_pro2(v_sal  number)--参数，要制定类型，varchar不能指定长度is  v_sql varchar2(200);  v_emp emp%rowtype;begin v_sql :='select * from emp where sal =: s'; execute immediate v_sql into v_emp using v_sal; dbms_output.put_line(v_emp.ename); exception   when no_data_found then     dbms_output.put_line('没有找到！');end; select *from emp;call my_pro2(820);

--存储过程3，带参数，输入(in)和输出(out)参数,关键字：in out,不写默认是in

create or replace procedure my_pro3(v_sal number, v_name out emp.ename%type)--outis v_sql varchar2(200);begin v_sql :='select ename from emp where sal =: s'; execute immediate v_sql into v_name using v_sal;end;

--存储过程4，输入输出类型，in out,交换两个数

create or replace procedure swap(v_num1 in out number, v_num2 in out number)-- in out 顺序不能颠倒as v_temp number;begin v_temp := v_num1; v_num1 := v_num2; v_num2 := v_temp;end;

--调用存储过程4

declare v_num1 number :='&num1'; v_num2 number :='&num2';begin dbms_output.put_line('交换前：num1 = '||v_num1||'-----num2 = '||v_num2); swap(v_num1,v_num2); dbms_output.put_line('交换后：num1 = '||v_num1||'-----num2 = '||v_num2);end;

--存储过程5，计算总页数和总记录数

create or replace procedure countPageAndRecords      (tableName varchar2, pageSize number,totalRecord out number,totalPage out number)as v_sql varchar2(200);begin v_sql :='select count(*) from '||tableName; execute immediate v_sql into totalRecord; totalPage :=ceil(totalRecord/pageSize);  --计算方式二 if mod(totalRecord,pageSize) =0 then   totalPage := totalRecord/pageSize; else   totalPage :=floor(totalRecord/pageSize)+1; end if;end;

--测试储过程5

declare tableName varchar2(50) :='&表名：'; pageSize number :='&分页单位：'; totalRecord number; totalPage number;begin countPageAndRecords(tableName,pageSize,totalRecord,totalPage); dbms_output.put_line('总数为：'||totalRecord); dbms_output.put_line('总页数为：'||totalPage);end;

文章来源：http://blog.csdn.net/ysjian_pingcx/article/details/25742459