Files
workspace/code/fms/fms-api/config/migrations/001_module_management.sql
T
2026-07-20 17:28:47 +08:00

217 lines
11 KiB
Transact-SQL

SET NOCOUNT ON;
SET XACT_ABORT ON;
BEGIN TRY
BEGIN TRANSACTION;
IF OBJECT_ID(N'dbo.b_module', N'U') IS NULL
BEGIN
CREATE TABLE dbo.b_module (
b_id varchar(50) NOT NULL,
b_parent_id varchar(50) NULL,
b_name nvarchar(100) NOT NULL,
b_i18n varchar(150) NULL,
b_type varchar(20) NOT NULL,
b_route varchar(200) NULL,
b_viewtable varchar(128) NULL,
b_savetable varchar(128) NULL,
b_keyfield varchar(50) NULL,
b_orderfield varchar(50) NULL,
b_ordertype varchar(4) NULL,
b_canmenu int NOT NULL CONSTRAINT DF_b_module_canmenu DEFAULT (0),
b_canuse int NOT NULL CONSTRAINT DF_b_module_canuse DEFAULT (1),
b_xh int NOT NULL CONSTRAINT DF_b_module_xh DEFAULT (0),
CONSTRAINT PK_b_module PRIMARY KEY (b_id),
CONSTRAINT FK_b_module_parent FOREIGN KEY (b_parent_id) REFERENCES dbo.b_module (b_id),
CONSTRAINT CK_b_module_id CHECK (
LEN(b_id) BETWEEN 2 AND 50
AND b_id LIKE '[A-Z]%'
AND b_id NOT LIKE '%[^A-Z0-9_]%'
),
CONSTRAINT CK_b_module_type CHECK (b_type IN ('directory', 'page', 'data')),
CONSTRAINT CK_b_module_ordertype CHECK (b_ordertype IS NULL OR b_ordertype IN ('ASC', 'DESC')),
CONSTRAINT CK_b_module_canmenu CHECK (b_canmenu IN (0, 1)),
CONSTRAINT CK_b_module_canuse CHECK (b_canuse IN (0, 1)),
CONSTRAINT CK_b_module_directory CHECK (
b_type <> 'directory'
OR (b_route IS NULL AND b_viewtable IS NULL AND b_savetable IS NULL)
),
CONSTRAINT CK_b_module_data CHECK (b_type <> 'data' OR b_canmenu = 0)
);
END;
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_module') AND name = N'UX_b_module_route')
CREATE UNIQUE INDEX UX_b_module_route ON dbo.b_module (b_route) WHERE b_route IS NOT NULL AND b_route <> '';
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_module') AND name = N'IX_b_module_parent')
CREATE INDEX IX_b_module_parent ON dbo.b_module (b_parent_id, b_xh, b_id);
IF OBJECT_ID(N'dbo.b_module_field', N'U') IS NULL
BEGIN
CREATE TABLE dbo.b_module_field (
b_id bigint NOT NULL,
b_module_id varchar(50) NOT NULL,
b_field varchar(50) NOT NULL,
b_name nvarchar(100) NOT NULL,
b_i18n varchar(150) NULL,
b_type varchar(20) NOT NULL,
b_canlist int NOT NULL CONSTRAINT DF_b_module_field_canlist DEFAULT (1),
b_canform int NOT NULL CONSTRAINT DF_b_module_field_canform DEFAULT (1),
b_must int NOT NULL CONSTRAINT DF_b_module_field_must DEFAULT (0),
b_canquery int NOT NULL CONSTRAINT DF_b_module_field_canquery DEFAULT (0),
b_readonly int NOT NULL CONSTRAINT DF_b_module_field_readonly DEFAULT (0),
b_width int NULL,
b_value nvarchar(500) NULL,
b_xh int NOT NULL CONSTRAINT DF_b_module_field_xh DEFAULT (0),
b_canuse int NOT NULL CONSTRAINT DF_b_module_field_canuse DEFAULT (1),
CONSTRAINT PK_b_module_field PRIMARY KEY (b_id),
CONSTRAINT FK_b_module_field_module FOREIGN KEY (b_module_id) REFERENCES dbo.b_module (b_id),
CONSTRAINT UQ_b_module_field UNIQUE (b_module_id, b_field),
CONSTRAINT CK_b_module_field_type CHECK (b_type IN ('string', 'text', 'number', 'select', 'date', 'boolean')),
CONSTRAINT CK_b_module_field_canlist CHECK (b_canlist IN (0, 1)),
CONSTRAINT CK_b_module_field_canform CHECK (b_canform IN (0, 1)),
CONSTRAINT CK_b_module_field_must CHECK (b_must IN (0, 1)),
CONSTRAINT CK_b_module_field_canquery CHECK (b_canquery IN (0, 1)),
CONSTRAINT CK_b_module_field_readonly CHECK (b_readonly IN (0, 1)),
CONSTRAINT CK_b_module_field_canuse CHECK (b_canuse IN (0, 1)),
CONSTRAINT CK_b_module_field_form_must CHECK (b_canform = 1 OR b_must = 0),
CONSTRAINT CK_b_module_field_width CHECK (b_width IS NULL OR b_width > 0)
);
END;
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_module_field') AND name = N'IX_b_module_field_module')
CREATE INDEX IX_b_module_field_module ON dbo.b_module_field (b_module_id, b_xh, b_id);
IF OBJECT_ID(N'dbo.b_module_power', N'U') IS NULL
BEGIN
CREATE TABLE dbo.b_module_power (
b_id bigint NOT NULL,
b_module_id varchar(50) NOT NULL,
b_code varchar(50) NOT NULL,
b_name nvarchar(100) NOT NULL,
b_i18n varchar(150) NULL,
b_xh int NOT NULL CONSTRAINT DF_b_module_power_xh DEFAULT (0),
b_canuse int NOT NULL CONSTRAINT DF_b_module_power_canuse DEFAULT (1),
CONSTRAINT PK_b_module_power PRIMARY KEY (b_id),
CONSTRAINT FK_b_module_power_module FOREIGN KEY (b_module_id) REFERENCES dbo.b_module (b_id),
CONSTRAINT UQ_b_module_power UNIQUE (b_module_id, b_code),
CONSTRAINT CK_b_module_power_canuse CHECK (b_canuse IN (0, 1))
);
END;
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_module_power') AND name = N'IX_b_module_power_module')
CREATE INDEX IX_b_module_power_module ON dbo.b_module_power (b_module_id, b_xh, b_id);
IF OBJECT_ID(N'dbo.b_user_module', N'U') IS NULL
BEGIN
CREATE TABLE dbo.b_user_module (
b_id bigint NOT NULL,
b_user_id bigint NOT NULL,
b_module_id varchar(50) NOT NULL,
b_inputuser_id bigint NOT NULL,
b_inputdatetime datetime NOT NULL CONSTRAINT DF_b_user_module_inputdatetime DEFAULT (GETDATE()),
CONSTRAINT PK_b_user_module PRIMARY KEY (b_id),
CONSTRAINT FK_b_user_module_user FOREIGN KEY (b_user_id) REFERENCES dbo.b_user (b_id),
CONSTRAINT FK_b_user_module_module FOREIGN KEY (b_module_id) REFERENCES dbo.b_module (b_id),
CONSTRAINT FK_b_user_module_inputuser FOREIGN KEY (b_inputuser_id) REFERENCES dbo.b_user (b_id),
CONSTRAINT UQ_b_user_module UNIQUE (b_user_id, b_module_id)
);
END;
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_user_module') AND name = N'IX_b_user_module_module')
CREATE INDEX IX_b_user_module_module ON dbo.b_user_module (b_module_id, b_user_id);
IF OBJECT_ID(N'dbo.b_user_power', N'U') IS NULL
BEGIN
CREATE TABLE dbo.b_user_power (
b_id bigint NOT NULL,
b_user_id bigint NOT NULL,
b_power_id bigint NOT NULL,
b_inputuser_id bigint NOT NULL,
b_inputdatetime datetime NOT NULL CONSTRAINT DF_b_user_power_inputdatetime DEFAULT (GETDATE()),
CONSTRAINT PK_b_user_power PRIMARY KEY (b_id),
CONSTRAINT FK_b_user_power_user FOREIGN KEY (b_user_id) REFERENCES dbo.b_user (b_id),
CONSTRAINT FK_b_user_power_power FOREIGN KEY (b_power_id) REFERENCES dbo.b_module_power (b_id),
CONSTRAINT FK_b_user_power_inputuser FOREIGN KEY (b_inputuser_id) REFERENCES dbo.b_user (b_id),
CONSTRAINT UQ_b_user_power UNIQUE (b_user_id, b_power_id)
);
END;
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_user_power') AND name = N'IX_b_user_power_power')
CREATE INDEX IX_b_user_power_power ON dbo.b_user_power (b_power_id, b_user_id);
IF OBJECT_ID(N'dbo.b_i18n', N'U') IS NULL
BEGIN
CREATE TABLE dbo.b_i18n (
b_id bigint NOT NULL,
b_key varchar(150) NOT NULL,
b_locale varchar(20) NOT NULL,
b_value nvarchar(500) NOT NULL,
b_inputuser_id bigint NOT NULL,
b_inputdatetime datetime NOT NULL CONSTRAINT DF_b_i18n_inputdatetime DEFAULT (GETDATE()),
b_updateuser_id bigint NULL,
b_updatedatetime datetime NULL,
CONSTRAINT PK_b_i18n PRIMARY KEY (b_id),
CONSTRAINT FK_b_i18n_inputuser FOREIGN KEY (b_inputuser_id) REFERENCES dbo.b_user (b_id),
CONSTRAINT FK_b_i18n_updateuser FOREIGN KEY (b_updateuser_id) REFERENCES dbo.b_user (b_id),
CONSTRAINT UQ_b_i18n UNIQUE (b_key, b_locale)
);
END;
IF NOT EXISTS (SELECT 1 FROM sys.indexes WHERE object_id = OBJECT_ID(N'dbo.b_i18n') AND name = N'IX_b_i18n_key')
CREATE INDEX IX_b_i18n_key ON dbo.b_i18n (b_key, b_locale);
IF NOT EXISTS (SELECT 1 FROM dbo.b_module WHERE b_id = 'M_SYSTEM')
INSERT INTO dbo.b_module (b_id, b_parent_id, b_name, b_i18n, b_type, b_canmenu, b_canuse, b_xh)
VALUES ('M_SYSTEM', NULL, N'系统管理', 'module.M_SYSTEM', 'directory', 1, 1, 100);
IF NOT EXISTS (SELECT 1 FROM dbo.b_module WHERE b_id = 'M_MODULE')
INSERT INTO dbo.b_module (b_id, b_parent_id, b_name, b_i18n, b_type, b_route, b_canmenu, b_canuse, b_xh)
VALUES ('M_MODULE', 'M_SYSTEM', N'模块管理', 'module.M_MODULE', 'page', '/system/modules', 1, 1, 10);
DECLARE @Powers TABLE (b_id bigint, b_code varchar(50), b_name nvarchar(100), b_xh int);
INSERT INTO @Powers VALUES
(205000000000000001, 'create', N'新增', 10),
(205000000000000002, 'update', N'修改', 20),
(205000000000000003, 'delete', N'删除', 30),
(205000000000000004, 'grant', N'用户授权', 40);
INSERT INTO dbo.b_module_power (b_id, b_module_id, b_code, b_name, b_i18n, b_xh, b_canuse)
SELECT p.b_id, 'M_MODULE', p.b_code, p.b_name, 'power.M_MODULE.' + p.b_code, p.b_xh, 1
FROM @Powers p
WHERE NOT EXISTS (
SELECT 1 FROM dbo.b_module_power target
WHERE target.b_module_id = 'M_MODULE' AND target.b_code = p.b_code
);
EXEC sys.sp_set_session_context @key = N'allow_g3soft', @value = 1;
DECLARE @AdminId bigint = (SELECT TOP (1) b_id FROM dbo.b_user WHERE b_account = N'g3soft' AND b_canuse = 1);
IF @AdminId IS NULL
THROW 51000, '未找到已启用的管理员账号 g3soft,模块管理初始化已取消。', 1;
IF NOT EXISTS (SELECT 1 FROM dbo.b_user_module WHERE b_user_id = @AdminId AND b_module_id = 'M_MODULE')
INSERT INTO dbo.b_user_module (b_id, b_user_id, b_module_id, b_inputuser_id, b_inputdatetime)
VALUES (205000000000000101, @AdminId, 'M_MODULE', @AdminId, GETDATE());
INSERT INTO dbo.b_user_power (b_id, b_user_id, b_power_id, b_inputuser_id, b_inputdatetime)
SELECT 205000000000000200 + ROW_NUMBER() OVER (ORDER BY p.b_id), @AdminId, p.b_id, @AdminId, GETDATE()
FROM dbo.b_module_power p
WHERE p.b_module_id = 'M_MODULE'
AND p.b_code IN ('create', 'update', 'delete', 'grant')
AND NOT EXISTS (
SELECT 1 FROM dbo.b_user_power target
WHERE target.b_user_id = @AdminId AND target.b_power_id = p.b_id
);
EXEC sys.sp_set_session_context @key = N'allow_g3soft', @value = NULL;
COMMIT TRANSACTION;
END TRY
BEGIN CATCH
IF XACT_STATE() <> 0 ROLLBACK TRANSACTION;
BEGIN TRY
EXEC sys.sp_set_session_context @key = N'allow_g3soft', @value = NULL;
END TRY
BEGIN CATCH
END CATCH;
THROW;
END CATCH;