流程控制
1. IF
IF 条件 THEN
ELSE
END IF;
2. CASE
CASE '&grade'
WHEN ’A’ THEN DBMS_OUTPUT.PUT_LINE(’优异’);
WHEN ’B’ THEN DBMS_OUTPUT.PUT_LINE (优秀’);
3. 循环控制
3.1 LOOP 循环
/* 无条件循环 */
DECLARE
v_Counter BINARY_INTEGER := 1;
BEGIN
LOOP
INSERT INTO temp_table VALUES (v_Counter, 'Loop index');
v_Counter := v_Counter + 1;
IF v_Counter > 50 THEN
EXIT;
END IF;
END LOOP;
END;
3.2 WHILE 循环
DECLARE
v_Counter BINARY_INTEGER := 1;
BEGIN
WHILE v_Counter <= 50 LOOP
INSERT INTO temp_table VALUES (v_Counter, 'Loop index');
v_Counter := v_Counter + 1;
END LOOP;
END;
3.3 for条件循环
DECLARE
v_Counter NUMBER := 7;
BEGIN
FOR v_Counter IN 20..30 LOOP
INSERT INTO temp_table (num_col) VALUES (v_Counter);
END LOOP;
END;
4. 顺序控制
4.1 GOTO 语句
DECLARE
...
BEGIN
...
GOTO updation;
...
<<updation>>
END;
4.2 NULL 语句
SQL块结构
SET SERVEROUTPUT ON 在块中使用传递参数：&nCount
DECLARE 声明
...
BEGIN 执行部分
...
EXCEPTION 异常处理部分
...
END;
匿名块
[DECLARE]
BEGIN
[EXCEPTION]
END;
存储过程
IN
用于接受调用程序的值
OUT
用于向调用程序返回值
IN OUT
用于接受调用程序的值，并向调用程序返回更新的值
将过程的执行权限授予其他用户：
SQL> GRANT EXECUTE ON find_emp TO MARTIN;
SQL> GRANT EXECUTE ON swap TO PUBLIC;
---------------------------------------
CREATE OR REPLACE PROCEDURE find_emp(item_code IN VARCHAR2)
AS
BEGIN
[EXCEPTION]
END find_emp;
函数
函数只能接受 IN 参数，而不能接受 IN OUT 或 OUT 参数
形参不能是 PL/SQL 类型
函数的返回类型也必须是数据库类型
必须在规格说明中包含 RETURN 子句
-----------------------------------
FUNCTION name RETURN fun_datatype
IS
BEGIN
...
[EXCEPTION]
...
END;
-----------------------------------
函数调用
SELECT fun_datatype FROM DUAL
nType := fun_datatype
