--以下語句將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%');

匯出系統表中的儲存過程和函式

相關文章