达梦数据库删除所有的表和序列的存储过程

原创已于 2023-05-18 16:08:18 修改 · 3.2k 阅读

4 ·

CC 4.0 BY-SA版权

文章标签：

#数据库 #开发语言

于 2023-05-09 10:34:41 首次发布

这段PL/SQL代码用于删除指定OWNER（在例子中是QIUCHANGJIN）的所有表和序列。首先，它遍历DBA_TABLES视图来获取表名，然后执行DROPTABLE命令。接着，它处理DBA_SEQUENCES视图，删除相应的序列。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

-- 删除所有的表
DECLARE
        OWNER     VARCHAR(20) := 'QIUCHANGJIN';
        TAB_NAME VARCHAR(100);
        SQL1     VARCHAR(500);
        SQL2     VARCHAR(500);
        C1
        CURSOR;
        BEGIN
                SQL1 = 'SELECT TABLE_NAME FROM DBA_TABLES WHERE OWNER = '''||OWNER||''';';
                OPEN C1 FOR SQL1;
                LOOP
                        FETCH C1 INTO TAB_NAME;
                EXIT
        WHEN C1%NOTFOUND;
                SQL2 = 'DROP TABLE "' || OWNER || '"."' ||TAB_NAME || '";' ;
                EXECUTE IMMEDIATE SQL2;
        END LOOP;
        CLOSE C1;
END
-- 删除所有的序列  
DECLARE
        OWNER     VARCHAR(20) := 'QIUCHANGJIN';
        TAB_NAME VARCHAR(100);
        SQL1     VARCHAR(500);
        SQL2     VARCHAR(500);
        S1
        CURSOR;
        BEGIN
                SQL1 = 'SELECT SEQUENCE_NAME FROM DBA_SEQUENCES WHERE SEQUENCE_OWNER = '''||OWNER||''';';
                OPEN S1 FOR SQL1;
                LOOP
                        FETCH S1 INTO TAB_NAME;
                EXIT
        WHEN S1%NOTFOUND;
                SQL2 = 'DROP SEQUENCE "' || OWNER || '"."' ||TAB_NAME || '";' ;
                EXECUTE IMMEDIATE SQL2;
        END LOOP;
        CLOSE S1;
END