--INSERT INTO ReportServer select * from  SUBHSSEDB_WH.dbo.ReportServer
--go
/************环境危险源辨识与评价主表*************/
CREATE PROCEDURE [dbo].[Sp_Hazard_EnvironmentalRiskListReport]
 @EnvironmentalRiskListId nvarchar(50)
AS
SELECT EnvironmentalRiskList.EnvironmentalRiskListId, 
EnvironmentalRiskList.ProjectId, 
EnvironmentalRiskList.RiskCode, 
EnvironmentalRiskList.CompileMan, 
EnvironmentalRiskList.CompileDate, 
EnvironmentalRiskList.AttachUrl, 
EnvironmentalRiskList.States, 
EnvironmentalRiskList.Contents, 
EnvironmentalRiskList.WorkAreaName, 
EnvironmentalRiskList.IdentificationDate, 
EnvironmentalRiskList.ControllingPerson,
U1.UserName AS CompileManName,
U2.UserName AS ControllingPersonName,
Project.ProjectName
FROM dbo.Hazard_EnvironmentalRiskList AS EnvironmentalRiskList
LEFT JOIN Sys_User AS U1 ON U1.UserId = EnvironmentalRiskList.CompileMan
LEFT JOIN Sys_User AS U2 ON U2.UserId = EnvironmentalRiskList.ControllingPerson
LEFT JOIN Base_Project AS Project ON Project.ProjectId = EnvironmentalRiskList.ProjectId
WHERE EnvironmentalRiskList.EnvironmentalRiskListId = @EnvironmentalRiskListId

GO

/************环境危险源辨识与评价明细表*************/
CREATE PROCEDURE [dbo].[Sp_Hazard_EnvironmentalRiskListReportItem]
 @EnvironmentalRiskListId nvarchar(50)
AS
SELECT ROW_NUMBER() OVER (ORDER BY Item.EnvironmentalRiskItemId) AS Number,
Item.EnvironmentalRiskItemId, 
Item.EnvironmentalRiskListId, 
Item.EnvironmentalId, 
ConstEType.ConstText AS EType, 
Item.ActivePoint, 
Item.EnvironmentalFactors, 
Item.AValue, 
Item.BValue, 
Item.CValue, 
Item.DValue, 
Item.EValue, 
Item.ZValue, 
Const.ConstText AS SmallType,  
Item.IsImportant,
(CASE Item.IsImportant WHEN 'true' THEN '是' ELSE '否' END)AS IsImportantName,
Item.Code, 
Item.GValue, 
Item.ControlMeasures, 
Item.Remark, 
Item.FValue, 
Item.EnvironmentEffect,
(ISNULL(Item.AValue,0) + ISNULL(Item.BValue,0)+ ISNULL(Item.CValue,0)+ ISNULL(Item.DValue,0)+ ISNULL(Item.EValue,0)) AS ZValue1,
(ISNULL(Item.FValue,0) + ISNULL(Item.GValue,0)) AS ZValue2
FROM dbo.Hazard_EnvironmentalRiskItem AS Item
LEFT JOIN dbo.Hazard_EnvironmentalRiskList AS EnvironmentalRiskList ON EnvironmentalRiskList.EnvironmentalRiskListId = Item.EnvironmentalRiskListId
LEFT JOIN Technique_Environmental AS Environmental ON Environmental.EnvironmentalId = Item.EnvironmentalId
LEFT JOIN dbo.Sys_Const AS Const ON	Const.ConstValue = Item.SmallType AND Const.GroupId = 'EnvironmentalSmallType'
LEFT JOIN dbo.Sys_Const AS ConstEType ON Item.EType = ConstEType.ConstValue AND ConstEType.GroupId='EnvironmentalType'
WHERE Item.EnvironmentalRiskListId = @EnvironmentalRiskListId
GO

/************环境危险源辨识与评价明细表(重要环境因素)*************/
CREATE PROCEDURE [dbo].[Sp_Hazard_EnvironmentalRiskListReportImportantItem]
 @EnvironmentalRiskListId nvarchar(50)
AS
SELECT ROW_NUMBER() OVER (ORDER BY Item.EnvironmentalRiskItemId) AS Number,
Item.EnvironmentalRiskItemId, 
Item.EnvironmentalRiskListId, 
Item.EnvironmentalId, 
ConstEType.ConstText AS EType, 
Item.ActivePoint, 
Item.EnvironmentalFactors, 
Item.AValue, 
Item.BValue, 
Item.CValue, 
Item.DValue, 
Item.EValue, 
Item.ZValue, 
Const.ConstText AS SmallType,  
Item.IsImportant,
(CASE Item.IsImportant WHEN 'true' THEN '是' ELSE '否' END)AS IsImportantName,
Item.Code, 
Item.GValue, 
Item.ControlMeasures, 
Item.Remark, 
Item.FValue, 
Item.EnvironmentEffect,
(ISNULL(Item.AValue,0) + ISNULL(Item.BValue,0)+ ISNULL(Item.CValue,0)+ ISNULL(Item.DValue,0)+ ISNULL(Item.EValue,0)) AS ZValue1,
(ISNULL(Item.FValue,0) + ISNULL(Item.GValue,0)) AS ZValue2
FROM dbo.Hazard_EnvironmentalRiskItem AS Item
LEFT JOIN dbo.Hazard_EnvironmentalRiskList AS EnvironmentalRiskList ON EnvironmentalRiskList.EnvironmentalRiskListId = Item.EnvironmentalRiskListId
LEFT JOIN Technique_Environmental AS Environmental ON Environmental.EnvironmentalId = Item.EnvironmentalId
LEFT JOIN dbo.Sys_Const AS Const ON	Const.ConstValue = Item.SmallType AND Const.GroupId = 'EnvironmentalSmallType'
LEFT JOIN dbo.Sys_Const AS ConstEType ON Item.EType = ConstEType.ConstValue AND ConstEType.GroupId='EnvironmentalType'
WHERE Item.IsImportant ='true'
AND Item.EnvironmentalRiskListId = @EnvironmentalRiskListId
GO

