oracle 查看用户建立的视图详情

摘要: 主要解决：查询用户视图中 存放视图sql的字段是Long类型字段，需转换成CLOB类型

declare
v_isexist number(3,0):=0;
begin
select count(1) into v_isexist from sys.all_objects where object_name='T_USER_VIEWS_ROW' and object_type = 'TYPE';
if v_isexist>0 then
execute immediate 'drop type t_user_views_table';
execute immediate 'drop type t_user_views_row';
execute immediate 'create type t_user_views_row as object
(view_name varchar2(60),text_length number,text clob)';
execute immediate 'create type t_user_views_table is table of t_user_views_row';
execute immediate 'create or replace function fu_get_user_views
return t_user_views_table
as
rs t_user_views_table:= t_user_views_table();
begin
for cur in (select view_name,text_length,text from user_views@cq) loop
rs.extend;
rs(rs.count) := t_user_views_row(cur.view_name,cur.text_length,cur.text);
end loop;
return rs;
end fu_get_user_views;';
end if;
end;