一 、

Create or replace procedure Drop_DbLink(schemaName varchar2, dbLink varchar2 ) is plsql varchar2(1000); cur number; uid number; rc number; begin select u.user_id into uid from dba_users u where u.username = schemaName; plsql := 'drop database link "'||dbLink||'"'; cur := SYS.DBMS_SYS_SQL.open_cursor; SYS.DBMS_SYS_SQL.parse_as_user( c => cur, statement => plsql, language_flag => DBMS_SQL.native, userID => uid ); rc := SYS.DBMS_SYS_SQL.execute(cur); SYS.DBMS_SYS_SQL.close_cursor(cur); end; /

二、

SQL> exec Drop_DbLink('WFG_ADMIN','DBLINKWFG');

三、

SQL>drop procedure Drop_DbLink;