--getcode.sql
--获得某个存储过程、包、函数代码脚本
set feedback off
set heading off
set termout off
set linesize 1000
set trimspool on
set verify off
spool &1..sql
prompt set define off
select decode( type||'-'||to_char(line,'fm99999'),
'PACKAGE BODY-1', '/'||chr(10), null) ||
decode(line,1,'create or replace ', '' ) || text text
from user_source
where name = upper('&&1')
order by type, line;
prompt /
prompt set define on
spool off
set feedback on
set heading on
set termout on
set linesize 100
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/12330444/viewspace-448421/ ，如需转载，请注明出处，否则将追究法律责任。
下一篇：
AT命令详解 一
请登录后发表评论
登录
全部评论
