--以下语句将HIS系统中用到的存储过程的名称全部导出到文本文件中,然后运行生成相应的同义词
-------------------------------------------------------------------------------------------------------------------
select
'CREATE OR REPLACE PUBLIC SYNONYM '||'"'||object_name||'"'||' FOR '||
'"'||owner||'"'||'.'||'"'||object_name||'"'||' ;'
from dba_procedures
where owner in(select username from dba_users where account_status = 'OPEN' and default_tablespace like 'TSP%')
and object_type = 'PROCEDURE';
-------------------------------------------------------------------------------------------------------------------
--以下语句将HIS系统中用到的函数的名称全部导出到文本文件中,然后运行生成相应的同义词
select
'CREATE OR REPLACE PUBLIC SYNONYM '||'"'||object_name||'"'||' FOR '||
'"'||owner||'"'||'.'||'"'||object_name||'"'||' ;'
from dba_procedures
where owner in(select username from dba_users where account_status = 'OPEN' and default_tablespace like 'TSP%')
and object_type = 'FUNCTioN';
-------------------------------------------------------------------------------------------------------------------
--以下语句将HIS系统中用到的表的名称全部导出到文本文件中,然后运行生成相应的同义词
select
'CREATE OR REPLACE PUBLIC SYNONYM '||'"'||SYNONYM_NAME||'"'||' FOR '||
'"'||TABLE_OWNER||'"'||'.'||'"'||TABLE_NAME||'"'||' ;'
from dba_synonyms
where TABLE_OWNER in(select username from dba_users where account_status = 'OPEN' and default_tablespace like 'TSP%');
--结束END--
本文标题: 导出系统表中的存储过程和函数
本文链接: https://www.lsjlt.com/news/242998.html(转载时请注明来源链接)
有问题或投稿请发送至:
邮箱/279061341@qq.com QQ/279061341
0