PL/SQL - 找不到我的局部变量

Question

我现在很困惑；我正在编写一个脚本来查找用户继承的所有角色。这是一项正在进行中的工作，由于我对 PLSQL 缺乏了解，如果你明白我的意思的话，并没有太大的进展。

-- Declaration of Table Type
create or replace TYPE TEST 
AS TABLE OF VARCHAR(30);

-- Function here
create or replace FUNCTION FINDPARENTS 
(
  ROLENAME IN VARCHAR2 
) 
    RETURN TEST 
    IS
    tt_t TEST;

BEGIN
    DECLARE
        results test;
        toadd test := TEST(ROLENAME);
        counter number;
        elements number:=1;
    BEGIN
        SELECT GRANTED_ROLE 
        BULK COLLECT INTO toadd 
        FROM DBA_ROLE_PRIVS 
        WHERE GRANTEE = rolename; 

        SELECT COUNT(*) 
        INTO ELEMENTS 
        FROM toadd; -- Error here.
    --(for i in 0 .. ELEMENTS) SELECT FINDPARENTS(ROLE_NAME) FROM DUAL UNION RESULT ... or something.
    END;
END;

此代码导致“找不到表或视图”错误，因为在第二行 (Select Count(*)...) 中找不到“toadd”，尽管它可以在上面的语句中找到 (Select GRANTED_ROLE...) 这怎么可能？

另外，实现递归的最佳方法是什么？我的函数返回一个 VARCHAR 表，我如何让它“解析”每个角色名称，直到该角色不再具有父角色？

Answer 1

toadd 是一个变量。我们不能在 FROM 子句中使用它们，只能使用表。但是，由于它被声明为嵌套表类型，我们可以将其转换为具有 table() 函数的表：

 SELECT COUNT(*) 
    INTO ELEMENTS 
    FROM table(toadd); 

为了回答问题的另一部分，Oracle 有一些简洁的分层语法。 Find out more.

因此，您可以获得所有直接或间接授予的角色的列表，如下所示：

select granted_role
bulk collect into tt_t
from dba_role_privs 
connect by granted_role = prior grantee
start with granted_role = 'ROOT'
/

填充集合时使用 BULK COLLECT 语法。