用友U8手工刪除賬套的SQL

DECLARE @AccID CHAR(3);
SET @AccID = '999';
--在此修改賬套號
USE UFSystem;

--備份日誌
DELETE  FROM UA_BackupLog
WHERE   cAcc_Id = @AccID;

--備份計劃子表
DELETE  FROM UA_BackupPlans
WHERE   cAcc_Id = @AccID;

--備份計劃
DELETE  FROM UA_BackupPlan
WHERE   cPlan_Id NOT IN ( SELECT    cPlan_Id
                          FROM      UA_BackupPlans );
                          
--操作員權限分配表
DELETE  FROM UA_HoldAuth
WHERE   cAcc_Id = @AccID;

--權限預置表
DELETE  FROM UA_Auth
WHERE   cAcc_Id = @AccID;

--流程圖項目表
DELETE  FROM UA_FlowItems
WHERE   cAccId = @AccID;

--流程圖線路表
DELETE  FROM UA_FlowLines
WHERE   cAccId = @AccID;

--單據編號生成控制表
DELETE  FROM UA_Identity
WHERE   cAcc_Id = @AccID;

--賬套年度表
DELETE  FROM UA_Account_sub
WHERE   cAcc_Id = @AccID;

--上機日誌
DELETE  FROM UA_Log
WHERE   cAcc_Id = @AccID;

--會計期間表
DELETE  FROM UA_Period
WHERE   cAcc_Id = @AccID;

--賬套表
DELETE  FROM UA_Account
WHERE   cAcc_Id = @AccID;

--發送信息設置
DELETE  FROM UA_Message
WHERE   Account = @AccID;

--服務器配置信息表
DELETE  GDP_JccpConfigure
WHERE   UF_DB_NAME = @AccID; 

--賬套數據庫映射表
DELETE  FROM UA_AccountDatabase
WHERE   cAcc_Id = @AccID;

--分離數據庫，激進點的可以直接刪除數據庫
USE master;
DECLARE AccCur CURSOR
FOR
    SELECT  name
    FROM    sysdatabases;
DECLARE @AccName VARCHAR(40);
OPEN AccCur;
FETCH NEXT FROM AccCur INTO @AccName;
WHILE ( @@fetch_status <> -1 )
    BEGIN
        IF ( @@fetch_status <> -2 )
            BEGIN
                IF ( LEFT(@AccName, 10) = 'UFDATA_' + @AccID )
                    AND LEN(@AccName) = 15
                    BEGIN
                        EXECUTE sp_detach_db @AccName;
                        PRINT '賬套庫' + @AccName + '已分離!';
                    END;
                IF @AccName = 'UFMeta_' + @AccID
                    BEGIN
                        EXECUTE sys.sp_detach_db @AccName;
                        PRINT '數據庫' + @AccName + '已經分離';
                    END;
            END;
        FETCH NEXT FROM AccCur INTO @AccName;
    END;
CLOSE AccCur;
DEALLOCATE AccCur;
SELECT  '賬套' + @AccID + '刪除完成!';