ORACLE預存程序 練習系列三 失效或者生效指定表的外鍵

create or replace procedure P_CHANGE_FK_STATUS(IN_TABLE in varchar2,IN_TYPE IN VARCHAR2,IN_ACTION IN VARCHAR2) is--失效或者生效指定表的外鍵-- IN_table :表名-- IN_TYPE :必須為 R 代表外鍵-- IN_ACTION :DISABLE 或者 ENABLEV_TABLE VARCHAR2(30);V_ACTION VARCHAR2(10);V_SQL VARCHAR2(200) ;V_FK  VARCHAR2(60);  begin       V_TABLE:=substr(IN_TABLE,2,length(IN_TABLE)-2);      V_ACTION:=substr(IN_ACTION,2,length(IN_ACTION)-2);      --查詢外鍵名稱      V_SQL :='SELECT constraint_name FROM USER_CONSTRAINTS WHERE CONSTRAINT_TYPE=  '|| IN_TYPE||  '    and  table_name='||IN_TABLE;      DBMS_OUTPUT.PUT_LINE('V_SQL: ' || V_SQL);      execute immediate V_SQL into V_FK;      v_sql:='alter table '||  V_TABLE  ||'  '||V_ACTION ||'  constraint '||V_FK;        DBMS_OUTPUT.PUT_LINE('V_SQL: ' || V_SQL);      execute immediate  v_sql;end P_CHANGE_FK_STATUS;

 

 執行