如何将SQL Server的Cursor适配为Teradata可用的批量重命名表SQL代码

修正后可直接在Teradata运行的完整代码 #

REPLACE PROCEDURE PD_BACKUP.BatchRenameObsoleteTables()
BEGIN
    -- 声明变量
    DECLARE varTableOldName VARCHAR(500);
    DECLARE varTableNewName VARCHAR(500);
    DECLARE vardbName VARCHAR(100);
    DECLARE varRename VARCHAR(1000); -- 原长度100太短，容易溢出
    DECLARE varCt INT DEFAULT 0; 
    DECLARE EXIT HANDLER FOR NOT FOUND BEGIN END; -- 游标遍历完自动退出的异常捕获

    DECLARE renameTables CURSOR FOR
        SELECT
            DatabaseName AS DBname
            ,TableName AS TBname
        FROM DBC.TablesV
        WHERE
            TableKind = 'T'
            AND DatabaseName = 'PD_BACKUP'
            -- 直接在WHERE层判断，不需要冗余子查询
            AND (
                LastAccessTimeStamp IS NULL 
                OR (CURRENT_DATE - CAST(LastAccessTimeStamp AS DATE)) >= 180
            )
        ORDER BY DatabaseName, TableName
    FOR READ ONLY;

    OPEN renameTables;
    renameLoop: LOOP
        FETCH NEXT FROM renameTables INTO vardbName, varTableOldName;
        -- 游标遍历完成后主动退出循环
        IF SQLCODE <> 0 THEN LEAVE renameLoop; END IF;

        -- 拼接新表完整路径（必须指定库，否则会默认落到当前登录用户的库）
        SET varTableNewName = vardbName || '.' || vardbName || '_V' || EXTRACT(YEAR FROM CURRENT_DATE) || '_' || varCt;
        -- 拼接旧表完整路径
        SET varTableOldName = vardbName || '.' || varTableOldName;
        -- 拼接重命名SQL
        SET varRename = 'RENAME TABLE ' || varTableOldName || ' TO ' || varTableNewName;
        -- 执行动态SQL
        EXECUTE IMMEDIATE varRename;

        SET varCt = varCt + 1;
    END LOOP renameLoop;
    CLOSE renameTables;
END;

创建完成后执行CALL PD_BACKUP.BatchRenameObsoleteTables();即可触发批量重命名。

核心修改点说明 #

• 外层包裹存储过程结构：Teradata中多语句动态执行逻辑必须放在存储过程/函数内，无法直接作为匿名脚本运行。
• 移除冗余逻辑：原代码的子查询、GROUP BY都是多余的，判断条件直接下推到WHERE层，执行效率更高。
• 修正变量长度：原varRename长度仅为100，拼接长表名时容易溢出，修改为1000避免报错。
• 修正新表名路径：原代码新表名未指定所属数据库，重命名后表会被移动到当前登录用户的默认库，修正后新表仍归属原库PD_BACKUP。
• 增加游标退出机制：新增NOT FOUND异常处理+显式判断SQLCODE退出循环，避免原代码游标遍历完后抛异常终止。
• 简化时间取数逻辑：EXTRACT(YEAR FROM CURRENT_DATE)无需再强制转VARCHAR，Teradata支持自动隐式转换。
• 移除未使用变量：原声明的varIDCod变量全程未使用，直接删除避免编译警告。

注意：执行存储过程的账号需要拥有PD_BACKUP库的ALTER权限，重命名操作不可逆，建议先注释掉EXECUTE IMMEDIATE行，新增CALL dbms_output.put_line(varRename);打印要执行的SQL，确认无误后再放开执行。

内容的提问来源于stack exchange，提问作者Felipe