thả chỉ mục hoặc ràng buộc mà không biết tên của nó cho Oracle

Question

Trên cơ sở dữ liệu oracle Tôi có khóa ngoài, không biết tên của nó, chỉ là column_name và reference_column_name. Tôi muốn viết một kịch bản sql mà nên thả chìa khóa nước ngoài này nếu nó tồn tại, vì vậy đây là đoạn code tôi sử dụng:

declare 
fName varchar2(255 char); 
begin 
SELECT x.constraint_name into fName FROM all_constraints x 
JOIN all_cons_columns c ON 
c.table_name = x.table_name AND c.constraint_name = x.constraint_name 
WHERE x.table_name = 'MY_TABLE_NAME' AND x.constraint_type = 'R' AND c.column_name ='MY_COLUMN_NAME'; 
end; 

Kết quả của kịch bản này là "khối ẩn danh hoàn thành", vì vậy nó đã thành công, nhưng khi tôi thêm phần thả:

declare 
fName varchar2(255 char); 
begin 
SELECT x.constraint_name into fName FROM all_constraints x 
JOIN all_cons_columns c ON 
c.table_name = x.table_name AND c.constraint_name = x.constraint_name 
WHERE x.table_name = 'MY_TABLE_NAME' AND x.constraint_type = 'R' AND c.column_name ='MY_COLUMN_NAME'; 
if (fName != '') THEN 
    alter table MY_TABLE_NAME drop constraint fName; 
end if; 
end; 

Sau đó, tôi có được điều này một:

Error report: ORA-06550: line 9, column 5: PLS-00103: Encountered the symbol "ALTER" when expecting one of the following:

begin case declare exit for goto if loop mod null pragma raise return select update while with << close current delete fetch lock insert open rollback savepoint set sql execute commit forall merge pipe 06550. 00000 - "line %s, column %s:\n%s" *Cause: Usually a PL/SQL compilation error. *Action:

Vì vậy, có thể bất cứ ai cho tôi biết vấn đề là gì đây?

Tôi cũng đã cố gắng để đưa mọi thứ vào một chức năng:

declare 
    function getFName return varchar2 is 
    fName varchar2(255 char); 
    begin 
    SELECT x.constraint_name into fName FROM all_constraints x 
    JOIN all_cons_columns c ON 
    c.table_name = x.table_name AND c.constraint_name = x.constraint_name 
    WHERE x.table_name = 'MY_TABLE_NAME' AND x.constraint_type = 'R' AND c.column_name ='MY_COLUMN_NAME'; 

    return fName; 
    end; 
begin 
    if getFName() != '' then 
    alter table all_events drop constraint getFName(); 
    end if; 
end; 

Kết quả là các lỗi tương tự gây ra bởi tuyên bố "thay đổi bảng"

Cái này cũng không giúp đỡ:

alter table all_events drop constraint 
    (SELECT x.constraint_name into fName FROM all_constraints x 
    JOIN all_cons_columns c ON 
    c.table_name = x.table_name AND c.constraint_name = x.constraint_name 
    WHERE x.table_name = 'MY_TABLE_NAME' AND x.constraint_type = 'R' AND c.column_name ='MY_COLUMN_NAME'); 

Sản lượng là:

Error report: SQL Error: ORA-02250: missing or invalid constraint name 02250. 00000 - "missing or invalid constraint name" *Cause: The constraint name is missing or invalid. *Action: Specify a valid identifier name for the constraint name.

Đối với máy chủ sql (MS SQL), việc này rất dễ dàng. Chỉ cần khai báo một biến với @ và đặt nó, sau đó chỉ cần sử dụng nó. Trên oracle tôi không có bất kỳ đầu mối nào nó không hoạt động ...

Answer 1

Phiên bản gốc của bạn là tốt, ngoại trừ việc bạn không thể trực tiếp thực thi DDL trong một khối PL/SQL; đúng hơn, bạn phải bọc nó trong một EXECUTE IMMEDIATE:

execute immediate 'alter table MY_TABLE_NAME drop constraint "' || fName || '"'; 

Đây sẽ là đúng ngay cả khi chế tên tuổi được biết đến tại thời gian biên dịch, nhưng nó gấp đôi đúng trong trường hợp của bạn, vì fName không phải là hạn chế -name, nhưng đúng hơn, một biến chứa tên ràng buộc.

Ngoài ra, đây:

if (fName != '') THEN 

không hợp lệ/có ý nghĩa, vì trong Oracle '' nghĩa NULL. Bạn nên viết

IF fName IS NOT NULL THEN 

thay thế.

Answer 2

Đây là làm thế nào để vứt bỏ mọi trở ngại gõ "R" cho một cột:

begin 
    FOR rec IN (SELECT x.constraint_name fName FROM all_constraints x 
     JOIN all_cons_columns c ON 
     c.table_name = x.table_name AND c.constraint_name = x.constraint_name 
     WHERE x.table_name = 'MY_TABLE_NAME' AND x.constraint_type = 'R' AND c.column_name ='MY_COLUMN_NAME') 
    LOOP 
     EXECUTE IMMEDIATE 'ALTER TABLE MY_TABLE_NAME DROP CONSTRAINT "' || rec.fName || '"'; 
    END LOOP; 
end;