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

PL/SQL基础之存储过程

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

/*

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

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

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

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

*/

--存储过程1，打印HelloWorld

create or replace procedure my_pro
is   --用于声明一些变量
 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)--out
is
 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;

Oracle实践--PL/SQL基础之存储过程,布布扣,bubuko.com