oracle基本plsql的使用实例详解
pl/sql 块是在 sql 语言之上发展起来的一种应用,可以集中的处理各种复杂的 sql 操 作。
组成:
declare: 声明部分 begin 编写主题 exception 捕获异常 end;
1.一个简单的pl/sql块
declare
i number;
begin
i:=30;
dbms_output.put_line('i的内容为:'||i);
end;
此时,直接执行程序即可。
执行之后发现没有任何的输出。因为 oracle 在系统设置中默认设置了输出不显示,如果要 显示的话,输入以下命令:
set serveroutput on;如果是使用toad,则可以在desktop中选择plsql,并打开dbms output。
带异常的语句块
declare
i number;
begin
i:=1/0;
exception
when zero_divide then
dbms_output.put_line("there is a exception");
end;
注意:输出字符串应该使用单引号”。
2.pl/sql块还可以接收用户的输入信息,例如:现在要求用户输入一个雇员编号,之后根据输入的内容进行查询,查询雇员的姓名。
用户的输入信息使用“&”完成
declare
eno number;
en varchar(20);
begin
--输入的信息保存在eno里
eno:=&no;
--之后根据eno的值,对数据库进行查询操作。
select ename into en from emp where empno = eno;
dbms_output.put_line('编号为:'||eno||'雇员的姓名为:'||en);
exception
when no_data_found then
dbms_output.put_line('没有此雇员');
end;
3.在以上的查询中再进一步:可以根据雇员的编号查出姓名及其领导的姓名和所在的部门, 进行显示。
declare
eno emp.empno%type ;
en emp.ename%type ;
mn emp.ename%type ;
dn dept.dname%type ;
dept dept %rowtype ;
begin
-- 输入的信息保存在 eno 里
eno := &no ;
-- 之后根据 eno 的值,对数据库进行查询操作
select e.ename,m.ename,d.dname into en,mn,dn
from emp e,dept d,emp m
where e.empno=7369 and e.mgr=m.empno and e.deptno=d.deptno ;
dbms_output.put_line('编号为:'||eno||'雇员的姓名为:'||en) ;
dbms_output.put_line('编号为:'||eno||'雇员的上级姓名为:'||mn) ;
dbms_output.put_line('编号为:'||eno||'雇员所在的部门:'||dn) ;
dbms_output.put_line(dept.deptno) ;
exception
when no_data_found then
dbms_output.put_line('没有此雇员') ;
end ;
说明:
• no_data_found 一种异常类型:没有发现数据
• emp.empno%type ; :表示以 emp 表中的 empno 字段的类型定义变量
• e.ename,m.ename,d.dname into en,mn,dn:一次可以同时放进去多个值
dept dept %rowtype ; 表示 dept 是一行数据
pl/sql 之中也包含了:循环、分支等条件控制语句
4.loop 循环(类似do…while)
格式:
loop 循环的语句 ; exit when 终止条件 ; 循环条件必须更改 ; end loop ;
例如:循环输出 1~10。
declare
countnum number ;
begin
--必须赋初值
countnum := 1 ;
loop
dbms_output.put_line('countnum = '||countnum) ;
exit when countnum>10 ;
countnum := countnum + 1 ;
end loop ;
end ;
注意:count关键字只能在sql语句中使用
此循环是先执行一次之后再进行判断,执行结果到11结束循环
5.while 循环
格式:
while(判断循环的条件) loop 循环的语句 ; 循环条件的改变 ; end loop ;
使用此语句修改上面的程序:
declare
countnum number ;
begin
--必须赋初值
countnum := 1 ;
while(countnum<10)
loop
dbms_output.put_line('countnum = '||countnum) ;
countnum := countnum + 1 ;
end loop ;
end ;
此语句,是先判断,如果满足条件则继续执行循环体,执行结果到9结束循环
6.for 循环
格式:
for 变量名称 in 变量的初始值..结束值
loop
循环语句 ;
end loop ;
修改上例:
declare
countnum number ;
begin
for countnum in 1..10
loop
dbms_output.put_line('countnum = '||countnum) ;
end loop ;
end ;
此语句countnum大于等于1小于等于10,最后输出1-10
7.if语句
条件判断
格式:
if 条件 then 满足条件时,执行此语句 end if ;
例:
declare
countnum number ;
begin
countnum := 11 ;
if countnum>10 then
dbms_output.put_line('countnum = '||countnum) ;
end if ;
end ;
条件语句,满足条件,执行一次
8.if…else 语句
如果 if 满足了,则执行,否则执行 else
例:
declare
countnum number ;
begin
countnum := 1 ;
if countnum>10 then
dbms_output.put_line('countnum = '||countnum) ;
else
dbms_output.put_line('条件不不成立') ;
end if ;
end ;
条件不满足执行else后面的语句
9.if…elsif…else 语句
例:
declare
countnum number ;
begin
countnum := 1 ;
if countnum>10 then
dbms_output.put_line('countnum = '||countnum);
elsif countnum<5 then
dbms_output.put_line('值小于 5');
else
dbms_output.put_line('条件不满足');
end if ;
end ;
多重判断语句,满足条件执行对应的跳转
10.goto语句
无条件跳转语句
用于程序控制非条件跳至指定标签<<???>>。不易控制和维护,慎用!
declare
eno emp.empno%type ;
sal emp.sal%type ;
begin
eno := &en ;
select sal into sal from emp where empno=eno ;
if sal>3500 then
goto po1 ;
elsif sal>2000 then
goto po2 ;
else
goto po3 ;
end if;
--标签
<<po1>> dbms_output.put_line('高工资。。。') ;
<<po2>> dbms_output.put_line('中等工资。。') ;
<<po3>> dbms_output.put_line('低工资。。。') ;
end;
感谢阅读,希望能帮助到大家,谢谢大家对本站的支持!