Oracle使用手册(二)---流程控制

--流程控制

--1. if..then..end if

set serveroutput on

declare

i integer:=60;

j integer:=30;

begin

if i>=j then

dbms_output.put_line(j);

end if;

end;

--2.if嵌套条件控制

if 条件1 then

if 条件2 then

语句段1;

else

语句段2;

end if;

else

语句段3;

end if;

--3.循环控制

--loopexitend loop

set serveroutput on

declare

i integer:=10;

j integer:=20;

w integer:=10;

begin

loop

i:=i+1;

if(j=i)then

begin

dbms_output.put_line('我哥俩现在一样多了.'|| to_char(j)) ;

exit;

end;

else

w:=w-1;

end if;

end loop;

dbms_output.put_line('w还剩多少: '|| to_char(w)) ;

end;

--4.whileloopend loop

while 条件 loop

执行语句段;

end loop;

--5.forinloopend

for 循环变量 in[reverse] 循环下界循环上界 loop

循环处理语句;

end loop;

set serveroutput on

declare

i int:=0;

j int:=100;

begin

for j in 1..6 loop

i:=i+1;

end loop;

dbms_output.put_line('循环次数: '|| to_char(i)) ;

end;

--5.事务处理

--在pl/sql中,可以使用三个事务处理控制命令.

--在PL/SQL程序打开自动提交功能。这样每次执行PL/SQL程序都会自动进行事务提交。

--语句: set auto on;

--相应的，取消自动提交功能的PL/SQL程序为:

--set auto off;

--commit,rollback,savepoint

--select * from student;

--commit;

--delete from student;

--rollback; --回滚刚才的delete 操作.

--select * from student;

savepoint insertpoint;

insert into student(sid,sname) values(900,'mrfu');

--创建保存点 : savepoint 保存点名;

select sid,sname from student where sid=900;

rollback to insertpoint; --回滚保存点: rollbacd to 保存点名;

--dbms_output.put_line('回滚保存点') ;

select sid,sname from student where sid=900;

注意在编写脚本时，要注意添加 begin .... end; 以控制语句执行的起始/终点;否则将会出现语法错误提示;

如:

SQL> set serveroutput on

SQL> declare

2 i int:=1;

3 while i<10 loop

4 insert into test2 (id,score) values(i,i*10);

5 i:=i+1;

6 end;

7 /

declare

i int:=1;

while i<10 loop

insert into test2 (id,score) values(i,i*10);

i:=i+1;

end;

ORA-06550: 第 4 行, 第 8 列:

PLS-00103: 出现符号 "<"在需要下列之一时：

:= . ( @ % ; not null range

default character

SQL> set serveroutput on

SQL> declare

2 i int:=1;

3 begin

4 while i<10 loop

5 insert into test2(id,score) values(i,i*10);

6 i:=i+1;

7 end loop;

8 end;

9 /

PL/SQL procedure successfully completed

SQL> commit;

Commit complete