PL/SQL也是一门高级语言,所以流程控制是必须要有的,oracle数据库的pl/sql比sqlserver数据库要难,很多pl/sql中有的sqlserver里面没有
流程控制;
分支语句 if 条件 then 结果 else 结果 end if ;
条件语句 case when 条件 then 结果;
循环语句 loop end loop; --while循环; for循环
顺序语句 goto
null语句
下面所有的语句有的写在过程中的有的写在pl/sql块中,pl/sql块中是最方便的
----------------分支语句
------------------------------简单的条件判断 if – then
--问题:编写一个过程,可以输入一个雇员名,
--如果该雇员的工资低于2000,就给该员工工资增加500。
set serveroutput on;--打开输入输出
create or replace procedure pro_1(v_empno number) is
v_sal emp.sal%type;
begin
select sal into v_sal from emp where empno = v_empno;
if v_sal<2000 then
v_sal:=v_sal+500;
--更新这个员工的工资
update emp set sal=v_sal where empno=v_empno;
end if;
end;
-----------------二重条件分支 if – then – else
--问题:编写一个过程,可以输入一个雇员名,
--如果该雇员的工资低于2000,就给该员工工资增加500,否则只加50。
set serveroutput on;--打开输入输出
create or replace procedure pro_1(v_empno number) is
v_sal emp.sal%type;
begin
select sal into v_sal from emp where empno = v_empno;
if v_sal<2000 then
v_sal:=v_sal+500;
else
v_sal:=v_sal+50;
end if;
--更新这个员工的工资
update emp set sal=v_sal where empno=v_empno;
end;
---------------------多重条件 if then else if then else
--问题:编写一个过程,
--可以输入一个雇员编号,
--如果该雇员的职位是PRESIDENT就给他的工资增加500,
--如果该雇员的职位是MANAGER就给他的工资增加100,
--其它职位的雇员工资增加50。
create or replace procedure pro_2(v_empno number) is
v_job emp.job%type;
v_sal emp.sal%type;
begin
select job,sal into v_job,v_sal from emp where empno =v_empno;
if v_job='PRESIDENT' then
v_sal:=v_sal+500;
else if v_job='MANAGER' then
v_sal:=v_sal+100;
else
v_sal:=v_sal+50;
end if;
end if;
--更新数据
update emp set sal=v_sal where empno=v_empno;
end;
------------------------case语句
--case 条件控制
--问题:编写一个过程,
--可以输入一个雇员编号,
--如果该雇员的职位是PRESIDENT就给他的工资增加50,
--如果该雇员的职位是MANAGER就给他的工资增加40,
--CLERK 30
create or replace procedure pro_4(v_empno number) is
--声明变量
v_job emp.job%type;
v_sal emp.sal%type;
begin
select job,sal into v_job,v_sal from emp where empno =v_empno;
case v_job
when v_job='PRESIDENT' then
v_sal:=v_sal+50;
when v_job='MANAGER' then
v_sal:= v_sal+40;
when v_sal ='CLERK' then
v_sal:=v_sal+30;
else
null;--
end case;
--更新数据
update emp set sal=v_sal where empno=v_empno;
end;
----------------------------循环语句
loop循环;
--Loop 相当于java中的do...while
--请编写一个过程,可以输入用户名,
--并循环添加10个用户到emp_user表中,用户编号从1开始增加。
建表;
create table emp_user (userno number(10),username varchar2(10));
向emp_user表中循环添加10条数据
create or replace procedure pro_3(v_username varchar2)is
v_userid emp_user.userid%type :=1;
begin
--循环
loop
insert into emp_user values(v_userno,v_username);
--v_userid++
v_userid=v_userid+1;
--退出循环
exit when v_userid=11;
end loop;
end;
-----------------------------while循环
--问题:请编写一个过程,
--可以输入用户名,并循环添加10个用户到users表中,
--用户编号从11开始增加。
建表;
create table emp_user (userno number(10),username varchar2(10));
使用while向表中添加数据
create or replace procedure pro_4(v_userno number )is
v_userid emp_user.userid%type :=1;
begin
while v_userid<10 loop
insert into emp_user values(v_userid,v_username);
--v_userid++
v_userid=v_userid+1;
end loop
end;
--------------------------for 语句
--for循环
--for i in 1..10 loop
--for i in reverse 1..10 loop
建表;
create table emp_user (userno number(10),username varchar2(10));
使用for向表中添加十条数据
create or replace procedure pro_5(v_userno number)is
begin
for i in 1..10 loop
insert into emp_user values(i,v_username);
end loop;
end;
-----------goto语句
goto语句可以跳转到程序的任何位置,java中已经不用这个关键字了,但是还保留着
createor replace procedure pro_5(v_userno number) is
i number(20):=1;
begin
loop
i:=i+1;
if i=10 then
goto aaa;
end if;
end loop;
dbms_output.put_line('程序执行');
<<aaa>>;--设置goto的跳转标签
dbms_output.put_line('早就执行');
end;
当i=10时程序将条状到 <<aaa>>;--设置goto的跳转标签 dbms_output.put_line('早就执行');这个地方,标签上一行输出语句将不会输出