Question

我有一个Postgresql数据库，我想在其上做一些级联删除。但是，表未使用ON DELETE CASCADE规则进行设置。有什么方法可以执行删除并告诉Postgresql只将它级联一次吗？相当于

的东西

DELETE FROM some_table CASCADE;

this older question的答案似乎没有这样的解决方案存在，但我想我明确地问这个问题是为了确定。

Answer 1

没有。只需编写一个想要级联的表的delete语句就可以了。

DELETE FROM some_child_table WHERE some_fk_field IN (SELECT some_id FROM some_Table);
DELETE FROM some_table;

Answer 2

如果你真的想要 DELETE FROM some_table CASCADE;，这意味着“删除表some_table 中的所有行”，则可以使用TRUNCATE代替始终支持DELETE和CASCADE。但是，如果您想使用带有where子句的选择性删除，则TRUNCATE不够好。

谨慎使用 - 这将删除在some_table上具有外键约束的所有表的所有行以及对这些表有约束的所有表等等。

Postgres通过TRUNCATE command支持CASCADE：

TRUNCATE some_table CASCADE;

尽管它没有完全与其他并发事务隔离，但它还是事务性的（即可以回滚），并且还有其他一些注意事项。阅读文档了解详情。

Answer 3

我写了一个（递归）函数来删除任何基于其主键的行。我写这个是因为我不想创建我的约束作为“删除级联”。我希望能够删除复杂的数据集（作为DBA），但不允许我的程序员能够在不考虑所有影响的情况下级联删除。我还在测试这个功能，因此可能存在错误 - 但如果您的数据库具有多列主要（因此是外部）键，请不要尝试它。此外，键都必须能够以字符串形式表示，但它可以以没有该限制的方式编写。我无论如何都非常谨慎地使用这个函数，我过分重视我的数据以启用对所有内容的级联约束。基本上，这个函数在模式，表名和主值（以字符串形式）中传递，它将通过在该表上查找任何外键并确保数据不存在来开始 - 如果存在，则以递归方式调用自己发现的数据。它使用已标记为删除的数据数组来防止无限循环。请测试一下，让我知道它对你有用。注意：它有点慢。我称之为： select delete_cascade('public','my_table','1');

create or replace function delete_cascade(p_schema varchar, p_table varchar, p_key varchar, p_recursion varchar[] default null)
 returns integer as $$
declare
    rx record;
    rd record;
    v_sql varchar;
    v_recursion_key varchar;
    recnum integer;
    v_primary_key varchar;
    v_rows integer;
begin
    recnum := 0;
    select ccu.column_name into v_primary_key
        from
        information_schema.table_constraints  tc
        join information_schema.constraint_column_usage AS ccu ON ccu.constraint_name = tc.constraint_name and ccu.constraint_schema=tc.constraint_schema
        and tc.constraint_type='PRIMARY KEY'
        and tc.table_name=p_table
        and tc.table_schema=p_schema;

    for rx in (
        select kcu.table_name as foreign_table_name, 
        kcu.column_name as foreign_column_name, 
        kcu.table_schema foreign_table_schema,
        kcu2.column_name as foreign_table_primary_key
        from information_schema.constraint_column_usage ccu
        join information_schema.table_constraints tc on tc.constraint_name=ccu.constraint_name and tc.constraint_catalog=ccu.constraint_catalog and ccu.constraint_schema=ccu.constraint_schema 
        join information_schema.key_column_usage kcu on kcu.constraint_name=ccu.constraint_name and kcu.constraint_catalog=ccu.constraint_catalog and kcu.constraint_schema=ccu.constraint_schema
        join information_schema.table_constraints tc2 on tc2.table_name=kcu.table_name and tc2.table_schema=kcu.table_schema
        join information_schema.key_column_usage kcu2 on kcu2.constraint_name=tc2.constraint_name and kcu2.constraint_catalog=tc2.constraint_catalog and kcu2.constraint_schema=tc2.constraint_schema
        where ccu.table_name=p_table  and ccu.table_schema=p_schema
        and TC.CONSTRAINT_TYPE='FOREIGN KEY'
        and tc2.constraint_type='PRIMARY KEY'
)
    loop
        v_sql := 'select '||rx.foreign_table_primary_key||' as key from '||rx.foreign_table_schema||'.'||rx.foreign_table_name||'
            where '||rx.foreign_column_name||'='||quote_literal(p_key)||' for update';
        --raise notice '%',v_sql;
        --found a foreign key, now find the primary keys for any data that exists in any of those tables.
        for rd in execute v_sql
        loop
            v_recursion_key=rx.foreign_table_schema||'.'||rx.foreign_table_name||'.'||rx.foreign_column_name||'='||rd.key;
            if (v_recursion_key = any (p_recursion)) then
                --raise notice 'Avoiding infinite loop';
            else
                --raise notice 'Recursing to %,%',rx.foreign_table_name, rd.key;
                recnum:= recnum +delete_cascade(rx.foreign_table_schema::varchar, rx.foreign_table_name::varchar, rd.key::varchar, p_recursion||v_recursion_key);
            end if;
        end loop;
    end loop;
    begin
    --actually delete original record.
    v_sql := 'delete from '||p_schema||'.'||p_table||' where '||v_primary_key||'='||quote_literal(p_key);
    execute v_sql;
    get diagnostics v_rows= row_count;
    --raise notice 'Deleting %.% %=%',p_schema,p_table,v_primary_key,p_key;
    recnum:= recnum +v_rows;
    exception when others then recnum=0;
    end;

    return recnum;
