dbms_metadata包中的get_ddl函數
--GET_DDL: Return the metadata for a single object as DDL.
-- This interface is meant for casual browsing (e.g., from SQLPlus)
-- vs. the programmatic OPEN / FETCH / CLOSE interfaces above.
-- PARAMETERS:
-- object_type - The type of object to be retrieved.
-- name - Name of the object.
-- schema - Schema containing the object. Defaults to
-- the caller's schema.
-- version - The version of the objects' metadata.
-- model - The object model for the metadata.
-- transform. - XSL-T transform. to be applied.
-- RETURNS: Metadata for the object transformed to DDL as a CLOB.
FUNCTION get_ddl ( object_type IN VARCHAR2,
name IN VARCHAR2,
schema IN VARCHAR2 DEFAULT NULL,
version IN VARCHAR2 DEFAULT 'COMPATIBLE',
model IN VARCHAR2 DEFAULT 'ORACLE',
transform. IN VARCHAR2 DEFAULT 'DDL') RETURN CLOB;
示例:1.得到一個表或索引的ddl語句
SELECT DBMS_METADATA.GET_DDL('TABLE','DEPT','SCOTT') FROM DUAL;
select dbms_metadata.get_ddl('INDEX','PK_DEPT','SCOTT') from dual;
2.得到一個使用者下的所有表,索引,存儲過程的ddl
SELECT DBMS_METADATA.GET_DDL(U.OBJECT_TYPE, u.object_name)
FROM USER_OBJECTS u
where U.OBJECT_TYPE IN ('TABLE','INDEX','PROCEDURE');
3.得到所有表空間的ddl語句
SELECT DBMS_METADATA.GET_DDL('TABLESPACE', TS.tablespace_name)
FROM DBA_TABLESPACES TS;
4.得到所有建立使用者的ddl
SELECT DBMS_METADATA.GET_DDL('USER',U.username)
FROM DBA_USERS U;
案例:
利用DBMS_METADATA.GET_DDL包得到資料庫的對象的ddl腳本。如下(SQLPLUS中執行):
a. 擷取單個的建表、視圖和建索引的文法
set pagesize 0
set longc 90000
set feedback off
set echo off
spool DEPT.sql
select dbms_metadata.get_ddl('TABLE','TAB_NAME','SCOTT') from dual;
select dbms_metadata.get_ddl('VIEW','VIEW_NAME','SCOTT') from dual;
select dbms_metadata.get_ddl('INDEX','IDX_NAME','SCOTT') from dual;
spool off;
b.擷取一個SCHEMA下的所有建表、視圖和建索引的文法,以scott為例:
set pagesize 0
set long 90000
set feedback off
set echo off
spool schema.sql
connect scott/tiger;
SELECT DBMS_METADATA.GET_DDL('TABLE',u.table_name) FROM USER_TABLES u;
SELECT DBMS_METADATA.GET_DDL('VIEW',u.VIEW_name) FROM USER_VIEWS u;
SELECT DBMS_METADATA.GET_DDL('INDEX',u.index_name) FROM USER_INDEXES u;
spool off;
c. 擷取某個SCHEMA的建全部存儲過程的文法
set pagesize 0
set long 90000
set feedback off
set echo off
spool procedures.sql
select DBMS_METADATA.GET_DDL('PROCEDURE',u.object_name) from user_objects u where object_type = 'PROCEDURE';
spool off;
d. 擷取某個SCHEMA的建全部函數的文法
set pagesize 0
set long 90000
set feedback off
set echo off
spool function.sql
select DBMS_METADATA.GET_DDL('FUNCTION',u.object_name) from user_objects u where object_type = 'FUNCTION';
spool off;
---另附一個提取ROLE的腳本,割接ROLE非常友善------
點選(此處)折疊或打開
- --ROLE_GETDDL.sql
- --2014.12.13
- set long 20000 longchunksize 20000 pagesize 0 linesize 1000 feedback off verify off trimspool on
- column ddl format a1000
- begin
- dbms_metadata.set_transform_param (dbms_metadata.session_transform, 'SQLTERMINATOR', true);
- dbms_metadata.set_transform_param (dbms_metadata.session_transform, 'PRETTY', true);
- end;
- /
- variable v_role VARCHAR2(30);
- exec :v_role := upper('&1');
- select dbms_metadata.get_ddl('ROLE', r.role) AS ddl
- from dba_roles r
- where r.role = :v_role
- union all
- select dbms_metadata.get_granted_ddl('ROLE_GRANT', rp.grantee) AS ddl
- from dba_role_privs rp
- where rp.grantee = :v_role
- and rownum = 1
- union all
- select dbms_metadata.get_granted_ddl('SYSTEM_GRANT', sp.grantee) AS ddl
- from dba_sys_privs sp
- where sp.grantee = :v_role
- and rownum = 1
- union all
- select dbms_metadata.get_granted_ddl('OBJECT_GRANT', tp.grantee) AS ddl
- from dba_tab_privs tp
- where tp.grantee = :v_role
- and rownum = 1
- /
- set linesize 80 pagesize 14 feedback on verify on
來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/30264304/viewspace-1813614/,如需轉載,請注明出處,否則将追究法律責任。
轉載于:http://blog.itpub.net/30264304/viewspace-1813614/