create or replace procedure pro_Supplement_Leave_Mapping AS
CURSOR TEMP_CUR IS
select d.table_name, d.comments, t.num_rows
from user_tab_comments d
inner join user_tables t
on d.table_name = t.TABLE_NAME
left join user_col_comments c
on d.table_name = c.table_name
where c.column_name='ID'
and t.NUM_ROWS > 0;
v_tablename VARCHAR2(4000);
v_column VARCHAR2(4000);
STRSQL VARCHAR2(4000);
P_VALUE VARCHAR2(4000);
begin
For TEMP_CUR_RECORD in TEMP_CUR loop
v_tablename := TEMP_CUR_RECORD.table_name;
v_column :=TEMP_CUR_RECORD.comments;
BEGIN
P_VALUE := '(select max(id) from '||v_tablename || ' where rownum=1)'; --??????????????????
STRSQL :='insert into SEQCESHI(table_name,column_name,maxid)values('''||v_tablename||''','''||v_column||''','||P_VALUE||')';
execute immediate STRSQL;
commit;
END;
end loop;
end pro_Supplement_Leave_Mapping;

本文介绍了一个使用Oracle PL/SQL编写的存储过程示例,通过游标遍历表集合,利用动态SQL语句插入数据到另一个表中。此过程展示了如何在PL/SQL中运用游标获取表信息,并结合动态SQL执行插入操作。

被折叠的 条评论
为什么被折叠?



