--取出建package的脚本 select text from user_source t where t.TYPE like 'PACKAGE%' order by name,type,line;
取出后如何执行啊。immderately 不能有;号的
--用这个吧,在10g中文字符集测试通过 SELECT decode(text, chr(10), '/', regexp_replace(REPLACE(REPLACE(text, chr(13) || chr(10)), chr(10)), 'package', 'create or replace package', 1, 1, 'i')) FROM user_source t WHERE t.TYPE LIKE 'PACKAGE%' ORDER BY NAME, TYPE, line;
select text from user_source t where t.TYPE like 'PACKAGE%' order by name,type,line;
取出后如何执行啊。immderately 不能有;号的
SELECT decode(text,
chr(10),
'/',
regexp_replace(REPLACE(REPLACE(text, chr(13) || chr(10)), chr(10)),
'package',
'create or replace package',
1,
1,
'i'))
FROM user_source t
WHERE t.TYPE LIKE 'PACKAGE%'
ORDER BY NAME, TYPE, line;