end;
$$
language PLPGSQL;

Answer 4

如果我理解正确，你应该能够通过删除外键约束，添加一个新的（将级联），执行你的东西，并重新创建限制外键约束来做你想要的。

例如：

testing=# create table a (id integer primary key);
NOTICE:  CREATE TABLE / PRIMARY KEY will create implicit index "a_pkey" for table "a"
CREATE TABLE
testing=# create table b (id integer references a);
CREATE TABLE

-- put some data in the table
testing=# insert into a values(1);
INSERT 0 1
testing=# insert into a values(2);
INSERT 0 1
testing=# insert into b values(2);
INSERT 0 1
testing=# insert into b values(1);
INSERT 0 1

-- restricting works
testing=# delete from a where id=1;
ERROR:  update or delete on table "a" violates foreign key constraint "b_id_fkey" on table "b"
DETAIL:  Key (id)=(1) is still referenced from table "b".

-- find the name of the constraint
testing=# \d b;
       Table "public.b"
 Column |  Type   | Modifiers 
--------+---------+-----------
 id     | integer | 
Foreign-key constraints:
    "b_id_fkey" FOREIGN KEY (id) REFERENCES a(id)

-- drop the constraint
testing=# alter table b drop constraint b_a_id_fkey;
ALTER TABLE

-- create a cascading one
testing=# alter table b add FOREIGN KEY (id) references a(id) on delete cascade; 
ALTER TABLE

testing=# delete from a where id=1;
DELETE 1
testing=# select * from a;
 id 
----
  2
(1 row)

testing=# select * from b;
 id 
----
  2
(1 row)

-- it works, do your stuff.
-- [stuff]

-- recreate the previous state
testing=# \d b;
       Table "public.b"
 Column |  Type   | Modifiers 
--------+---------+-----------
 id     | integer | 
Foreign-key constraints:
    "b_id_fkey" FOREIGN KEY (id) REFERENCES a(id) ON DELETE CASCADE

testing=# alter table b drop constraint b_id_fkey;
ALTER TABLE
testing=# alter table b add FOREIGN KEY (id) references a(id) on delete restrict; 
ALTER TABLE

当然，为了您的心理健康，您应该将这样的东西抽象到程序中。

Answer 5

我无法评论苍白的答案，所以我添加了自己的答案。 Palehorse logick没问题但是大数据集的效率可能会很差。

DELETE FROM some_child_table sct WHERE exists  (SELECT FROM some_Table st 
where sct.some_fk_fiel=st.some_id );
DELETE FROM some_table;

如果您在列上有索引并且数据集大于少数记录，则会更快。

Answer 6

是的，就像其他人所说的那样，没有方便的“从my_table ... CASCADE删除”（或等效功能）。要删除非级联的受外键保护的子记录及其引用的祖先，您可以选择以下选项：

显式地执行所有删除操作，一次从子表开始一次查询（尽管如果有循环引用，这将无法执行）；或
在单个（可能是大量的）查询中显式执行所有删除操作；或
假设您的非级联外键约束创建为“ ON DELETE NO ACTION DEFERRABLE”，则在单个事务中显式执行所有删除；或
暂时在图中删除“不采取行动”和“限制”外键约束，将其重新创建为CASCADE，删除有问题的祖先，再次删除外键约束，最后重新创建其原始位置（因此暂时减弱了它们）您数据的完整性）；或
也许同样有趣。

我认为绕开外键约束的目的不是很方便，我认为是这样。但我确实了解您为什么要在特定情况下这样做。如果您会以某种频率执行某项操作，并且愿意在所有地方炫耀DBA的智慧，那么您可能希望使用某个过程使其自动化。

几个月前，我来到这里寻找“一次CASCADE DELETE”问题的答案（最初是在十年前提出的！）。我从Joe Love的聪明解决方案（以及Thomas C.G.de Vilhena的变体）中获得了一些收获，但最终我的用例有特殊要求（对于一个表内循环引用进行处理），迫使我不得不采用另一种方法。这种方法最终成为recursively_delete（PG 10.10）。

