oracle中子程序包括什么,Oracle就业课之子程序

4、子程序

回顾

练习：

declare

v_name emp.ename%type:=‘张三‘;

v_job emp.job%type:=‘游客‘;

begin

for n in 1..3 loop

insert into emp(empno,ename,job,mgr,hiredate,sal,deptno) values(n*10,v_name||n,v_job,8000,to_date(‘2020-9-16‘,‘yyyy-MM-dd‘),16000,10);

end loop;

commit; --提交事务

exception

when others then

rollback; --回滚事务

end;

学习目标

1、子程序

2、存储过程

3、函数

4、包

学习内容

1、子程序

plsql:过程化的sql语言；变量、常量、匿名块、分支语句、循环语句

子程序：命名的程序块，存储过程 和 函数。

2、存储过程

分析：完成一些指定的业务，单一的命令无法搞定；比如：转账，分页操作

存储过程：类似于java中的方法，通过多条sql命令，完成一个特定的任务。

优点：

1、执行效率高：预编译的，存储在服务器上，第一次创建好，系统会进行预编译；

2、减少网络流量：代码封装到过程中，只需要调用过程名就行。

3、安全性：A:小明 B：小红 C：小青

4、重用性：代码角度考虑。

存储过程中能写的命令：

1、insert,update,delete,select ...into 变量

2、过程控制命令(条件、循环)

3、不能写DDL

使用存储过程

1、定义过程

-- 创建过程 procedure:过程

create or replace procedure sp_test1(

-- 参数

)

as

-- 声明部分 (临时变量：过程中使用的变量)

begin

exception

end;

2、调用过程

1 call 过程名(参数);

2、

begin

过程名(参数);

end;

3、sqlplus:

execute 过程名();

栗子：

1、转账：无参数

create or replace procedure sp_zhuanzhang

as

v_money bank.balance%type:=1000; --要转账的钱数

begin

update bank set balance=balance-v_money where name=‘李四‘;

update bank set balance=balance+v_money where name=‘张三‘;

commit;

exception

when others then

rollback;

end;

调用:

call sp_zhuanzhang();

begin

sp_zhuanzhang;

end;

2、转账：带参数

--flag :1 ：张三---》李四 2：李四 --->张三 钱数

create or replace procedure sp_zhuanzhang2

(

--输入参数

--参数名 数据类型(变量声明)

flag in number,

money in number

)

as

begin

if flag=1 then

update bank set balance=balance-money where name=‘张三‘;

update bank set balance=balance+money where name=‘李四‘;

else

update bank set balance=balance-money where name=‘李四‘;

update bank set balance=balance+money where name=‘张三‘;

end if;

commit;

exception

when others then

rollback;

end;

调用：

declare

flag number(1):=2;

money number(5):=500;

begin

sp_zhuanzhang2(flag,money);

end;

3、转账：带输入和输出参数

create or replace procedure sp_zhuanzhang3

(

--输入参数

--参数名 数据类型(变量声明)

flag in number,

money in number,

--输出参数：调用过程后，可以在外部获取到值的数据：类似于返回值，可以有多个

balance1 out bank.balance%type,

balance2 out bank.balance%type

)

as

begin

if flag=1 then

update bank set balance=balance-money where name=‘张三‘;

update bank set balance=balance+money where name=‘李四‘;

else

update bank set balance=balance-money where name=‘李四‘;

update bank set balance=balance+money where name=‘张三‘;

end if;

commit;

select balance into balance1 from bank where name=‘张三‘;

select balance into balance2 from bank where name=‘李四‘;

exception

when others then

rollback;

end;

调用:

declare

--声明变量：用来接受输出参数的值

b1 bank.balance%type;

b2 bank.balance%type;

begin

sp_zhuanzhang3(2,1000,balance2=>b1,balance1=>b2);

dbms_output.put_line(‘张三:‘||b2||‘李四:‘||b1);

end;

过程调用中的参数传递

1、按照位置传递

2、按照名字传值：顺序无关

参数名=>变量 参数名=>变量 参数名=>变量

3、组合传递

位置传递+名字传递；位置传递(靠前)

3、函数

本质上跟过程一样：必须有返回值

定义函数：

create or replace function 名字(

-- 参数

--名字 类型

) return 数据类型

as

begin

return 结果;

end;

例子：

1、根据部门编号查询部门名称

create or replace function f_getDname(

-- 传入参数 ：部门编号

dno dept.deptno%type

) return varchar2 --返回字符串

as

v_name dept.dname%type;

begin

select dname into v_name from dept where deptno=dno;

return v_name; --返回结果

end;

--调用

select empno,ename,deptno,f_getdname(deptno) 部门 from emp

where f_getdname(deptno)=‘外交部‘;

2、根据部门编号统计部门人数

create or replace function f_getdeptcount(

--参数

dno number

)return number

as

v_count number(5);

begin

select count(*) into v_count from emp where deptno=dno;

return v_count;

end;

--调用

select deptno,dname,f_getdeptcount(deptno) 人数 from dept;

3、生成随机数字的函数

create or replace function getrandomvalue return number

as

n number(20);

begin

n:=dbms_random.value(1,10);

return n;

end;

--调用

select getrandomvalue() from dual ;

调用：

declare

n number(5);

begin

n:=getrandomvalue();

dbms_output.put_line(n);

end;

4、包

包：package

一系列的过程和函数

可以根据业务的不同创建不同的包：声明变量+过程+函数；

包：

1、包规范：类似于java中的接口

2、包体：类似于实现类

创建包规范：

create or replace package 名字

is

--声明 变量 过程 函数

end 名字;

创建包体：

create or replace package body 名字

is

--实现包规范定义好的过程和函数

end;

栗子：

create or replace package myfirstpackage

is

--声明 全局的变量

dno dept.deptno%type;

--过程：向员工表中录入数据，不能录入重名的

procedure add_emp(vno in number,vname in varchar2);

--过程：根据部门编号，删除部门信息，只能删除没有员工的部门

procedure del_dept(vno in number);

end package;

--包体

create or replace package body myfirstpackage

is

--过程实现

procedure add_emp(vno in number,vname in varchar2)

as

v_count number(2);-- 满足条件的员工的数量

begin

select count(*) into v_count from emp where ename=vname;

if v_count>0 then

--提示错误消息

--dbms_output.put_line(‘‘);

--raise_appliction_error:抛出一个自定义的错误消息，错误号：-20000-

raise_application_error(-20001,‘名字重复‘);

else

insert into emp(empno,ename) values(vno,vname);

commit;

end if;

end;

--过程实现:根据部门编号，删除部门信息，只能删除没有员工的部门

procedure del_dept(vno in number)

as

v_count number(3);

begin

--根据部门编号查询该部门对应的人数

select count(*) into v_count from emp where deptno=vno;

if v_count=0 then

delete from dept where deptno=vno;

commit;

else

raise_application_error(-20002,‘该部门下有员工,无法删除‘);

end if;

end;

end myfirstpackage;

总结

1、存储过程

2、函数

相同点：

1、预编译、执行效率高、安全性、减少网络流量

2、输入参数、输出参数

不同点：

1、函数必须指定return(返回值)

3、包：包规范和包体(实现)；

Oracle就业课之子程序

标签：bms   comm   lan   必须   tde   select   数据类型   创建过程   接受

本条技术文章来源于互联网，如果无意侵犯您的权益请点击此处反馈版权投诉 本文系统来源：https://blog.51cto.com/2096101/2539954