/***********职业健康安全危险源辨识与评价主表************/
CREATE PROCEDURE [dbo].[Sp_Hazard_HazardListReport]
 @HazardListId nvarchar(50)
AS
SELECT HazardList.HazardListId, 
HazardList.HazardListCode, 
HazardList.ProjectId, 
HazardList.VersionNo, 
HazardList.CompileMan, 
HazardList.CompileDate, 
HazardList.States, 
HazardList.WorkStage, 
HazardList.Contents, 
HazardList.WorkAreaName, 
HazardList.IdentificationDate, 
HazardList.ControllingPerson,
Project.ProjectName,
U.UserName AS CompileManName,
U2.UserName AS ControllingPersonName
FROM dbo.Hazard_HazardList AS HazardList
LEFT JOIN Base_Project AS Project ON Project.ProjectId = HazardList.ProjectId
LEFT JOIN Sys_User AS U ON U.UserId = HazardList.CompileMan
LEFT JOIN Sys_User AS U2 ON U2.UserId = HazardList.ControllingPerson 
WHERE HazardList.HazardListId = @HazardListId 
GO


/***********职业健康安全危险源辨识与评价明细表************/
CREATE PROCEDURE [dbo].[Sp_Hazard_HazardSelectedItemReport]
 @HazardListId nvarchar(50)
AS
SELECT ROW_NUMBER() OVER (ORDER BY HazardSelectedItem.HazardId) AS Number,
HazardSelectedItem.HazardId, 
HazardSelectedItem.HazardListTypeId,
HazardSelectedItem.HazardListId,
HazardSelectedItem.HazardItems, 
HazardSelectedItem.DefectsType, 
HazardSelectedItem.MayLeadAccidents, 
HazardSelectedItem.HelperMethod, 
HazardSelectedItem.HazardJudge_L, 
HazardSelectedItem.HazardJudge_E, 
HazardSelectedItem.HazardJudge_C, 
HazardSelectedItem.HazardJudge_D, 
(CASE HazardSelectedItem.HazardLevel
WHEN '1' THEN 'Ⅰ'
WHEN '2' THEN 'Ⅱ'
WHEN '3' THEN 'Ⅲ'
WHEN '4' THEN 'Ⅳ'
WHEN '5' THEN 'Ⅴ' END) AS HazardLevel, 
HazardSelectedItem.ControlMeasures, 
HazardSelectedItem.IsResponse, 
HazardSelectedItem.ResponseRecode, 
HazardSelectedItem.PromptTime, 
HazardSelectedItem.Remark, 
HazardSelectedItem.WorkStage,
HazardListType2.HazardListTypeName
FROM dbo.Hazard_HazardSelectedItem AS HazardSelectedItem
LEFT JOIN dbo.Technique_HazardListType AS HazardListType ON HazardListType.HazardListTypeId = HazardSelectedItem.HazardListTypeId 
lEFT JOIN dbo.Technique_HazardListType AS HazardListType2 ON HazardListType2.HazardListTypeId = HazardListType.SupHazardListTypeId
WHERE HazardSelectedItem.HazardListId = @HazardListId 
GO


/***********职业健康安全危险源辨识与评价（重大危险源）明细表************/
CREATE PROCEDURE [dbo].[Sp_Hazard_HazardSelectedItemImportantReport]
 @HazardListId nvarchar(50)
AS
SELECT ROW_NUMBER() OVER (ORDER BY HazardSelectedItem.HazardId) AS Number,
HazardSelectedItem.HazardId, 
HazardSelectedItem.HazardListTypeId,
HazardSelectedItem.HazardListId,
HazardSelectedItem.HazardItems, 
HazardSelectedItem.DefectsType, 
HazardSelectedItem.MayLeadAccidents, 
HazardSelectedItem.HelperMethod, 
HazardSelectedItem.HazardJudge_L, 
HazardSelectedItem.HazardJudge_E, 
HazardSelectedItem.HazardJudge_C, 
HazardSelectedItem.HazardJudge_D, 
(CASE HazardSelectedItem.HazardLevel
WHEN '1' THEN 'Ⅰ'
WHEN '2' THEN 'Ⅱ'
WHEN '3' THEN 'Ⅲ'
WHEN '4' THEN 'Ⅳ'
WHEN '5' THEN 'Ⅴ' END) AS HazardLevel, 
HazardSelectedItem.ControlMeasures, 
HazardSelectedItem.IsResponse, 
HazardSelectedItem.ResponseRecode, 
HazardSelectedItem.PromptTime, 
HazardSelectedItem.Remark, 
HazardSelectedItem.WorkStage,
HazardListType2.HazardListTypeName
FROM dbo.Hazard_HazardSelectedItem AS HazardSelectedItem
LEFT JOIN dbo.Technique_HazardListType AS HazardListType ON HazardListType.HazardListTypeId = HazardSelectedItem.HazardListTypeId 
LEFT JOIN dbo.Technique_HazardListType AS HazardListType2 ON HazardListType2.HazardListTypeId = HazardListType.SupHazardListTypeId
WHERE HazardSelectedItem.HazardJudge_D > 160 
AND HazardSelectedItem.HazardListId = @HazardListId 

GO