declare
/*
* 遍历数据库可以打开的表 收集数据 需要延时函数
*
*
*/
--数组
--TYPE Type_Array IS TABLE OF VARCHAR2(50) INDEX BY BINARY_INTEGER;
--循环变量
j number:=1;
table_target NVARCHAR2(50):='';
--多维数组--多条数组
TYPE v_table IS TABLE OF user_tab_comments%ROWTYPE INDEX BY BINARY_INTEGER;
my_table v_table;
begin
--使用动态查询增强灵活性...
select * BULK COLLECT INTO my_table from user_tab_comments
where table_name like '%'||upper(table_target)||'%' order by table_name;
FOR i IN 1..my_table.count LOOP
--内部循环列信息
--1.表描述
--IF F_CAN_APPNO_RECALL(input_list(i), Validate_Type) THEN
dbms_output.put_line(my_table(i).table_name||' '||my_table(i).comments );
--END IF;
END LOOP;
end;