查询出用户对应的权限

从数据库里查询脚本：select id_,authid_,mk from
(select a.id_,a.authid_,'主题域--'||b.caption_ mk from
ABI52_EACL_PERMISSION a
inner join ABI52_EDSU_PROJECT b on substr(a.resourceid_,8,32)=b.id_
where a.AUTHTYPE_='0') a
union all
select id_,authid_,mk from (select a.id_,a.authid_,'主题集--'||b.caption_ mk from
ABI52_EACL_PERMISSION a
inner join ABI52_EDSU_SUBJECTSET b on substr(a.resourceid_,8,32)=b.id_
where a.AUTHTYPE_='0') b
union all
select id_,authid_,mk from  (select a.id_,a.authid_,'分析表--'||b.caption_ mk from
ABI52_EACL_PERMISSION a
inner join ABI52_EANA_ANAlYSE b on substr(a.resourceid_,45,32)=b.id_
where a.AUTHTYPE_='0') c
union all
select id_,authid_,mk  from (select a.id_,a.authid_,'角色--'||b.name_ mk  from
ABI52_EACL_PERMISSION a
inner join ABI52_EACL_ROLE b on substr(a.resourceid_,8,32)=b.id_
where a.AUTHTYPE_='0') d
order by authid_


ABI52_EACL_PERMISSION  权限表
ABI52_EDSU_PROJECT 主题域
ABI52_EDSU_SUBJECTSET  主题集
ABI52_EANA_ANAlYSE  分析表
ABI52_EACL_ROLE  角色


权限表里的AUTHTYPE_字段是授权者类型  0:用户;1:角色;2:机构 3所有子机构