109 lines
5.4 KiB
Transact-SQL
109 lines
5.4 KiB
Transact-SQL
--安全的施工方案，url改成质量的施工方案
|
||
update sys_menu set url='CQMS/Solution/ConstructSolution.aspx'
|
||
where url='HSSE/Solution/ConstructSolution.aspx' and menuname='施工方案' and MenuType='Menu_HSSE'
|
||
|
||
--创建游标将安全施工方案的数据插入质量的施工方案表
|
||
DECLARE @ConstructSolutionId nvarchar(50),
|
||
@ProjectId nvarchar(50),
|
||
@ConstructSolutionName nvarchar(50),--方案名称
|
||
@UnitId nvarchar(50),--施工单位
|
||
@SolutinType nvarchar(50),--方案类别
|
||
@ConstructSolutionCode nvarchar(50),--编号
|
||
@CompileDate datetime,--审批时间
|
||
@CompileMan nvarchar(50),--审批人
|
||
@States nvarchar(20), --安全状态
|
||
@State nvarchar(20)--质量状态
|
||
|
||
|
||
DECLARE My_Cursor CURSOR --定义游标
|
||
FOR ( SELECT ConstructSolutionId, ProjectId,UnitId,SolutinType,ConstructSolutionCode
|
||
,ConstructSolutionName,CompileDate,CompileMan,States FROM Solution_ConstructSolution )
|
||
OPEN My_Cursor;--打开游标
|
||
FETCH NEXT FROM My_Cursor INTO @ConstructSolutionId,@ProjectId,@UnitId,@SolutinType,@ConstructSolutionCode,
|
||
@ConstructSolutionName,
|
||
@CompileDate,@CompileMan,@States;--读取第一行数据
|
||
WHILE @@FETCH_STATUS=0
|
||
--这里对游标的状态进行判断，如果为0，证明游标中有值
|
||
BEGIN
|
||
--状态已完成
|
||
if(@States='2')
|
||
begin
|
||
set @State='3'--状态已闭合
|
||
end
|
||
else
|
||
begin
|
||
set @State='1'--未闭合
|
||
end
|
||
|
||
--基础数据插入质量的施工方案主表
|
||
INSERT INTO Solution_CQMSConstructSolution(ConstructSolutionId,ProjectId,Code
|
||
,SolutionName,UnitId,SolutionType,CompileDate,CompileMan,State)
|
||
values(@ConstructSolutionId,@ProjectId,@ConstructSolutionCode,
|
||
@ConstructSolutionName,@UnitId,@SolutinType,
|
||
@CompileDate,@CompileMan,@State);
|
||
--插入附件表
|
||
insert into AttachFile(AttachFileId,ToKeyId,AttachSource,AttachUrl,menuid,AttachPath,ImageByte)
|
||
select newid(),ToKeyId,AttachSource,AttachUrl,'91C4BFDB-0A51-4992-99CC-EB4EC185593D',AttachPath,ImageByte from AttachFile
|
||
where ToKeyId=@ConstructSolutionId
|
||
|
||
|
||
FETCH NEXT
|
||
FROM
|
||
My_Cursor INTO @ConstructSolutionId,@ProjectId,@UnitId,@SolutinType,@ConstructSolutionCode,
|
||
@ConstructSolutionName,
|
||
@CompileDate,@CompileMan,@States;
|
||
|
||
END CLOSE My_Cursor;--关闭游标
|
||
DEALLOCATE My_Cursor;--释放游标
|
||
GO
|
||
|
||
--insert into Technique_CheckItemSet(CheckItemSetId,CheckItemName,SupCheckItem,CheckType,MapCode,IsEndLever,SortIndex)
|
||
--values('43594e1e-66e2-4664-bad7-feb12ea4844a','综合类','0','2','10','0','4')
|
||
--删除专项检查类别 -综合类型 -新型肺炎防控
|
||
delete from Check_CheckSpecial where CheckItemSetId='43594e1e-66e2-4664-bad7-feb12ea4844a'
|
||
delete from Technique_CheckItemSet where CheckItemSetId='43594e1e-66e2-4664-bad7-feb12ea4844a'
|
||
go
|
||
delete from Check_CheckSpecial where CheckItemSetId='4324d0f5-cf7b-4e89-be56-45ba131f5f2f'
|
||
delete from Technique_CheckItemSet where CheckItemSetId='4324d0f5-cf7b-4e89-be56-45ba131f5f2f'
|
||
go
|
||
|
||
--增加专项检查明细项字段-检查项内容、整改期限
|
||
alter table Check_CheckSpecialDetail add CheckItemSetId nvarchar(50) null;
|
||
alter table Check_CheckSpecialDetail add CheckItemSetContent nvarchar(3000) null;
|
||
alter table Check_CheckSpecialDetail add Rectification_Date datetime null;
|
||
go
|
||
|
||
--为视图增加列
|
||
/*LEFT JOIN Sys_Const AS const ON const.ConstValue = detail.HandleStep and const.GroupId='HandleStep'*/
|
||
ALTER VIEW [dbo].[View_CheckSpecialDetail]
|
||
AS
|
||
SELECT detail.CheckSpecialDetailId, detail.CheckSpecialId, detail.CheckItem, checkItemSet.CheckItemName, detail.Unqualified,
|
||
detail.SortIndex, detail.UnitId, detail.HandleStep, detail.CompleteStatus,
|
||
(CASE WHEN detail.CompleteStatus = 1 THEN '已整改' ELSE '待整改' END) AS CompleteStatusName, detail.LimitedDate,
|
||
detail.CompletedDate, detail.CheckContent, detail.CheckArea,
|
||
workArea.UnitWorkName + (CASE WHEN workArea.ProjectType = '1' THEN '(建筑)' WHEN workArea.ProjectType = '2' THEN '(安装)'
|
||
ELSE '' END) AS CheckAreaName, detail.DataId, detail.DataType, unit.UnitName,
|
||
dbo.GetConstTextByIds(detail.HandleStep) AS HandleStepStr,
|
||
(CASE WHEN detail.DataType LIKE '%1%' THEN '下发整改单:' +
|
||
(SELECT RectifyNoticesCode
|
||
FROM Check_RectifyNotices
|
||
WHERE detail.DataId LIKE '%' + RectifyNoticesId + '%') ELSE '' END)
|
||
+ (CASE WHEN detail.DataType LIKE '%2%' THEN '下发处罚单:' +
|
||
(SELECT PunishNoticeCode
|
||
FROM Check_PunishNotice
|
||
WHERE detail.DataId LIKE '%' + PunishNoticeId + '%') ELSE '' END)
|
||
+ (CASE WHEN detail.DataType = '3' THEN '下发暂停令:' +
|
||
(SELECT PauseNoticeCode
|
||
FROM Check_PauseNotice
|
||
WHERE detail.DataId LIKE '%' + PauseNoticeId + '%') ELSE '' END) AS HandleStepLink, detail.HiddenHazardType,
|
||
(CASE WHEN detail.HiddenHazardType = '3' THEN '重大' WHEN detail.HiddenHazardType = '2' THEN '较大' WHEN detail.HiddenHazardType
|
||
= '1' THEN '一般' ELSE '' END) AS HiddenHazardTypeName, detail.CheckItemSetId, detail.CheckItemSetContent,
|
||
detail.Rectification_Date
|
||
FROM dbo.Check_CheckSpecialDetail AS detail LEFT OUTER JOIN
|
||
dbo.Technique_CheckItemSet AS checkItemSet ON checkItemSet.CheckItemSetId = detail.CheckItem LEFT OUTER JOIN
|
||
dbo.Base_Unit AS unit ON unit.UnitId = detail.UnitId LEFT OUTER JOIN
|
||
dbo.WBS_UnitWork AS workArea ON detail.CheckArea = workArea.UnitWorkId
|
||
|
||
GO
|
||
|