我已经在生产中使用recursively_delete一段时间了，现在，终于（谨慎地）有足够的信心将其提供给其他可能会在这里寻找想法的人。与Joe Love的解决方案一样，它允许您删除整个数据图，就好像数据库中的所有外键约束都被暂时设置为CASCADE一样，但是它还提供了一些附加功能：

提供删除目标及其图的ASCII预览家属。
使用递归CTE在单个查询中执行删除操作。
处理表内和表间的循环依赖项。
处理组合键。
跳过“设置默认值”和“设置空值”约束。

Answer 7

您可以使用自动执行此操作，您可以使用ON DELETE CASCADE定义外键约束我引用the manual of foreign key constraints：

CASCADE指定删除引用的行时，行引用它也应该被自动删除。

Answer 8

我接受了Joe Love的回答并使用IN运算符重写了子选项而不是=以使函数更快（根据Hubbitus的建议）：

create or replace function delete_cascade(p_schema varchar, p_table varchar, p_keys varchar, p_subquery varchar default null, p_foreign_keys varchar[] default array[]::varchar[])
 returns integer as $$
declare

    rx record;
    rd record;
    v_sql varchar;
    v_subquery varchar;
    v_primary_key varchar;
    v_foreign_key varchar;
    v_rows integer;
    recnum integer;

begin

    recnum := 0;
    select ccu.column_name into v_primary_key
        from
        information_schema.table_constraints  tc
        join information_schema.constraint_column_usage AS ccu ON ccu.constraint_name = tc.constraint_name and ccu.constraint_schema=tc.constraint_schema
        and tc.constraint_type='PRIMARY KEY'
        and tc.table_name=p_table
        and tc.table_schema=p_schema;

    for rx in (
        select kcu.table_name as foreign_table_name, 
        kcu.column_name as foreign_column_name, 
        kcu.table_schema foreign_table_schema,
        kcu2.column_name as foreign_table_primary_key
        from information_schema.constraint_column_usage ccu
        join information_schema.table_constraints tc on tc.constraint_name=ccu.constraint_name and tc.constraint_catalog=ccu.constraint_catalog and ccu.constraint_schema=ccu.constraint_schema 
        join information_schema.key_column_usage kcu on kcu.constraint_name=ccu.constraint_name and kcu.constraint_catalog=ccu.constraint_catalog and kcu.constraint_schema=ccu.constraint_schema
        join information_schema.table_constraints tc2 on tc2.table_name=kcu.table_name and tc2.table_schema=kcu.table_schema
        join information_schema.key_column_usage kcu2 on kcu2.constraint_name=tc2.constraint_name and kcu2.constraint_catalog=tc2.constraint_catalog and kcu2.constraint_schema=tc2.constraint_schema
        where ccu.table_name=p_table  and ccu.table_schema=p_schema
        and TC.CONSTRAINT_TYPE='FOREIGN KEY'
        and tc2.constraint_type='PRIMARY KEY'
)
    loop
        v_foreign_key := rx.foreign_table_schema||'.'||rx.foreign_table_name||'.'||rx.foreign_column_name;
        v_subquery := 'select "'||rx.foreign_table_primary_key||'" as key from '||rx.foreign_table_schema||'."'||rx.foreign_table_name||'"
             where "'||rx.foreign_column_name||'"in('||coalesce(p_keys, p_subquery)||') for update';
        if p_foreign_keys @> ARRAY[v_foreign_key] then
            --raise notice 'circular recursion detected';
        else
            p_foreign_keys := array_append(p_foreign_keys, v_foreign_key);
            recnum:= recnum + delete_cascade(rx.foreign_table_schema, rx.foreign_table_name, null, v_subquery, p_foreign_keys);
            p_foreign_keys := array_remove(p_foreign_keys, v_foreign_key);
        end if;
    end loop;

    begin
        if (coalesce(p_keys, p_subquery) <> '') then
            v_sql := 'delete from '||p_schema||'."'||p_table||'" where "'||v_primary_key||'"in('||coalesce(p_keys, p_subquery)||')';
            --raise notice '%',v_sql;
            execute v_sql;
            get diagnostics v_rows = row_count;
            recnum := recnum + v_rows;
        end if;
        exception when others then recnum=0;
    end;

    return recnum;

end;
$$
language PLPGSQL;

Answer 9

带有级联选项的删除仅适用于定义了外键的表。如果你进行删除，并且它说你不能，因为它会违反外键约束，那么级联将导致它删除有问题的行。

如果要以这种方式删除关联的行，则需要先定义外键。此外，请记住，除非您明确指示它开始一个事务，或者您更改了默认值，否则它将执行自动提交，这可能非常耗时，以便清理。

CASCADE DELETE只需一次

9 个答案: