Gerando DDL para DBLink Oracle

Pessoal,

Segue uma dica para aqueles que precisam gerar um DDL de um DBLink Oracle.

Segue código:

DECLARE
   v_output      CLOB          := NULL;
   v_owner       VARCHAR2 (30) := '&OWNER';
   v_link_name   VARCHAR2 (30) := '&NOME_DBLINK';
BEGIN
   DBMS_OUTPUT.put_line ('DDL For Database Links');

   FOR tt IN (SELECT owner, db_link
                FROM dba_db_links
               WHERE owner LIKE v_owner AND db_link LIKE v_link_name)
   LOOP
      SELECT DBMS_METADATA.get_ddl ('DB_LINK', tt.db_link, tt.owner)
        INTO v_output
        FROM DUAL;

      DBMS_OUTPUT.put_line (v_output);
   END LOOP;
END;

Qualquer dúvida comente!

Abs,
Junio Vitor