create or replace function get_role_name_list(tempcode varchar2)
return varchar2 is
tempresult varchar2(1000);
begin
declare
// 定义游标变量
cursor cc is
select distinct t.role_name
from v_user_role t
where t.user_code = tempcode;
// 指定行指针,指定和cc行类型相同的变量
ccrec cc%rowtype;
begin
// 打开游标
open cc;
loop
// 提取一行数据到ccrec
fetch cc
into ccrec;
// 判断是否取到值,没取到值就退出。
exit when cc%notfound;
tempresult:=tempresult||'['||ccrec.role_name||']';
end loop;
// 关闭游标
close cc;
end;
return tempresult;
end;