更新时间:2022-07-29 GMT+08:00
显式游标
显式游标主要用于对查询语句的处理,尤其是在查询结果为多条记录的情况下。
处理步骤
显式游标处理需六个PL/SQL步骤:
- 定义静态游标:就是定义一个游标名,以及与其相对应的SELECT语句。
定义静态游标的语法图,请参见图1。
参数说明:
- cursor_name:定义的游标名。
- parameter:游标参数,只能为输入参数,其格式为:
parameter_name datatype
- select_statement:查询语句。
根据执行计划的不同,系统会自动判断该游标是否可以用于以倒序的方式检索数据行。
定义动态游标:指ref游标,可以通过一组静态的SQL语句动态的打开游标。首先定义ref游标类型,然后定义该游标类型的游标变量,在打开游标时通过OPEN FOR动态绑定SELECT语句。
GaussDB(DWS)支持sys_refcursor动态游标类型,函数或存储过程可以通过sys_refcursor参数传入或传出游标结果集合,函数也可以通过返回sys_refcursor来返回游标结果集合。
- 打开静态游标:就是执行游标所对应的SELECT语句,将其查询结果放入工作区,并且指针指向工作区的首部,标识游标结果集合。如果游标查询语句中带有FOR UPDATE选项,OPEN语句还将锁定数据库表中游标结果集合对应的数据行。
打开静态游标的语法图,请参见图4。
打开动态游标:可以通过OPEN FOR语句打开动态游标,动态绑定SQL语句。
打开动态游标的语法图,请参见图5。
PL/SQL程序不能用OPEN语句重复打开一个游标。
- 提取游标数据:检索结果集合中的数据行,放入指定的输出变量中。
提取游标数据的语法图,请参见图6。
- 对该记录进行处理。
- 继续处理,直到活动集合中没有记录。
- 关闭游标:当提取和处理完游标结果集合数据后,应及时关闭游标,以释放该游标所占用的系统资源,并使该游标的工作区变成无效,不能再使用FETCH语句获取其中数据。关闭后的游标可以使用OPEN语句重新打开。
关闭游标的语法图,请参见图7。
属性
游标的属性用于控制程序流程或者了解程序的状态。当运行DML语句时,PL/SQL打开一个内建游标并处理结果,游标是维护查询结果的内存中的一个区域,游标在运行DML语句时打开,完成后关闭。显式游标的属性为:
- %FOUND布尔型属性:当最近一次读记录时成功返回,则值为TRUE。
- %NOTFOUND布尔型属性:与%FOUND相反。
- %ISOPEN布尔型属性:当游标已打开时返回TRUE。
- %ROWCOUNT数值型属性:返回已从游标中读取的记录数。
示例
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 |
--游标参数的传递方法。
CREATE OR REPLACE PROCEDURE cursor_proc1()
AS
DECLARE
DEPT_NAME VARCHAR(100);
DEPT_LOC NUMBER(4);
--定义游标
CURSOR C1 IS
SELECT section_name, place_id FROM sections WHERE section_id <= 50;
CURSOR C2(sect_id INTEGER) IS
SELECT section_name, place_id FROM sections WHERE section_id <= sect_id;
TYPE CURSOR_TYPE IS REF CURSOR;
C3 CURSOR_TYPE;
SQL_STR VARCHAR(100);
BEGIN
OPEN C1;--打开游标
LOOP
--通过游标取值
FETCH C1 INTO DEPT_NAME, DEPT_LOC;
EXIT WHEN C1%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(DEPT_NAME||'---'||DEPT_LOC);
END LOOP;
CLOSE C1;--关闭游标
OPEN C2(10);
LOOP
FETCH C2 INTO DEPT_NAME, DEPT_LOC;
EXIT WHEN C2%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(DEPT_NAME||'---'||DEPT_LOC);
END LOOP;
CLOSE C2;
SQL_STR := 'SELECT section_name, place_id FROM sections WHERE section_id <= :DEPT_NO;';
OPEN C3 FOR SQL_STR USING 50;
LOOP
FETCH C3 INTO DEPT_NAME, DEPT_LOC;
EXIT WHEN C3%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(DEPT_NAME||'---'||DEPT_LOC);
END LOOP;
CLOSE C3;
END;
/
CALL cursor_proc1();
DROP PROCEDURE cursor_proc1;
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
--给工资低于3000的员工增加工资500。
CREATE TABLE staffs_t1 AS TABLE staffs;
CREATE OR REPLACE PROCEDURE cursor_proc2()
AS
DECLARE
V_EMPNO NUMBER(6);
V_SAL NUMBER(8,2);
CURSOR C IS SELECT staff_id, salary FROM staffs_t1;
BEGIN
OPEN C;
LOOP
FETCH C INTO V_EMPNO, V_SAL;
EXIT WHEN C%NOTFOUND;
IF V_SAL<=3000 THEN
UPDATE staffs_t1 SET salary =salary + 500 WHERE staff_id = V_EMPNO;
END IF;
END LOOP;
CLOSE C;
END;
/
CALL cursor_proc2();
--删除存储过程
DROP PROCEDURE cursor_proc2;
DROP TABLE staffs_t1;
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
--SYS_REFCURSOR类型做为函数参数
CREATE OR REPLACE PROCEDURE proc_sys_ref(O OUT SYS_REFCURSOR)
IS
C1 SYS_REFCURSOR;
BEGIN
OPEN C1 FOR SELECT section_ID FROM sections ORDER BY section_ID;
O := C1;
END;
/
DECLARE
C1 SYS_REFCURSOR;
TEMP NUMBER(4);
BEGIN
proc_sys_ref(C1);
LOOP
FETCH C1 INTO TEMP;
DBMS_OUTPUT.PUT_LINE(C1%ROWCOUNT);
EXIT WHEN C1%NOTFOUND;
END LOOP;
END;
/
--删除存储过程
DROP PROCEDURE proc_sys_ref;
|
父主题: 游标