PL/SQL教程（三）

PL/SQL教程（三）

　　 控制结构

　　控制结构控制PL/SQL程序流程的代码行,PL/SQL支持条件控制和循环控制结构。

　　语法和用途

　　　IF..THEN

　　语法：

IF  condition  THEN
　Statements  1 ;
　Statements  2 ;
　....
END   IF  

　　IF语句判断条件condition是否为TRUE，如果是，则执行THEN后面的语句，如果condition为false或NULL则跳过THEN到END IF之间的语句，执行END IF后面的语句。

　　 IF..THEN...ELSE

　　语法:

IF  condition  THEN
　Statements  1 ;
　Statements  2 ;
　....
ELSE
　Statements  1 ;
　Statements  2 ;
　....
END   IF

　　如果条件condition为TRUE,则执行THEN到ELSE之间的语句，否则执行ELSE到END IF之间的语句。

　　IF 可以嵌套，可以在IF 或IF ..ELSE语句中使用IF或IF..ELSE语句。

if  (a > b)  and  (a > c)  then
　　g: = a;
else
　　g: = b;
　　 if  c > g  then
　　　g: = c;
　　 end   if
end   if

　　 IF..THEN..ELSIF

　　语法：

IF  condition1  THEN
　statement1;
ELSIF condition2  THEN
　statement2;
ELSIF condition3  THEN
　statement3;
ELSE
　statement4;
END   IF ;
　statement5;

　 　如果条件condition1为TRUE则执行statement1,然后执行statement5,否则判断condition2是否为TRUE,若 为TRUE则执行statement2,然后执行statement5,对于condition3也是相同的，如果condition1， condition2，condition3都不成立，那么将执行statement4,然后执行statement5。

　　 循环控制

　　循环控制的基本形式是LOOP语句，LOOP和END LOOP之间的语句将无限次的执行。LOOP语句的语法如下：

        LOOP
　　　statements;
　　 END  LOOP

　　LOOP和END LOOP之间的语句无限次的执行显然是不行的，那么在使用LOOP语句时必须使用EXIT语句，强制循环结束，例如：

X: = 100 ;
LOOP
　X: = X + 10 ;
　 IF  X > 1000   THEN
　　 EXIT ;
　 END   IF
END  LOOP;
Y: = X;

　　此时Y的值是1010.

　　EXIT WHEN语句将结束循环，如果条件为TRUE，则结束循环。

X: = 100 ;
LOOP
X: = X + 10 ;
EXIT   WHEN  X > 1000 ;
X: = X + 10 ;
END  LOOP;
Y: = X;

　　 WHILE..LOOP

　　WHILE..LOOP有一个条件与循环相联系，如果条件为TRUE,则执行循环体内的语句，如果结果为FALSE,则结束循环。

X: = 100 ;
WHILE  X <= 1000  LOOP
　X: = X + 10 ;
END  LOOP;
Y = X;

　　 FOR...LOOP

　　语法：

FOR  counter  IN   [ REVERSE ]  start_range....end_range LOOP
        statements;
END  LOOP;

　 　LOOP和WHILE循环的循环次数都是不确定的，FOR循环的循环次数是固定的，counter是一个隐式声明的变量，他的初始值是 start_range,第二个值是start_range+1,直到end_range,如果start_range等于end _range,那么循环将执行一次。如果使用了REVERSE关键字，那么范围将是一个降序。

X: = 100 ;
FOR  v_counter  in   1 .. 10  loop
x: = x + 10 ;

end  loop
y: = x;

　　如果要退出for循环可以使用EXIT语句。

　　 标签

　　用户可以使用标签使程序获得更好的可读性。程序块或循环都可以被标记。标签的形式是< >。

　　标记程序块

<>
[ DECLARE ]
... ... ...
BEGIN
........
[ EXCEPTION ]
.......
END  label_name

　　标记循环

<>
LOOP
.........
<>
loop
..........
<>
loop
....

EXIT  outer_loop  WHEN  v_condition = 0 ;
end  loop innermost_loop;
..........
END  LOOP inner_loop;
END  LOOP outer_loop;

　　 GOTO语句

　　语法：

　　GOTO LABEL;

　　执行GOTO语句时，控制会立即转到由标签标记的语句。PL/SQL中对GOTO语句有一些限制，对于块、循环、IF语句而言，从外层跳转到内层是非法的。

X ： = 100 ;
FOR  V_COUNTER  IN   1 .. 10  LOOP
　 IF  V_COUNTER  = 4   THEN
　　 GOTO  end_of_loop
　 END   IF
　X: = X + 10 ;
　 <>
　 NULL
END  LOOP

Y: = X;

　　注意：NULL是一个合法的可执行语句。

　　 嵌套

　 　程序块的内部可以有另一个程序块这种情况称为嵌套。嵌套要注意的是变量，定义在最外部程序块中的变量可以在所有子块中使用，如果在子块中定义了与外部程 序块变量相同的变量名，在执行子块时将使用子块中定义的变量。子块中定义的变量不能被父块引用。同样GOTO语句不能由父块跳转道子块中，反之则是合法 的。

《 OUTER  BLOCK》
DECLARE
　A_NUMBER  INTEGER ；
　B_NUMBER  INTEGER ；
BEGIN
　 -- A_NUMBER and B_NUMBER are available here
　 <>
　 DECLARE
　C_NUMBER  INTEGER
　B_NUMBER  NUMBER ( 20 )
BEGIN
　C_NUMBER: = A_NUMBER;
　C_NUMBER = OUTER_BLOCK.B_NUMBER;
END  SUB_BLOCK;
END  OUT_BLOCK;

　　 小结

　 我们在这篇文章中介绍了PL/SQL的基础语法以及如何使用PL/SQL语言设计和运行PL/SQL程序块，并将PL/SQL程序整合到Oracle服务 器中,虽然PL/SQL程序作为功能块嵌入Oracle数据库中，但PL/SQL与ORACLE数据库的紧密结合使得越来越多的Oracle数据库管理员 和开发人员开始使用PL/SQL。