使用sys用户删除其他schema下的dblink

使用sys用户删除其他schema下的dblink

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('LIUTYA','LECCTEST');

PL/SQL procedure successfully completed.