基本上用到的文法如下:
a. 擷取單個的建表和建索引的文法
set heading off;
set echo off;
Set pages 999;
set long 90000;
spool DEPT.sql
select dbms_metadata.get_ddl('TABLE','DEPT','SCOTT') from dual;
select dbms_metadata.get_ddl('INDEX','DEPT_IDX','SCOTT') from dual;
spool off;
b.擷取一個SCHEMA下的所有建表和建索引的文法,以scott為例:
set pagesize 0
set long 90000
set feedback off
set echo off
spool scott_schema.sql
connect scott/tiger;
SELECT DBMS_METADATA.GET_DDL('TABLE',u.table_name)
FROM USER_TABLES u;
SELECT DBMS_METADATA.GET_DDL('INDEX',u.index_name)
FROM USER_INDEXES u;
spool off;
c. 擷取某個SCHEMA的建全部預存程序的文法
connect brucelau /brucelau;
spool procedures.sql
select
DBMS_METADATA.GET_DDL('PROCEDURE',u.object_name)
from
user_objects u
where
object_type = 'PROCEDURE';
spool off;
另:
dbms_metadata.get_ddl('TABLE','TAB1','USER1')
三個參數中,第一個指定匯出DDL定義的物件類型(此例中為表類型),第二個是對象名(此例中即表名),第三個是對象所在的使用者名稱。.
要自己寫程式了,執行一段SQL,讓SQL查詢結果就是我們想要的SQL指令碼:
如下:
select
'INSERT INTO B_STATTEMPLATE ( N_ID,C_NAME, C_KBH, N_PRINT, N_TYPE, N_APP, N_VALID ) '
|| 'Values (' || To_Char(N_ID) ||',''' || C_NAME || ''', ''' || C_KBH || ''', '
|| To_Char( N_PRINT ) || ', ' || To_Char( N_TYPE ) || ', ' || '0, 0 );'
from b_stattemplate
將查詢結果儲存起來就可以了!