使用cursor表达式嵌套游标

最新推荐文章于 2024-08-23 13:28:09 发布

tanzugan

最新推荐文章于 2024-08-23 13:28:09 发布

阅读量1k

点赞数

CC 4.0 BY-SA版权

分类专栏： oracle

本文链接：https://blog.youkuaiyun.com/tanzugan/article/details/81194022

oracle 专栏收录该内容

29 篇文章

订阅专栏

本文介绍了一种在Oracle数据库中使用嵌套游标（REF CURSOR）的方法，来遍历并获取复杂的组织层级结构。通过定义游标和嵌套游标，可以有效地从父级组织获取所有下级组织的信息，包括机构号和机构名称。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

--使用cursor表达式获取下级的信息
DECLARE
TYPE REFCURSOR IS REF CURSOR;--定义游标
CURSOR PARENT_CURSOR(V_ORGAN_NO VARCHAR2) IS--定义嵌套游标
SELECT O.ORGAN_NAME,CURSOR(SELECT SO.ORGAN_NO,SO.ORGAN_NAME FROM SM_ORGAN_TB SO WHERE SO.PARENT_ORGAN = O.ORGAN_NO)
FROM SM_ORGAN_TB O WHERE O.ORGAN_NO = V_ORGAN_NO;
ORGAN_CURSOR REFCURSOR;
V_PARENT_NAME SM_ORGAN_TB.ORGAN_NAME%TYPE; --定义上级变量
V_ORGAN_NO SM_ORGAN_TB.ORGAN_NO%TYPE;--下级号
V_ORGAN_NAME SM_ORGAN_TB.ORGAN_NAME%TYPE;--下级名
BEGIN
OPEN PARENT_CURSOR(&V_ORGAN_NO);--打开游标
LOOP--外循环求本级
FETCH PARENT_CURSOR INTO V_PARENT_NAME ,ORGAN_CURSOR;
EXIT WHEN PARENT_CURSOR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE('上级机构：'||V_PARENT_NAME);
LOOP--内循环求下级
FETCH ORGAN_CURSOR INTO V_ORGAN_NO,V_ORGAN_NAME;
EXIT WHEN ORGAN_CURSOR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE('机构号：'||V_ORGAN_NO||'--机构名：'||V_ORGAN_NAME);
END LOOP;
END LOOP;
CLOSE PARENT_CURSOR;--关闭游标
END;