SGGL_SHJ/DataBase/版本日志/已更新脚本/SGGL_SeDin_人员脚本/SGGLDB_V2021-10-29-006人员表相关...

1585 lines
66 KiB
Transact-SQL
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

--获取当前人待办事项
ALTER PROCEDURE [dbo].[Sp_APP_GetToDoItems]
@projectId NVARCHAR(50) = NULL,
@personId NVARCHAR(200)=NULL
AS
/*获取当前人待办事项*/
BEGIN
SELECT HazardRegisterId AS DataId
,'B6BE5FE0-CB84-47FF-A6C3-5AD9E1CCE079' AS MenuId
,'安全巡检' AS MenuName
,register.RegisterDef AS Content
,PersonId
,persons.PersonName
,register.RegisterDate AS DataTime
,CONVERT(varchar(100),register.RegisterDate, 23) AS DataTimeStr
,'/pages/grow/safe_confirm/main' AS UrlStr
,'' AS pcUrl
FROM HSSE_Hazard_HazardRegister AS register
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE register.ProjectId=@projectId AND
((register.states = '1' AND (register.ResponsibleMan =@personId OR register.CCManIds LIKE ('%'+@personId+'%') ))
OR (register.states = '2' AND register.CheckManId =@personId))
UNION ALL
SELECT PlanId AS DataId
,'B782A26B-D85C-4F84-8B45-F7AA47B3159E' AS MenuId
,'培训计划' AS MenuName
,PlanName AS Content
,PersonId
,persons.PersonName
,DesignerDate AS DataTime
,CONVERT(varchar(100),DesignerDate, 23) AS DataTimeStr
,'/pages/train_task/train_index/main' AS UrlStr
,'' AS pcUrl
FROM Training_Plan AS plans
LEFT JOIN Person_Persons AS persons ON plans.DesignerId= persons.PersonId
WHERE plans.ProjectId=@projectId AND
(States = '0' OR States = '1') AND plans.DesignerId =@personId
UNION ALL
SELECT TestPlanId AS DataId
,'FAF7F4A4-A4BC-4D94-9E88-0CF5A380DB34' AS MenuId
,'考试计划' AS MenuName
,PlanName AS Content
,PersonId
,persons.PersonName
,PlanDate AS DataTime
,CONVERT(varchar(100),PlanDate, 23) AS DataTimeStr
,'/pages/train_task/test_list/main' AS UrlStr
,'' AS pcUrl
FROM Training_TestPlan AS TPlan
LEFT JOIN Person_Persons AS persons ON persons.PersonId =TPlan.PlanManId
WHERE TPlan.ProjectId=@projectId AND
(States = '0' OR States = '1' ) AND PlanManId =@personId
UNION ALL
SELECT FireWorkId AS DataId
,'2E58D4F1-2FF1-450E-8A00-1CE3BBCF8D4B' AS MenuId
,'动火作业' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/dh_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_FireWork AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT HeightWorkId AS DataId
,'DA1CAE8E-B5BF-4AC0-9996-AF6CAA412CA9' AS MenuId
,'高处作业' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/gc_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_HeightWork AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT LimitedSpaceId AS DataId
,'AEC9166D-1C91-45F0-8BFE-D3D0479A28C7' AS MenuId
,'受限空间' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/sxkj_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_LimitedSpace AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT RadialWorkId AS DataId
,'F72FF20B-D3EB-46A5-97F7-C99B2473A140' AS MenuId
,'射线作业' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/sx_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_RadialWork AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT OpenCircuitId AS DataId
,'4E607E83-41FC-4F49-B26F-A21CFE38328F' AS MenuId
,'断路(占道)' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/dl_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_OpenCircuit AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT BreakGroundId AS DataId
,'755C6AC9-2E38-4D4F-AF33-33CB1744A907' AS MenuId
,'动土作业' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/dt_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_BreakGround AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT NightWorkId AS DataId
,'7BBAE649-7B00-4475-A911-BFE3A37AC55B' AS MenuId
,'夜间施工' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/yjsg_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_NightWork AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT LiftingWorkId AS DataId
,'A1BE3AB6-9D4A-41E7-8870-E73423165451' AS MenuId
,'吊装作业' AS MenuName
,LicenseCode AS Content
,PersonId
,persons.PersonName
,ApplyDate AS DataTime
,CONVERT(varchar(100),ApplyDate, 23) AS DataTimeStr
,(CASE WHEN States = '0' THEN '/pages/job_info/dz_add/main'
ELSE '/pages/job_info/dh_approval/main' END) AS UrlStr
,'' AS pcUrl
FROM License_LiftingWork AS License
LEFT JOIN Person_Persons AS persons ON persons.PersonId =License.NextManId
WHERE License.ProjectId=@projectId
AND (States = '0' OR States = '1' )
AND License.NextManId LIKE '%'+ @personId+'%'
UNION ALL
SELECT RectifyNoticesId AS DataId
,'0038D764-D628-46F0-94FF-D0A22C3C45A3' AS MenuId
,'隐患整改' AS MenuName
,(CASE WHEN Rectify.States =1 THEN '待签发:'
WHEN Rectify.States =2 THEN '待整改:'
WHEN Rectify.States =3 THEN '待审核:'
WHEN Rectify.States =4 THEN '待复查:'
WHEN Rectify.States =5 THEN '已完成:'
ELSE '待提交:' END + RectifyNoticesCode) AS Content
,persons.PersonId
,persons.PersonName
,CheckedDate AS DataTime
,CONVERT(varchar(100),CheckedDate, 23) AS DataTimeStr
,(CASE WHEN ISNULL(Rectify.States,0) =0 THEN '/pages/grow/rn_add/main' --提交
WHEN Rectify.States =1 AND Rectify.SignPerson=@personId THEN '/pages/grow/rn_approval/main' --签发
WHEN Rectify.States =2 AND Rectify.DutyPersonId=@personId THEN '/pages/grow/rn_rectify/main' --整改
WHEN Rectify.States =3 AND Rectify.UnitHeadManId=@personId THEN '/pages/grow/rn_rectifycf/main' --审核
WHEN Rectify.States =4 AND Rectify.CheckPerson=@personId THEN '/pages/grow/rn_confirm/main' --复查
ELSE '/pages/grow/rn_detail/main' END) AS UrlStr
,'' AS pcUrl
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE Rectify.ProjectId=@projectId AND Rectify.States <> 5
AND ((ISNULL(Rectify.States,0) =0 AND Rectify.CompleteManId LIKE '%'+ @personId+'%')
OR (Rectify.States =1 AND Rectify.SignPerson LIKE '%'+ @personId+'%')
OR (Rectify.States =2 AND Rectify.DutyPersonId LIKE '%'+ @personId+'%')
OR (Rectify.States =3 AND Rectify.UnitHeadManId LIKE '%'+ @personId+'%')
OR (Rectify.States =4 AND Rectify.CheckPerson LIKE '%'+ @personId+'%')
OR (Rectify.ProfessionalEngineerId LIKE '%'+ @personId+'%' AND (ProfessionalEngineerTime1 IS NULL OR ProfessionalEngineerTime2 IS NULL))
OR (Rectify.ConstructionManagerId LIKE '%'+ @personId+'%' AND (ConstructionManagerTime1 IS NULL OR ConstructionManagerTime2 IS NULL))
OR (Rectify.ProjectManagerId LIKE '%'+ @personId+'%' AND (ProjectManagerTime1 IS NULL OR ProjectManagerTime2 IS NULL)))
UNION ALL
SELECT Person.SitePersonId AS DataId
,'EE260447-028F-46AF-8864-9A5DC9DAA5BD' AS MenuId
,'现场人员' AS MenuName
,Person.PersonName AS Content
,persons.PersonId
,persons.PersonName
,Person.InTime AS DataTime
,CONVERT(varchar(100),Person.InTime, 23) AS DataTimeStr
,('/pages/info/people_detail/main') AS UrlStr
,'' AS pcUrl
FROM SitePerson_Person AS Person
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE Person.ProjectId=@projectId AND Person.States='1'
AND Person.AuditorId = @personId AND Person.AuditorDate IS NULL
UNION ALL
SELECT PersonQualityId AS DataId
,'EBEA762D-1F46-47C5-9EAD-759E13D9B41C' AS MenuId
,'特种作业人员' AS MenuName
,Person.PersonName AS Content
,persons.PersonId
,persons.PersonName
,p.CompileDate AS DataTime
,CONVERT(varchar(100),p.CompileDate, 23) AS DataTimeStr
,('/pages/info/speople_detail/main') AS UrlStr
,'' AS pcUrl
FROM QualityAudit_PersonQuality AS p
LEFT JOIN SitePerson_Person AS Person ON Person.PersonId =p.PersonId
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE Person.ProjectId=@projectId AND p.AuditorId = @personId
AND (p.States ='1')
UNION ALL
SELECT SafePersonQualityId AS DataId
,'750F5074-45B9-470E-AE1E-6204957421E6' AS MenuId
,'安管人员' AS MenuName
,p.PersonName AS Content
,persons.PersonId
,persons.PersonName
,s.CompileDate AS DataTime
,CONVERT(varchar(100),s.CompileDate, 23) AS DataTimeStr
,('/pages/info/speople_detail/main') AS UrlStr
,'' AS pcUrl
FROM QualityAudit_SafePersonQuality AS s
LEFT JOIN SitePerson_Person AS p ON p.PersonId =s.PersonId
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE p.ProjectId=@projectId AND s.AuditorId = @personId
AND (s.States ='1')
UNION ALL
SELECT EquipmentPersonQualityId AS DataId
,'96FB96FF-20D8-4CE9-AF57-C19717BB5D3E' AS MenuId
,'特种设备作业人员' AS MenuName
,Person.PersonName AS Content
,persons.PersonId
,persons.PersonName
,p.CompileDate AS DataTime
,CONVERT(varchar(100),p.CompileDate, 23) AS DataTimeStr
,('/pages/info/speople_detail/main') AS UrlStr
,'' AS pcUrl
FROM QualityAudit_EquipmentPersonQuality AS p
LEFT JOIN SitePerson_Person AS Person ON Person.PersonId =p.PersonId
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE Person.ProjectId=@projectId AND p.AuditorId = @personId
AND (p.States ='1')
UNION ALL
SELECT TaskId AS DataId
,'E108F75D-89D0-4DCA-8356-A156C328805C' AS MenuId
,'培训任务' AS MenuName
,Plans.PlanName AS Content
,persons.PersonId
,persons.PersonName
,TaskDate AS DataTime
,CONVERT(varchar(100),TaskDate, 23) AS DataTimeStr
,('/pages/train_task/task_list/main') AS UrlStr
,'' AS pcUrl
FROM Training_Task AS Task
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
LEFT JOIN Training_Plan AS Plans ON Plans.PlanId =Task.PlanId
WHERE Task.ProjectId=@projectId AND (Task.States IS NULL OR Task.States != 2)
AND Task.UserId = @personId
UNION ALL
SELECT PauseNoticeId AS DataId
,'C81DB7ED-165E-4C69-86B0-A3AAE37059FE' AS MenuId
,'暂停令' AS MenuName
,(CASE WHEN PauseNotice.PauseStates =1 THEN '待签发:'
WHEN PauseNotice.PauseStates =2 THEN '待批准:'
WHEN PauseNotice.PauseStates =3 THEN '待接收:'
ELSE '待提交:' END + PauseNoticeCode) AS Content
,persons.PersonId
,persons.PersonName
,PauseTime AS DataTime
,CONVERT(varchar(100),PauseTime, 23) AS DataTimeStr
,(CASE WHEN ISNULL(PauseNotice.PauseStates,0) =0 THEN '/pages/info/stop_add/main' --待提交
WHEN PauseNotice.PauseStates =1 AND PauseNotice.SignManId=@personId THEN '/pages/info/stop_approval/main' --待签发
WHEN PauseNotice.PauseStates =2 AND PauseNotice.ApproveManId=@personId THEN '/pages/info/stop_confirm/main' --待批准
WHEN PauseNotice.PauseStates =3 AND PauseNotice.DutyPersonId=@personId THEN '/pages/info/stop_feedback/main' --待接收
ELSE '/pages/info/stop_detail/main' END) AS UrlStr
,'' AS pcUrl
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE PauseNotice.ProjectId=@projectId AND PauseNotice.PauseStates <> 4
AND ((ISNULL(PauseNotice.PauseStates,0) =0 AND PauseNotice.CompileManId LIKE '%'+ @personId+'%')
OR (PauseNotice.PauseStates =1 AND PauseNotice.SignManId LIKE '%'+ @personId+'%')
OR (PauseNotice.PauseStates =2 AND PauseNotice.ApproveManId LIKE '%'+ @personId+'%')
OR (PauseNotice.PauseStates =3 AND PauseNotice.DutyPersonId LIKE '%'+ @personId+'%')
OR (PauseNotice.ProfessionalEngineerId LIKE '%'+ @personId+'%' AND ProfessionalEngineerTime IS NULL)
OR (PauseNotice.ConstructionManagerId LIKE '%'+ @personId+'%' AND ConstructionManagerTime IS NULL)
OR (PauseNotice.UnitHeadManId LIKE '%'+ @personId+'%' AND UnitHeadManTime IS NULL)
OR (PauseNotice.SupervisorManId LIKE '%'+ @personId+'%' AND SupervisorManTime IS NULL)
OR (PauseNotice.OwnerId LIKE '%'+ @personId+'%' AND OwnerTime IS NULL))
UNION ALL
SELECT PunishNoticeId AS DataId
,'755F1C1D-2178-47D8-9F82-A501B53A2436' AS MenuId
,'处罚单' AS MenuName
,(CASE WHEN PunishNotice.PunishStates =1 THEN '待签发:'
WHEN PunishNotice.PunishStates =2 THEN '待批准:'
WHEN PunishNotice.PunishStates =3 THEN '待回执:'
ELSE '待提交:' END + PunishNoticeCode) AS Content
,persons.PersonId
,persons.PersonName
,PunishNoticeDate AS DataTime
,CONVERT(varchar(100),PunishNoticeDate, 23) AS DataTimeStr
,(CASE WHEN ISNULL(PunishNotice.PunishStates,0) =0 THEN '/pages/info/punish_add/main' --待提交
WHEN PunishNotice.PunishStates =1 AND PunishNotice.SignMan=@personId THEN '/pages/info/punish_approval/main' --待签发
WHEN PunishNotice.PunishStates =2 AND PunishNotice.ApproveMan=@personId THEN '/pages/info/punish_rectify/main' --待批准
WHEN PunishNotice.PunishStates =3 AND PunishNotice.DutyPersonId=@personId THEN '/pages/info/punish_rectifycf/main' --待回执
ELSE '/pages/info/punish_detail/main' END) AS UrlStr
,'' AS pcUrl
FROM Check_PunishNotice AS PunishNotice
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE PunishNotice.ProjectId=@projectId AND PunishNotice.PunishStates <> 4
AND ((ISNULL(PunishNotice.PunishStates,0) =0 AND PunishNotice.CompileMan LIKE '%'+ @personId+'%')
OR (PunishNotice.PunishStates =1 AND PunishNotice.SignMan LIKE '%'+ @personId+'%')
OR (PunishNotice.PunishStates =2 AND PunishNotice.ApproveMan LIKE '%'+ @personId+'%')
OR (PunishNotice.PunishStates =3 AND PunishNotice.DutyPersonId LIKE '%'+ @personId+'%')
OR (PunishNotice.ProfessionalEngineerId LIKE '%'+ @personId+'%' AND ProfessionalEngineerTime IS NULL)
OR (PunishNotice.ConstructionManagerId LIKE '%'+ @personId+'%' AND ConstructionManagerTime IS NULL)
OR (PunishNotice.UnitHeadManId LIKE '%'+ @personId+'%' AND UnitHeadManTime IS NULL))
UNION ALL
SELECT MonthReportId AS DataId
,'D0EC3002-E1FA-457D-AC3B-4C7B2D71DD82' AS MenuId
,'月报' AS MenuName
,'月报'+CONVERT(varchar(7),MonthReport.ReporMonth,120)+'待处理' AS Content
,persons.PersonId
,persons.PersonName
,MonthReport.ReporMonth AS DataTime
,CONVERT(varchar(100),MonthReport.ReporMonth, 23) AS DataTimeStr
,('') AS UrlStr
,'../HSSE/Manager/ManagerMonth_SeDinEdit.aspx?type=-1&MonthReportId=' + MonthReportId + '' AS pcUrl
FROM SeDin_MonthReport AS MonthReport
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId AND MonthReport.NextManId=persons.PersonId
WHERE MonthReport.ProjectId=@projectId AND (MonthReport.States IS NULL OR MonthReport.States != 3)
AND MonthReport.NextManId = @personId
ORDER BY DataTime DESC
END
GO
ALTER VIEW [dbo].[View_APP_GetToDoItems]
AS
/*待办事项信息视图*/
SELECT ProjectId,PersonId,PersonName,MenuName
FROM
(SELECT HazardRegisterId AS DataId,'安全巡检' AS MenuName,PersonId,users.PersonName,register.ProjectId
FROM HSSE_Hazard_HazardRegister AS register
LEFT JOIN Person_Persons AS users ON users.PersonId =register.ResponsibleMan
WHERE PersonId IS NOT NULL AND register.states = '1'
UNION ALL
SELECT HazardRegisterId AS DataId,'安全巡检' AS MenuName,PersonId,users.PersonName,register.ProjectId
FROM HSSE_Hazard_HazardRegister AS register
LEFT JOIN Person_Persons AS users ON users.PersonId = register.CheckManId
WHERE PersonId IS NOT NULL AND register.states = '2'
UNION ALL
SELECT PlanId AS DataId,'培训计划' AS MenuName,PersonId,users.PersonName,p.ProjectId
FROM Training_Plan AS p
LEFT JOIN Person_Persons AS users ON p.DesignerId= users.PersonId
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT TestPlanId AS DataId ,'考试计划' AS MenuName,PersonId,users.PersonName,TPlan.ProjectId
FROM Training_TestPlan AS TPlan
LEFT JOIN Person_Persons AS users ON users.PersonId =TPlan.PlanManId
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1' )
UNION ALL
SELECT FireWorkId AS DataId,'动火作业' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_FireWork AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT HeightWorkId AS DataId,'高处作业' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_HeightWork AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT LimitedSpaceId AS DataId,'受限空间' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_LimitedSpace AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT RadialWorkId AS DataId,'射线作业' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_RadialWork AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT OpenCircuitId AS DataId,'断路(占道)' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_OpenCircuit AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT BreakGroundId AS DataId,'动土作业' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_BreakGround AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT NightWorkId AS DataId,'夜间施工' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_NightWork AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT LiftingWorkId AS DataId,'吊装作业' AS MenuName,PersonId,users.PersonName,License.ProjectId
FROM License_LiftingWork AS License
LEFT JOIN Person_Persons AS users ON (users.PersonId =License.NextManId OR License.NextManId LIKE '%'+ users.PersonId+'%')
WHERE PersonId IS NOT NULL AND (States = '0' OR States = '1')
UNION ALL
SELECT Person.PersonId AS DataId,'现场人员' AS MenuName,Person.PersonId,users.PersonName,Person.ProjectId
FROM SitePerson_Person AS Person
LEFT JOIN Person_Persons AS users ON Person.AuditorId =users.PersonId
WHERE Person.PersonId IS NOT NULL AND Person.AuditorDate IS NULL AND Person.States ='1'
UNION ALL
SELECT PersonQualityId AS DataId,'特种作业人员' AS MenuName,users.PersonId,users.PersonName,Person.ProjectId
FROM QualityAudit_PersonQuality AS p
LEFT JOIN SitePerson_Person AS Person ON Person.PersonId =p.PersonId
LEFT JOIN Person_Persons AS users ON users.PersonId =p.AuditorId
WHERE Person.PersonId IS NOT NULL AND p.States ='1'
UNION ALL
SELECT SafePersonQualityId AS DataId,'安管人员' AS MenuName,users.PersonId,users.PersonName,Person.ProjectId
FROM QualityAudit_SafePersonQuality AS p
LEFT JOIN SitePerson_Person AS Person ON Person.PersonId =p.PersonId
LEFT JOIN Person_Persons AS users ON users.PersonId =p.AuditorId
WHERE Person.PersonId IS NOT NULL AND p.States ='1'
UNION ALL
SELECT EquipmentPersonQualityId AS DataId,'特种设备作业人员' AS MenuName,users.PersonId,users.PersonName,Person.ProjectId
FROM QualityAudit_EquipmentPersonQuality AS p
LEFT JOIN SitePerson_Person AS Person ON Person.PersonId =p.PersonId
LEFT JOIN Person_Persons AS users ON users.PersonId =p.AuditorId
WHERE Person.PersonId IS NOT NULL AND p.States ='1'
UNION ALL
SELECT TaskId AS DataId,'培训任务' AS MenuName,users.PersonId,users.PersonName,Task.ProjectId
FROM Training_Task AS Task
LEFT JOIN Person_Persons AS users ON users.PersonId =Task.UserId
WHERE users.PersonId IS NOT NULL AND (Task.States IS NULL OR Task.States != 2)
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.CompleteManId = users.PersonId
WHERE PersonId IS NOT NULL AND ISNULL(Rectify.States,0) =0
UNION ALL
(SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.SignPerson= users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States =1
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.DutyPersonId= users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States =2
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.UnitHeadManId =users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States =3
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.CheckPerson =users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States =4
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.ProfessionalEngineerId =users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States <> 5 AND (ProfessionalEngineerTime1 IS NULL OR ProfessionalEngineerTime2 IS NULL)
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.ConstructionManagerId =users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States <> 5 AND (ConstructionManagerTime1 IS NULL OR ConstructionManagerTime2 IS NULL)
UNION ALL
SELECT RectifyNoticesId AS DataId,'隐患整改' AS MenuName,users.PersonId,users.PersonName,Rectify.ProjectId
FROM Check_RectifyNotices AS Rectify
LEFT JOIN Person_Persons AS users ON Rectify.ProjectManagerId =users.PersonId
WHERE PersonId IS NOT NULL AND Rectify.States <> 5 AND (ProjectManagerTime1 IS NULL OR ProjectManagerTime2 IS NULL))
UNION ALL
(SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.CompileManId = users.PersonId
WHERE PersonId IS NOT NULL AND ISNULL(PauseNotice.PauseStates,0) =0
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.SignManId= users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates =1
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.ApproveManId= users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates =2
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.DutyPersonId =users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates =3
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.ProfessionalEngineerId =users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates <> 4 AND ProfessionalEngineerTime IS NULL
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.ConstructionManagerId =users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates <> 4 AND ConstructionManagerTime IS NULL
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.UnitHeadManId =users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates <> 4 AND UnitHeadManTime IS NULL
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.SupervisorManId =users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates <> 4 AND SupervisorManTime IS NULL
UNION ALL
SELECT PauseNoticeId AS DataId,'暂停令' AS MenuName,users.PersonId,users.PersonName,PauseNotice.ProjectId
FROM Check_PauseNotice AS PauseNotice
LEFT JOIN Person_Persons AS users ON PauseNotice.OwnerId =users.PersonId
WHERE PersonId IS NOT NULL AND PauseNotice.PauseStates <> 4 AND OwnerTime IS NULL)
) AS V
GO
ALTER VIEW [dbo].[View_SitePerson_Person]
AS
/*现场人员视图*/
SELECT SitePerson.ProjectId,
Project.ProjectCode,
Project.ProjectName,
SitePerson.SitePersonId,
persons.PersonId,
SitePerson.CardNo,
Persons.PersonName,
Persons.Sex,
(Case Persons.Sex WHEN '1' THEN '' WHEN '2' THEN '' ELSE '' END) AS SexName,
Persons.IdentityCard,
Persons.Address,
SitePerson.UnitId,
Persons.Birthday,
SitePerson.TeamGroupId,
SitePerson.WorkAreaId,
SitePerson.WorkPostId,
SitePerson.InTime,
SitePerson.OutTime,
SitePerson.OutResult,
Persons.Telephone,
Persons.PositionId,
Persons.PostTitleId,
Persons.PhotoUrl,
Unit.UnitCode,
Unit.UnitName,
TeamGroup.TeamGroupName,
Post.WorkPostName,
Position.PositionName,
Title.PostTitleName,
Depart.DepartName,
Post.PostType,
Post.IsHsse,
(SELECT COUNT(*) FROM EduTrain_TrainRecordDetail T
LEFT JOIN EduTrain_TrainRecord AS E ON T.TrainingId=E.TrainingId
WHERE T.PersonId=SitePerson.PersonId AND E.ProjectId=SitePerson.ProjectId) AS TrainCount,
SitePerson.AuditorId,
Persons.PersonName AS AuditorName,
SitePerson.AuditorDate,
Persons.IDCardUrl,
Persons.IsForeign,
case when Persons.IsForeign=1 then '' else '' end as IsForeignStr,
Persons.IdcardType,
BasicData1.dictName as IdcardTypeName,
Persons.IdcardStartDate,
Persons.IdcardEndDate,
Persons.IdcardForever,
case when Persons.IdcardForever='Y' then '' else '' end as IdcardForeverStr,
Persons.PoliticsStatus,
BasicData2.dictName as PoliticsStatusName,
Persons.IdcardAddress,
Persons.Nation,
BasicData3.dictName as NationName,
Persons.EduLevel,
BasicData4.dictName as EduLevelName,
Persons.MaritalStatus,
BasicData5.dictName as MaritalStatusName,
Persons.CountryCode,
Country.cname as CountryName,
Persons.ProvinceCode,
City.cname as ProvinceName,
Persons.IsOutside,
case when Persons.IsOutside=1 then '' else '' end as IsOutsideStr,
--WorkArea.UnitWorkCode AS WorkAreaCode,
WorkAreaCode= STUFF((SELECT ',' + UnitWorkCode FROM dbo.WBS_UnitWork where PATINDEX('%,' + RTRIM(UnitWorkId) + ',%',',' +SitePerson.WorkAreaId + ',')>0 FOR XML PATH('')), 1, 1,''),
--WorkArea.UnitWorkName AS WorkAreaName
WorkAreaName= STUFF((SELECT ',' + UnitWorkName FROM dbo.WBS_UnitWork where PATINDEX('%,' + RTRIM(UnitWorkId) + ',%',',' +SitePerson.WorkAreaId + ',')>0 FOR XML PATH('')), 1, 1,''),
SitePerson.RealNameAddTime,
SitePerson.RealNameUpdateTime,
Persons.HeadImage,
SitePerson.States
FROM SitePerson_Person AS SitePerson
LEFT JOIN Person_Persons AS Persons ON SitePerson.PersonId=Persons.PersonId
LEFT JOIN Base_Project AS Project ON Project.ProjectId=SitePerson.ProjectId
LEFT JOIN Base_Unit AS Unit ON Unit.UnitId = SitePerson.UnitId
LEFT JOIN ProjectData_TeamGroup AS TeamGroup ON TeamGroup.TeamGroupId=SitePerson.TeamGroupId
LEFT JOIN Base_WorkPost AS Post ON Post.WorkPostId = SitePerson.WorkPostId
LEFT JOIN Base_Position AS Position ON Position.PositionId = Persons.PositionId
Left JOIN Base_PostTitle AS Title ON Title.PostTitleId = Persons.PostTitleId
Left JOIN Base_Depart AS Depart ON Depart.DepartId = Persons.DepartId
Left JOIN RealName_BasicData AS BasicData1 ON BasicData1.dictCode = Persons.IdcardType
Left JOIN RealName_BasicData AS BasicData2 ON BasicData2.dictCode = Persons.PoliticsStatus
Left JOIN RealName_BasicData AS BasicData3 ON BasicData3.dictCode = Persons.Nation
Left JOIN RealName_BasicData AS BasicData4 ON BasicData4.dictCode = Persons.EduLevel
Left JOIN RealName_BasicData AS BasicData5 ON BasicData5.dictCode = Persons.MaritalStatus
Left JOIN RealName_Country AS Country ON Country.CountryId = Persons.CountryCode
Left JOIN RealName_City AS City ON City.provinceCode = Persons.ProvinceCode and City.CountryId = Persons.CountryCode
GO
ALTER VIEW [dbo].[View_WelderPerformance]
AS
/********焊工业绩APP********/
SELECT
welder.ProjectId,
welder.PersonId,
welder.WelderCode,-- 焊工代码
welder.PersonName,--焊工名称
unit.UnitName, --施工单位
welder.CertificateLimitTime, --资质有效期
welder.WelderLevel, --资质等级
-------------本期start
CAST(ISNULL(nowtotal.nowtotal_din,0) AS DECIMAL(19,2)) AS nowtotal_din, --本期总达因值
ISNULL(nowtotal.nowtotal_jot,0) AS nowtotal_jot, --本期总焊口
ISNULL(oneCheck.OneCheckJotNum,0) AS OneCheckJotNum, -- 一次检测焊口数
ISNULL(oneCheckRepair.OneCheckRepairJotNum,0) AS OneCheckRepairJotNum, --返修焊口数
ISNULL(expandJot.ExpandJotNum,0) AS ExpandJotNum, --扩探焊口数
(ISNULL(oneCheck.OneCheckJotNum,0)-ISNULL(oneCheckRepair.OneCheckRepairJotNum,0)) AS OneCheckPassJotNum,--一次检测合格焊口数
CONVERT(NVARCHAR(10),(CAST((CASE ISNULL(oneCheck.OneCheckJotNum,0) WHEN 0 THEN 0
ELSE 100.0 * (ISNULL(oneCheck.OneCheckJotNum,0)-ISNULL(oneCheckRepair.oneCheckRepairJotNum,0))/(1.0 * oneCheck.OneCheckJotNum) END) AS DECIMAL(8,1))))+'%' AS passRate, -- 合格率(焊口)
ISNULL(oneCheck.OneCheckTotalFilm,0) AS OneCheckTotalFilm, --一次检测总片子数
ISNULL(oneCheck.OneCheckPassFilm,0) AS OneCheckPassFilm, --一次检测合格片子数
CONVERT(NVARCHAR(10),(CAST((CASE ISNULL(oneCheck.OneCheckTotalFilm,0) WHEN 0 THEN 0
ELSE 100.0 * ISNULL(oneCheck.OneCheckPassFilm,0)/(1.0 * oneCheck.OneCheckTotalFilm) END) AS DECIMAL(8,1))))+'%'
AS passfilmrate ---RT合格率片数
FROM SitePerson_Person AS welder
LEFT JOIN dbo.Base_Unit unit ON unit.UnitId = welder.UnitId
--本期总达因值 --本期总焊口
LEFT JOIN (SELECT SUM(jot.Size) AS nowtotal_din
,COUNT(*) AS nowtotal_jot
,jot.CoverWelderId
FROM dbo.HJGL_WeldJoint jot
LEFT JOIN dbo.HJGL_Pipeline pipe ON pipe.PipelineId = jot.PipelineId
LEFT JOIN dbo.HJGL_WeldingDaily daily ON daily.WeldingDailyId = jot.WeldingDailyId
LEFT JOIN WBS_UnitWork area ON area.UnitWorkId = pipe.UnitWorkId
WHERE jot.WeldingDailyId IS NOT NULL
GROUP BY jot.CoverWelderId) AS nowtotal ON nowtotal.CoverWelderId = welder.PersonId
--本期检测焊口数
LEFT JOIN (SELECT jot.CoverWelderId,COUNT(ndeItem.NDEItemID) AS OneCheckJotNum, --一次检测焊口数
SUM(ISNULL(ndeItem.TotalFilm,0)) AS OneCheckTotalFilm, --一次检测总片子数
SUM(ISNULL(ndeItem.PassFilm,0)) AS OneCheckPassFilm --一次检测合格片子数
FROM dbo.HJGL_Batch_NDEItem ndeItem
LEFT JOIN dbo.HJGL_Batch_BatchTrustItem trustItem ON trustItem.TrustBatchItemId = ndeItem.TrustBatchItemId
LEFT JOIN dbo.HJGL_WeldJoint jot ON jot.WeldJointId = trustItem.WeldJointId
LEFT JOIN dbo.HJGL_WeldingDaily daily ON daily.WeldingDailyId = jot.WeldingDailyId
LEFT JOIN dbo.HJGL_Batch_PointBatchItem pointItem ON pointItem.PointBatchItemId = trustItem.PointBatchItemId
LEFT JOIN dbo.HJGL_Batch_PointBatch point ON point.PointBatchId = pointItem.PointBatchId
WHERE pointItem.PointDate IS NOT NULL AND pointItem.PointState=1 AND trustItem.RepairRecordId IS NULL
GROUP BY jot.CoverWelderId) AS oneCheck ON oneCheck.CoverWelderId = welder.PersonId
LEFT JOIN (SELECT jot.CoverWelderId,COUNT(ndeItem.NDEItemID) AS OneCheckRepairJotNum --一次检测返修焊口数
FROM dbo.HJGL_Batch_NDEItem ndeItem
LEFT JOIN dbo.HJGL_Batch_BatchTrustItem trustItem ON trustItem.TrustBatchItemId = ndeItem.TrustBatchItemId
LEFT JOIN dbo.HJGL_WeldJoint jot ON jot.WeldJointId = trustItem.WeldJointId
LEFT JOIN dbo.HJGL_WeldingDaily daily ON daily.WeldingDailyId = jot.WeldingDailyId
LEFT JOIN dbo.HJGL_Batch_PointBatchItem pointItem ON pointItem.PointBatchItemId = trustItem.PointBatchItemId
LEFT JOIN dbo.HJGL_Batch_PointBatch point ON point.PointBatchId = pointItem.PointBatchId
WHERE pointItem.PointDate IS NOT NULL AND pointItem.PointState=1
AND trustItem.RepairRecordId IS NULL AND ndeItem.CheckResult='2'
GROUP BY jot.CoverWelderId) AS oneCheckRepair ON oneCheckRepair.CoverWelderId = welder.PersonId
LEFT JOIN (SELECT jot.CoverWelderId,COUNT(ndeItem.NDEItemID) AS ExpandJotNum --扩透焊口数
FROM dbo.HJGL_Batch_NDEItem ndeItem
LEFT JOIN dbo.HJGL_Batch_BatchTrustItem trustItem ON trustItem.TrustBatchItemId = ndeItem.TrustBatchItemId
LEFT JOIN dbo.HJGL_WeldJoint jot ON jot.WeldJointId = trustItem.WeldJointId
LEFT JOIN dbo.HJGL_WeldingDaily daily ON daily.WeldingDailyId = jot.WeldingDailyId
LEFT JOIN dbo.HJGL_Batch_PointBatchItem pointItem ON pointItem.PointBatchItemId = trustItem.PointBatchItemId
LEFT JOIN dbo.HJGL_Batch_PointBatch point ON point.PointBatchId = pointItem.PointBatchId
WHERE pointItem.PointDate IS NOT NULL AND pointItem.PointState=2 AND trustItem.RepairRecordId IS NULL
GROUP BY jot.CoverWelderId) AS expandJot ON expandJot.CoverWelderId = welder.PersonId
WHERE (welder.WelderCode IS NOT NULL AND welder.WelderCode!='')
GO
/************环境危险源辨识与评价主表*************/
ALTER PROCEDURE [dbo].[Sp_Hazard_EnvironmentalRiskListReport]
@EnvironmentalRiskListId nvarchar(50)
AS
SELECT ERiskList.EnvironmentalRiskListId,
ERiskList.ProjectId,
ERiskList.RiskCode,
ERiskList.CompileMan,
ERiskList.CompileDate,
ERiskList.AttachUrl,
ERiskList.States,
ERiskList.Contents,
ERiskList.WorkAreaName,
ERiskList.IdentificationDate,
ERiskList.ControllingPerson,
U1.PersonName AS CompileManName,
U2.PersonName AS ControllingPersonName,
Project.ProjectName
FROM dbo.Hazard_EnvironmentalRiskList AS ERiskList
LEFT JOIN Person_Persons AS U1 ON U1.PersonId = ERiskList.CompileMan
LEFT JOIN Person_Persons AS U2 ON U2.PersonId = ERiskList.ControllingPerson
LEFT JOIN Base_Project AS Project ON Project.ProjectId = ERiskList.ProjectId
WHERE ERiskList.EnvironmentalRiskListId = @EnvironmentalRiskListId
GO
/***********职业健康安全危险源辨识与评价主表************/
ALTER 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.PersonName AS CompileManName,
U2.PersonName AS ControllingPersonName
FROM dbo.Hazard_HazardList AS HazardList
LEFT JOIN Base_Project AS Project ON Project.ProjectId = HazardList.ProjectId
LEFT JOIN Person_Persons AS U ON U.PersonId = HazardList.CompileMan
LEFT JOIN Person_Persons AS U2 ON U2.PersonId = HazardList.ControllingPerson
WHERE HazardList.HazardListId = @HazardListId
GO
--获取当前人本部待办事项
ALTER PROCEDURE [dbo].[Sp_Main_GetToDoItems]
@personId NVARCHAR(200)=NULL
AS
/*获取当前人本部待办事项*/
BEGIN
SELECT TrainingPlanId AS DataId
,'1D8B35D2-5C8F-4FF4-96E4-8EB61BDBAE51' AS MenuId
,'员工培训' AS MenuName
,TrainingPlan.TrainingPlanTitle AS Content
,PersonId
,persons.PersonName
,TrainingPlan.CompileTime AS DataTime
,CONVERT(varchar(100),TrainingPlan.CompileTime, 23) AS DataTimeStr
,'../Person/PersonTrainingAdd.aspx?TrainingPlanId='+TrainingPlanId AS PCUrl
FROM Person_TrainingPlan AS TrainingPlan
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE TrainingPlan.State = '0' AND TrainingPlan.CompilePersonId =@personId
UNION ALL
SELECT TrainingPlanId AS DataId
,'1D8B35D2-5C8F-4FF4-96E4-8EB61BDBAE51' AS MenuId
,'员工培训' AS MenuName
,TrainingPlan.TrainingPlanTitle AS Content
,PersonId
,persons.PersonName
,TrainingPlan.CompileTime AS DataTime
,CONVERT(varchar(100),TrainingPlan.CompileTime, 23) AS DataTimeStr
,'../Person/PersonTrainingEdit.aspx?TrainingPlanId='+TrainingPlanId AS PCUrl
FROM Person_TrainingPlan AS TrainingPlan
LEFT JOIN Person_Persons AS persons ON persons.PersonId =@personId
WHERE TrainingPlan.State = '1' AND TrainingPlan.ApprovePersonId =@personId
UNION ALL
SELECT DutyId AS DataId
,'A913653D-1EBB-4F55-97C9-81CC5B5913C4' AS MenuId
,'员工责任书' AS MenuName
,persons.PersonName+'的员工责任书待提交' AS Content
,PersonId
,persons.PersonName
,CompileTime AS DataTime
,CONVERT(varchar(100),CompileTime, 23) AS DataTimeStr
,'../Person/PersonDutyAdd.aspx?DutyId='+DutyId AS PCUrl
FROM Person_Duty AS Duty
LEFT JOIN Person_Persons AS persons ON persons.PersonId =DutyPersonId
WHERE State = '0' AND CompilePersonId =@personId
UNION ALL
SELECT DutyId AS DataId
,'A913653D-1EBB-4F55-97C9-81CC5B5913C4' AS MenuId
,'员工责任书' AS MenuName
,persons.PersonName+'的员工责任书待签字' AS Content
,PersonId
,persons.PersonName
,CompileTime AS DataTime
,CONVERT(varchar(100),CompileTime, 23) AS DataTimeStr
,'../Person/PersonDutyEdit.aspx?DutyId='+DutyId AS PCUrl
FROM Person_Duty AS Duty
LEFT JOIN Person_Persons AS persons ON persons.PersonId =DutyPersonId
WHERE State = '1' AND DutyPersonId =@personId
UNION ALL
SELECT DutyId AS DataId
,'A913653D-1EBB-4F55-97C9-81CC5B5913C4' AS MenuId
,'员工责任书' AS MenuName
,persons.PersonName+'的员工责任书待审核' AS Content
,PersonId
,persons.PersonName
,CompileTime AS DataTime
,CONVERT(varchar(100),CompileTime, 23) AS DataTimeStr
,'../Person/PersonDutyEdit.aspx?DutyId='+DutyId AS PCUrl
FROM Person_Duty AS Duty
LEFT JOIN Person_Persons AS persons ON persons.PersonId =DutyPersonId
WHERE State = '2' AND ApprovePersonId =@personId
UNION ALL
SELECT QuarterCheckId AS DataId
,'DD111492-E5F1-4E6F-BCAD-BA26EA184761' AS MenuId
,'员工考核' AS MenuName
,persons.PersonName+'待考核' AS Content
,QuarterCheck.UserId AS PersonId
,persons.PersonName
,StartTime AS DataTime
,CONVERT(varchar(100),StartTime, 23) AS DataTimeStr
,'../Person/PersonChecking.aspx?QuarterCheckId='+QuarterCheckId AS PCUrl
FROM Person_QuarterCheck AS QuarterCheck
LEFT JOIN Person_Persons AS persons ON persons.PersonId =QuarterCheck.UserId
WHERE State = '0' AND QuarterCheckId in (select QuarterCheckId from dbo.Person_QuarterCheckApprove
where PersonId=@PersonId and ApproveDate is null)
ORDER BY DataTime DESC
END
GO
ALTER PROC [dbo].[SP_RectifyNoticesListByProjectStates]
@projectId NVARCHAR(50) = NULL,
@states NVARCHAR(50)=NULL,
@pageIndex INT=1,
@pageSize INT=15
AS
/*隐患整改单列表*/
SELECT TOP(@pageSize) *
FROM (
SELECT ROW_NUMBER() OVER (ORDER BY Notices.RectifyNoticesCode DESC) AS RowNumber
,Notices.RectifyNoticesId
,Notices.ProjectId
,Project.ProjectName
,Notices.RectifyNoticesCode
,Notices.UnitId
,Unit.UnitCode
,Unit.UnitName
,Notices.WorkAreaId
,WorkAreaName= STUFF((SELECT ',' + UnitWorkName FROM dbo.WBS_UnitWork where PATINDEX('%,' + RTRIM(UnitWorkId) + ',%',',' +Notices.WorkAreaId + ',')>0 FOR XML PATH('')), 1, 1,'')
,Notices.CheckManNames
,Notices.CheckManIds
,CONVERT(varchar(100),Notices.CheckedDate,20) AS CheckedDate
,Notices.CheckedDate AS CheckedDateD
,Notices.HiddenHazardType
,(CASE WHEN Notices.HiddenHazardType ='2' THEN '较大' WHEN Notices.HiddenHazardType = '3' THEN '重大' ELSE '一般' END) AS HiddenHazardTypeName
,Notices.CompleteManId
,CompleteManUser.PersonName AS CompleteManName
,Notices.SignPerson AS SignPersonId
,SignPersonUser.PersonName AS SignPersonName
,CONVERT(varchar(100),Notices.SignDate,20) AS SignDate
,Notices.DutyPersonId
,DutyPersonUser.PersonName AS DutyPersonName
,CONVERT(varchar(100),Notices.DutyPersonTime,20) AS DutyPersonTime
,CONVERT(varchar(100),Notices.CompleteDate,20) AS CompleteDate
,Notices.UnitHeadManId
,UnitHeadManUser.PersonName as UnitHeadManPersonName
,CONVERT(varchar(100),Notices.UnitHeadManDate,20) AS UnitHeadManDate
,Notices.CheckPerson AS CheckPersonId
,CheckPersonUser.PersonName as CheckPersonName
,CONVERT(varchar(100),Notices.ReCheckDate,20) AS ReCheckDate
,ProfessionalEngineerId
,ProfessionalEngineerUser.PersonName as ProfessionalEngineerName
,CONVERT(varchar(100),Notices.ProfessionalEngineerTime1,20) AS ProfessionalEngineerTime1
,CONVERT(varchar(100),Notices.ProfessionalEngineerTime2,20) AS ProfessionalEngineerTime2
,ConstructionManagerId
,ConstructionManagerUser.PersonName as ConstructionManagerName
--,ConstructionManagerTime1
,CONVERT(varchar(100),Notices.ConstructionManagerTime1,20) AS ConstructionManagerTime1
,CONVERT(varchar(100),Notices.ConstructionManagerTime2,20) AS ConstructionManagerTime2
,ProjectManagerId
,ProjectManagerUser.PersonName as ProjectManagerName
,CONVERT(varchar(100),Notices.ProjectManagerTime1,20) AS ProjectManagerTime1
,CONVERT(varchar(100),Notices.ProjectManagerTime2,20) AS ProjectManagerTime2
,Notices.ReCheckOpinion
,Notices.IsRectify
,Notices.States
,REPLACE(AttachFile.AttachUrl,'\\', '/') AS AttachUrl
FROM Check_RectifyNotices AS Notices
LEFT JOIN Base_Project AS Project ON Notices.ProjectId =Project.ProjectId
LEFT JOIN Base_Unit AS Unit ON Notices.UnitId =Unit.UnitId
LEFT JOIN Person_Persons AS CompleteManUser ON Notices.CompleteManId =CompleteManUser.PersonId
LEFT JOIN Person_Persons AS SignPersonUser ON Notices.SignPerson =SignPersonUser.PersonId
LEFT JOIN Person_Persons AS DutyPersonUser ON Notices.DutyPersonId =DutyPersonUser.PersonId
LEFT JOIN Person_Persons AS UnitHeadManUser ON Notices.UnitHeadManId =UnitHeadManUser.PersonId
LEFT JOIN Person_Persons AS CheckPersonUser ON Notices.CheckPerson =CheckPersonUser.PersonId
LEFT JOIN AttachFile AS AttachFile ON AttachFile.ToKeyId =Notices.RectifyNoticesId
LEFT JOIN Person_Persons AS ProfessionalEngineerUser ON Notices.ProfessionalEngineerId =ProfessionalEngineerUser.PersonId
LEFT JOIN Person_Persons AS ConstructionManagerUser ON Notices.ConstructionManagerId =ConstructionManagerUser.PersonId
LEFT JOIN Person_Persons AS ProjectManagerUser ON Notices.ProjectManagerId =ProjectManagerUser.PersonId
WHERE (@projectId IS NULL OR Notices.ProjectId=@projectId)
AND (@states IS NULL OR Notices.States=@states)) AS A
WHERE A.RowNumber > ((@pageIndex-1)*@pageSize)
ORDER BY A.RowNumber
GO
ALTER PROCEDURE [dbo].[SpCheckColligationStatistic]
@ProjectId NVARCHAR(50),
@StartTime NVARCHAR(15)=NULL,
@EndTime NVARCHAR(15)=NULL,
@States CHAR(1)=NULL,
@UnitName NVARCHAR(200)=NULL,
@WorkAreaName NVARCHAR(200)=NULL
AS
/*综合大检查*/
BEGIN
SELECT CheckColligationDetail.CheckColligationDetailId
,coll.CheckColligationId
,coll.CheckColligationId+','+ISNULL(CheckColligationDetail.CheckColligationDetailId,'') AS NewChcekId
,CodeRecords.Code AS CheckColligationCode
,ISNULL(Checks.CheckCount,0) AS CheckCount
,CheckColligationDetail.WorkArea
,Unit.UnitName
,CheckColligationDetail.CompleteStatus
,(CASE WHEN CheckColligationDetail.CompleteStatus=1 THEN '已完成' ELSE '' END) AS CompleteStatusName
,CONVERT(VARCHAR(100), CheckColligationDetail.LimitedDate, 23) AS LimitedDate
,CheckColligationDetail.CompletedDate
,coll.CheckPerson
,user1.PersonName AS CheckPersonName
,CONVERT(VARCHAR(100), coll.CheckTime, 23) AS CheckTime
--,coll.CheckTime
,CheckColligationDetail.CheckItemType
,CheckColligationDetail.CheckItem
,CheckColligationDetail.HandleStep
,CheckColligationDetail.Unqualified
,CheckColligationDetail.HiddenDangerType
,CheckColligationDetail.HiddenDangerLevel
,person.PersonName
,(CASE WHEN coll.CheckType ='0' THEN '周检' WHEN coll.CheckType ='1' THEN '月检' ELSE '其它' END) AS CheckTypeName
,(CASE WHEN coll.States='0' OR coll.States IS NULL THEN '待['+ISNULL(OperateUser.PersonName,Users.PersonName)+']提交' WHEN coll.States='2' THEN '审核/审批完成' ELSE '待['+OperateUser.PersonName+']办理' END) AS FlowOperateName
FROM Check_CheckColligation AS coll
LEFT JOIN Sys_CodeRecords AS CodeRecords ON coll.CheckColligationId=CodeRecords.DataId
LEFT JOIN Person_Persons AS user1 ON coll.CheckPerson=user1.PersonId
LEFT JOIN Check_CheckColligationDetail AS CheckColligationDetail
ON CheckColligationDetail.CheckColligationId = coll.CheckColligationId AND CheckColligationDetail.CheckColligationDetailId IS NOT NULL
--LEFT JOIN ProjectData_WorkArea AS WorkArea on WorkArea.WorkAreaId=CheckColligationDetail.CheckArea
LEFT JOIN Base_Unit AS Unit ON Unit.UnitId=CheckColligationDetail.UnitId
LEFT JOIN (SELECT COUNT(*) AS CheckCount, CheckColligationId
FROM Check_CheckColligationDetail GROUP BY CheckColligationId) AS Checks ON Checks.CheckColligationId = coll.CheckColligationId
LEFT JOIN Sys_FlowOperate AS FlowOperate ON coll.CheckColligationId=FlowOperate.DataId AND FlowOperate.IsClosed <> 1
LEFT JOIN Person_Persons AS OperateUser ON FlowOperate.OperaterId=OperateUser.PersonId
LEFT JOIN Person_Persons AS Users ON coll.CompileMan=Users.PersonId
LEFT JOIN dbo.SitePerson_Person AS person ON person.PersonId=CheckColligationDetail.PersonId
WHERE (@StartTime IS NULL OR coll.CheckTime>=@StartTime)
AND (@EndTime IS NULL OR coll.CheckTime <=@EndTime )
AND coll.ProjectId=@ProjectId
AND (@States IS NULL OR coll.States=@States)
AND (@UnitName IS NULL OR Unit.UnitName LIKE '%'+@UnitName+'%' )
AND (@WorkAreaName IS NULL OR CheckColligationDetail.WorkArea LIKE '%'+@WorkAreaName+'%' )
ORDER BY CheckColligationCode DESC
END
GO
ALTER PROCEDURE [dbo].[spTestReport]
(
@Account varchar(50)
)
AS
BEGIN
SELECT u.Account,u.PersonName,un.UnitName
FROM dbo.Person_Persons u
LEFT JOIN dbo.Base_Unit un ON un.UnitId = u.UnitId
WHERE Account!=@Account
END
GO
ALTER VIEW [dbo].[View_Check_CheckColligationDetail]
AS
/*综合大检查明细列表视图*/
SELECT Detail.CheckColligationDetailId,
Detail.CheckColligationId,
Detail.CheckItem,
Detail.CheckItemType,
Detail.Unqualified,
Detail.CheckArea,
Detail.UnitId,
Detail.HandleStep,
Detail.CompleteStatus,
(CASE WHEN Detail.CompleteStatus =1 THEN ''
WHEN Detail.CompleteStatus =0 THEN ''
ELSE '' END) AS CompleteStatusName,
Detail.LimitedDate,
Detail.CompletedDate,
Detail.Suggestions,
Detail.CheckContent,
CASE WHEN Detail.CheckContent IS NOT NULL THEN Detail.CheckContent
ELSE checkItemSet.CheckItemName END AS CheckItemStr,
Detail.WorkArea,
unit.UnitName,
const.ConstText AS HandleStepStr,
Detail.HiddenDangerType,
Detail.HiddenDangerLevel,
person.PersonName AS PersonName
FROM dbo.Check_CheckColligationDetail AS Detail
--LEFT JOIN dbo.Check_ProjectCheckItemDetail AS checkItemDetail ON checkItemDetail.CheckItemDetailId=Detail.CheckItem
LEFT JOIN dbo.Technique_CheckItemSet AS checkItemSet ON checkItemSet.CheckItemSetId=Detail.CheckItem
LEFT JOIN dbo.Base_Unit AS unit ON unit.UnitId=Detail.UnitId
LEFT JOIN dbo.Person_Persons AS person ON person.PersonId = Detail.PersonId
LEFT JOIN Sys_Const AS const ON const.ConstValue = Detail.HandleStep AND const.GroupId='HandleStep'
GO
ALTER VIEW [dbo].[View_Hazard_HazardRegister]
AS
/**********安全巡检视图*************/
SELECT Registration.HazardRegisterId,
Registration.HazardCode,
Registration.RegisterDate,
Registration.RegisterDef,
Registration.Rectification,
Registration.Place,
Registration.ResponsibleUnit,
Registration.Observer,
Registration.RectifiedDate,
Registration.ProjectId,
Registration.states,
Registration.IsEffective,
Registration.ResponsibleMan,
Registration.CheckManId,
Registration.CheckTime,
Registration.RectificationPeriod,
(CASE WHEN Registration.ImageUrl IS NULL THEN at.AttachUrl ELSE Registration.ImageUrl END) AS ImageUrl,
(CASE WHEN Registration.RectificationImageUrl IS NULL THEN at_r.AttachUrl ELSE Registration.RectificationImageUrl END) AS RectificationImageUrl,
Registration.RectificationTime,
Registration.ConfirmMan,
Registration.ConfirmDate,
Registration.HandleIdea,
Registration.CutPayment,
Registration.ProblemTypes,
Registration.CheckSpecialId,
Registration.CheckItemDetailId,
Registration.SupCheckItemSetId,
Registration.CheckItemSetId,
Registration.SafeSupervisionId,
Registration.SafeSupervisionIsOK,
Project.ProjectName,
Registration.CheckCycle,
ISNULL(WorkArea.UnitWorkName,'') AS WorkAreaName,
Unit.UnitName AS ResponsibilityUnitName,
User1.PersonName AS ResponsibilityManName,
ISNULL(User1.Telephone,'') AS ResponsibilityManTel,
User2.PersonName AS CheckManName,
ISNULL(User2.Telephone,'') AS CheckManTel,
User2.UnitId AS SendUnitId,
User3.PersonName AS ConfirmManName,
ISNULL(User3.Telephone,'') AS ConfirmManTel,
User4.PersonName AS ResponsibilityManName2,
ISNULL(User4.Telephone,'') AS ResponsibilityMan2Tel,
(CASE WHEN Registration.states='1' and (Registration.SafeSupervisionIsOK is null OR Registration.SafeSupervisionIsOK=0) THEN '待整改'
WHEN Registration.states='1' and Registration.SafeSupervisionIsOK=1 THEN '合格'
WHEN Registration.states='2' THEN '已整改'
WHEN Registration.states='3' THEN '已闭环'
ELSE '已作废' END ) AS StatesStr,
RegisterTypes.RegisterTypesId,
RegisterTypes.RegisterTypesName,
Registration.DIC_ID,
Registration.CCManIds,
CCManNames = STUFF(( SELECT ',' + PersonName FROM Person_Persons
where PATINDEX('%,' + RTRIM(Person_Persons.PersonId) + ',%',',' + Registration.CCManIds + ',')>0
ORDER BY PATINDEX('%,' + RTRIM(Registration.CCManIds) + ',%',',' + Registration.CCManIds + ',')
FOR XML PATH('')), 1, 1,''),
Registration.Requirements,
Registration.HazardValue,
Registration.RegisterTypes2Id ,
RegisterTypes2.RegisterTypesName as RegisterTypes2Name,
Registration.RegisterTypes3Id ,
RegisterTypes3.RegisterTypesName as RegisterTypes3Name,
Registration.RegisterTypes4Id ,
RegisterTypes4.RegisterTypesName as RegisterTypes4Name
FROM dbo.HSSE_Hazard_HazardRegister AS Registration
LEFT JOIN dbo.Base_Project AS Project ON Project.ProjectId = Registration.ProjectId
LEFT JOIN dbo.WBS_UnitWork AS WorkArea ON WorkArea.UnitWorkId = Registration.Place
LEFT JOIN dbo.HSSE_Hazard_HazardRegisterTypes AS RegisterTypes ON RegisterTypes.RegisterTypesId = Registration.RegisterTypesId
LEFT JOIN dbo.HSSE_Hazard_HazardRegisterTypes AS RegisterTypes2 ON RegisterTypes2.RegisterTypesId = Registration.RegisterTypes2Id
LEFT JOIN dbo.HSSE_Hazard_HazardRegisterTypes AS RegisterTypes3 ON RegisterTypes3.RegisterTypesId = Registration.RegisterTypes3Id
LEFT JOIN dbo.HSSE_Hazard_HazardRegisterTypes AS RegisterTypes4 ON RegisterTypes4.RegisterTypesId = Registration.RegisterTypes4Id
LEFT JOIN dbo.Base_Unit AS Unit ON Unit.UnitId = Registration.ResponsibleUnit
LEFT JOIN dbo.Person_Persons AS User1 ON User1.PersonId = Registration.ResponsibleMan
LEFT JOIN dbo.Person_Persons AS User2 ON User2.PersonId = Registration.CheckManId
LEFT JOIN dbo.Person_Persons AS User3 ON User3.PersonId = Registration.ConfirmMan
LEFT JOIN dbo.Person_Persons AS User4 ON User4.PersonId = Registration.ResponsibleMan2
LEFT JOIN dbo.AttachFile AS at ON at.ToKeyId = Registration.HazardRegisterId
LEFT JOIN dbo.AttachFile AS at_r ON at_r.ToKeyId = Registration.HazardRegisterId+'-R'
GO
ALTER VIEW [dbo].[View_HJGL_Hard_Trust]
AS
/*******硬度委托***********/
SELECT Trust.HardTrustID,
Trust.HardTrustNo,
Trust.HardTrustUnit,
Trust.HardTrustDate,
Trust.AuditMan,
Trust.AuditDate,
Trust.HardnessRate,
Trust.HardnessMethod,
Trust.CheckUnit,
Trust.ProjectId,
Trust.UnitWorkId,
Trust.DetectionTime,
Trust.Sendee,
Trust.Standards,
Trust.InspectionNum,
Trust.CheckNum,
Trust.TestWeldNum,
Trust.HardTrustMan,
Trust.CheckName,
Trust.AcceptStandard,
Trust.EquipmentModel,
trustUnit.UnitName AS HardTrustUnitName,
checkUnit.UnitName AS checkUnitName,
UnitWork.UnitWorkName,
auditMan.PersonName AS AuditManName,
CASE Trust.DetectionTime WHEN '0' THEN '工厂化预制焊口'
ELSE '安装施工焊口' END AS DetectionTimeStr,
hardTrustMan.PersonName AS HardTrustManName
FROM HJGL_Hard_Trust AS Trust
LEFT JOIN Base_Unit AS trustUnit ON trustUnit.UnitId=Trust.HardTrustUnit
LEFT JOIN Base_Unit AS checkUnit ON checkUnit.UnitId=Trust.CheckUnit
LEFT JOIN WBS_UnitWork AS UnitWork ON UnitWork.UnitWorkId=Trust.UnitWorkId
LEFT JOIN Person_Persons AS auditMan ON auditMan.PersonId=Trust.AuditMan
LEFT JOIN Person_Persons AS hardTrustMan ON hardTrustMan.PersonId=Trust.HardTrustMan
GO
ALTER VIEW [dbo].[View_InformationProject_ConstructionStandardIdentify]
/*标准规范辨识列表视图*/
AS
SELECT Standard.ConstructionStandardIdentifyId,
CodeRecords.Code AS ConstructionStandardIdentifyCode,
Standard.VersionNumber,
Standard.ProjectId,
Standard.IdentifyPerson,
Standard.IdentifyDate,
Standard.Remark,
Standard.State,
user1.PersonName as IdentifyPersonName,
(CASE WHEN Standard.State = '0' OR Standard.State IS NULL THEN '待['+OperateUser.PersonName+']提交' WHEN Standard.State = '2' THEN '审核/审批完成' ELSE '待['+OperateUser.PersonName+']办理' END) AS FlowOperateName,
Standard.UpdateDate
FROM dbo.InformationProject_ConstructionStandardIdentify AS Standard
LEFT JOIN dbo.Person_Persons AS user1 ON Standard.IdentifyPerson =user1.PersonId
LEFT JOIN Sys_CodeRecords AS CodeRecords ON Standard.ConstructionStandardIdentifyId=CodeRecords.DataId
LEFT JOIN Sys_FlowOperate AS FlowOperate ON Standard.ConstructionStandardIdentifyId=FlowOperate.DataId AND FlowOperate.IsClosed <> 1
LEFT JOIN Person_Persons AS OperateUser ON FlowOperate.OperaterId=OperateUser.PersonId
GO
ALTER VIEW [dbo].[View_Law_LawRegulationList]
AS
/*法律法规视图*/
SELECT
Law.LawRegulationId
,Law.LawRegulationCode
,Law.LawRegulationName
,Law.ApprovalDate
,Law.EffectiveDate
,Law.Description
--,Law.AttachUrl
,Law.LawsRegulationsTypeId
,Law.CompileMan
,CompileUser.PersonName AS CompileManName
,Law.CompileDate
,Law.AuditMan
,AuditUser.PersonName AS AuditManName
,Law.AuditDate
,Law.IsPass
,Law.IsBuild
,Law.UpState
,LawsRegulationsType.Code AS LawsRegulationsTypeCode
,LawsRegulationsType.Name AS LawsRegulationsTypeName
,(CASE WHEN IsPass=1 THEN '' ELSE '' END) AS IsPassName
, Substring(Law.AttachUrl,charindex('~',Law.AttachUrl)+1,LEN(Law.AttachUrl)) as AttachUrlName
,Law.UnitId
,(CASE WHEN Law.UpState='1' THEN '本单位' WHEN Law.UpState='2' THEN '待上报' when Law.UpState='3' then '已上报' when Law.UpState='4' then '上报失败' end) as UpStates
,ConstUpState.ConstText AS UpStateName
,(CASE WHEN IsBuild = 1 THEN '集团' ELSE '' END ) AS IsBuildName
,AttachFile.AttachFileId
,AttachFile.AttachSource
,AttachFile.ToKeyId
,AttachFile.AttachUrl
,Law.ReleaseStates
,sysConstStates.ConstText AS ReleaseStatesName
,Law.ReleaseUnit
,Law.AbolitionDate
,Law.ReplaceInfo
,Law.IndexesIds
,IndexesNames = STUFF((SELECT ',' + ConstText FROM Sys_Const as c
where c.GroupId='HSSE_Indexes' AND PATINDEX('%,' + RTRIM(C.ConstValue) + ',%',',' + Law.IndexesIds + ',')>0
ORDER BY PATINDEX('%,' + RTRIM(Law.IndexesIds) + ',%',',' + Law.IndexesIds + ',')
FOR XML PATH('')), 1, 1,'')
FROM dbo.Law_LawRegulationList AS Law
LEFT JOIN dbo.Base_LawsRegulationsType AS LawsRegulationsType ON LawsRegulationsType .Id=Law.LawsRegulationsTypeId
LEFT JOIN Person_Persons AS CompileUser ON CompileUser.PersonId=Law.CompileMan
LEFT JOIN Person_Persons AS AuditUser ON AuditUser.PersonId=Law.AuditMan
LEFT JOIN AttachFile AS AttachFile ON Law.LawRegulationId=AttachFile.ToKeyId
LEFT JOIN Sys_Const AS ConstUpState ON Law.UpState=ConstUpState.ConstValue and ConstUpState.GroupId='UpState'
LEFT JOIN Sys_Const AS sysConstStates ON sysConstStates.GroupId='HSSE_ReleaseStates'
AND Law.ReleaseStates=sysConstStates.ConstValue
GO
ALTER VIEW [dbo].[View_License_LicenseManager]
AS
/*现场安全许可证*/
SELECT LicenseManager.LicenseManagerId,
LicenseManager.ProjectId,
LicenseManager.LicenseTypeId,
LicenseManager.LicenseManagerCode,
LicenseManager.LicenseManageName,
LicenseManager.UnitId,
LicenseManager.LicenseManageContents,
LicenseManager.CompileMan,
LicenseManager.CompileDate,
LicenseManager.States,
Project.ProjectCode,
Project.ProjectName,
LicenseType.LicenseTypeName,
Unit.UnitName,
Users.PersonName,
LicenseManager.WorkAreaId,
--WorkArea.WorkAreaName,
LicenseManager.StartDate,
LicenseManager.EndDate,
LicenseManager.ApplicantMan,
WorkAreaName = STUFF(( SELECT ',' + UnitWorkName FROM WBS_UnitWork
where PATINDEX('%,' + RTRIM(WBS_UnitWork.UnitWorkId) + ',%',',' + LicenseManager.WorkAreaId + ',')>0
ORDER BY PATINDEX('%,' + RTRIM(LicenseManager.WorkAreaId) + ',%',',' + LicenseManager.WorkAreaId + ',')
FOR XML PATH('')), 1, 1,'')
FROM dbo.License_LicenseManager AS LicenseManager
LEFT JOIN dbo.Base_Project AS Project ON Project.ProjectId = LicenseManager.ProjectId
LEFT JOIN dbo.Base_LicenseType AS LicenseType ON LicenseType.LicenseTypeId = LicenseManager.LicenseTypeId
LEFT JOIN dbo.Base_Unit AS Unit ON Unit.UnitId = LicenseManager.UnitId
LEFT JOIN dbo.Person_Persons AS Users ON Users.PersonId = LicenseManager.CompileMan
LEFT JOIN dbo.WBS_UnitWork AS WorkArea ON WorkArea.UnitWorkId = LicenseManager.WorkAreaId
GO
ALTER VIEW [dbo].[View_Person_TrainingPerson]
AS
/********人员培训********/
SELECT tp.TrainingUserId
,tp.TrainingPlanId
,tp.TrainingPersonId
,sysuser.PersonName
,tp.TrainingPersonDepartId
,dep.DepartName
,tp.TrainingPersonWorkPostId
,workPost.WorkPostName
FROM dbo.Person_TrainingPerson AS tp
LEFT JOIN Person_Persons AS sysuser on tp.TrainingUserId =sysuser.PersonId
LEFT JOIN Base_Depart AS dep on tp.TrainingPersonDepartId =dep.DepartId
LEFT JOIN Base_WorkPost AS workPost on tp.TrainingPersonWorkPostId =workPost.WorkPostId
GO
ALTER VIEW [dbo].[View_ProjectData_FlowOperate] AS
/*项目单据流程视图*/
SELECT
flowOperate.FlowOperateId
,flowOperate.MenuId
,flowOperate.DataId
,flowOperate.SortIndex
,flowOperate.OperaterId
,flowOperate.OperaterTime
,flowOperate.State
,flowOperate.Opinion
,flowOperate.IsClosed
,Menu.MenuName
,Users.PersonName AS OperaterName
,Unit.UnitId
,Unit.UnitName
,(CASE WHEN flowOperate.State ='2' and flowOperate.IsClosed=1 THEN '上报'
WHEN flowOperate.State ='2' and flowOperate.IsClosed=0 THEN '待办'
WHEN flowOperate.State ='1' and flowOperate.IsClosed=1 THEN '完成'
ELSE '待办' END) AS StateName
FROM dbo.ProjectData_FlowOperate AS flowOperate
LEFT JOIN dbo.Sys_Menu AS Menu ON Menu.MenuId =flowOperate.MenuId
LEFT JOIN dbo.Person_Persons AS Users ON Users.PersonId =flowOperate.OperaterId
LEFT JOIN dbo.Base_Unit AS Unit ON Unit.UnitId =Users.UnitId
GO
ALTER VIEW [dbo].[View_PTP_ItemEndCheckList]
AS
/********无损委托********/
SELECT List.ItemEndCheckListId,
List.PTP_ID,
List.CompileMan,
CONVERT(varchar(100), List.CompileDate, 23) as CompileDate,
List.State,
List.AIsOK,
List.BIsOK,
List.AOKState,
us.PersonName as CompileManName, --编制人
tp.TestPackageNo, --试压包编号
tp.TestPackageName, --试压包名称
'' as AIsOKStr, --A项整改状态
'' as BIsOKStr, --B项整改状态
case List.State when '1' then '总包专业工程师编制'
when '2' then '施工分包商整改'
when '3' then '总包确认'
when '4' then '监理确认'
when '5' then '审批完成'
when '6' then '施工分包商重新整改'
else '' end as StateStr,
'' as AuditManName
FROM dbo.PTP_ItemEndCheckList AS List
LEFT JOIN Person_Persons AS us ON us.PersonId=List.CompileMan
LEFT JOIN PTP_TestPackage AS tp ON tp.PTP_ID=List.PTP_ID
GO
ALTER VIEW [dbo].[View_PTP_TestPackageApprove]
AS
/********无损委托********/
SELECT List.ApproveId,
CONVERT(varchar(100), List.ApproveDate, 23) as ApproveDate,
List.ApproveDate as ADate,
List.Opinion,
List.ApproveMan,
List.ApproveType,
List.ItemEndCheckListId,
case List.ApproveType when '1' then '总包专业工程师编制'
when '2' then '施工分包商整改'
when '3' then '总包确认'
when '4' then '监理确认'
when '5' then '审批完成'
when '6' then '施工分包商重新整改'
else '' end as StateStr,
u.PersonName as ApproveManName
FROM dbo.PTP_TestPackageApprove AS List
LEFT JOIN Person_Persons AS u ON u.PersonId=List.ApproveMan
GO
ALTER VIEW [dbo].[View_QualityAudit_EquipmentQuality] AS
/*机具设备资质信息列表视图*/
SELECT equ.EquipmentQualityId
,equ.ProjectId
,equ.EquipmentQualityCode
,equ.UnitId
,Unit.UnitName
,equ.SpecialEquipmentId
,sp.SpecialEquipmentName
,equ.EquipmentQualityName
,equ.SizeModel
,equ.FactoryCode
,equ.CertificateCode
,equ.CheckDate
,equ.LimitDate
,equ.InDate
,equ.OutDate
,equ.ApprovalPerson
,equ.CarNum
,equ.Remark
,equ.CompileMan
,U.PersonName AS CompileManName
,equ.CompileDate
,equ.QRCodeAttachUrl
,REPLACE(a.AttachUrl,'\', '/') AS AttachUrl
FROM QualityAudit_EquipmentQuality AS equ
LEFT JOIN Base_Unit AS Unit ON Unit.UnitId=equ.UnitId
LEFT JOIN Base_SpecialEquipment AS sp ON equ.SpecialEquipmentId = sp.SpecialEquipmentId
LEFT JOIN Person_Persons AS U ON U.PersonId = equ.CompileMan
LEFT JOIN AttachFile AS a ON a.ToKeyId = equ.EquipmentQualityId
GO
ALTER VIEW [dbo].[View_QualityAudit_EquipmentQualityAuditDetail] AS
/*特种设备资质审查记录列表视图*/
SELECT detail.AuditDetailId,
detail.ProjectId,
detail.EquipmentQualityId,
detail.AuditContent,
detail.AuditMan,
detail.AuditDate,
detail.AuditResult,
user1.PersonName as AuditManName
FROM dbo.QualityAudit_EquipmentQualityAuditDetail AS detail
LEFT JOIN Person_Persons AS user1 ON user1.PersonId = detail.AuditMan
GO
ALTER VIEW [dbo].[View_QualityAudit_PersonQuality]
AS
/*现场人员资质视图*/
SELECT q.PersonQualityId
,q.PersonId
,p.CardNo
,p.IdentityCard
,p.ProjectId
,p.UnitId
,project.ProjectName
,project.ProjectCode
,q.CertificateNo
,q.Grade
,q.SendUnit
,q.SendDate
,q.LimitDate
,q.LateCheckDate
,q.ApprovalPerson
,q.Remark
,q.CompileMan
,u.PersonName AS CompileManName
,q.CompileDate
,q.AuditDate
,q.CertificateId
,c.CertificateName
FROM dbo.QualityAudit_PersonQuality AS q
LEFT JOIN dbo.SitePerson_Person AS p ON q.PersonId = p.PersonId
LEFT JOIN dbo.Base_Project AS project ON project.ProjectId = p.ProjectId
LEFT JOIN dbo.Person_Persons AS u ON u.PersonId = q.CompileMan
LEFT JOIN dbo.Base_Certificate AS c ON c.CertificateId = q.CertificateId
where q.CertificateId is not null
GO
ALTER VIEW [dbo].[View_QualityAudit_SubUnitQualityAuditDetail]
AS
/*分包商资质审查记录列表视图*/
SELECT detail.AuditDetailId,
detail.ProjectId,
detail.UnitId,
detail.AuditContent,
detail.AuditMan,
detail.AuditDate,
detail.AuditResult,
user1.PersonName as AuditManName
FROM dbo.QualityAudit_SubUnitQualityAuditDetail AS detail
LEFT JOIN Person_Persons AS user1 ON user1.PersonId = detail.AuditMan
GO
ALTER VIEW [dbo].[View_Sys_RoleItem]
AS
/*历史角色列表视图*/
SELECT RoleItemId,R.UserId,R.RoleId,R.IntoDate,OutDate,U.PersonName,
(case when P.ProjectName is null then R.ProjectName else P.ProjectName end) as ProjectName
FROM Sys_RoleItem AS R
LEFT JOIN Person_Persons AS U ON R.UserId=U.PersonId
LEFT JOIN Base_Project AS P ON P.ProjectId=R.ProjectId
GO
--创建应急预案视图
ALTER VIEW [dbo].[View_Technique_Emergency]
as
select
Em.EmergencyId,
Em.EmergencyTypeId,
Em.EmergencyCode,
Em.EmergencyName,
Em.Summary,
Em.AttachUrl,
Em.Remark,
Em.CompileMan,
Em.CompileDate,
Em.AuditMan,
Em.AuditDate,
Em.IsPass,
Em.UnitId,
Em.IsBuild,
Em.UpState,
e.EmergencyTypeCode,
e.EmergencyTypeName,
ur.PersonName as AuditManName,
SUBSTRING(Em.AttachUrl,CHARINDEX('~',Em.AttachUrl)+1,LEN(Em.AttachUrl)) AS AttachUrlName,
(CASE WHEN Em.IsBuild = 1 THEN '集团' ELSE '' END ) AS IsBuildName
FROM dbo.Technique_Emergency as Em
LEFT JOIN Base_EmergencyType as e ON e.EmergencyTypeId=Em.EmergencyTypeId
left join Person_Persons as ur on ur.PersonId=em.AuditMan
GO
--创建专项方案视图视图
ALTER VIEW [dbo].[View_Technique_SpecialScheme]
as
select
SpecialScheme.SpecialSchemeId,
SpecialScheme.SpecialSchemeTypeId,
SpecialScheme.SpecialSchemeCode,
SpecialScheme.SpecialSchemeName,
SpecialScheme.UnitId,
SpecialScheme.CompileMan,
SpecialScheme.CompileDate,
SpecialScheme.AttachUrl,
SpecialScheme.Summary,
SpecialScheme.AuditMan,
SpecialScheme.AuditDate,
SpecialScheme.IsPass,
SpecialScheme.IsBuild,
SpecialScheme.UpState,
ur.PersonName as AuditManName,
unit.UnitName,
t.SpecialSchemeTypeCode,
t.SpecialSchemeTypeName,
SUBSTRING(SpecialScheme.AttachUrl,CHARINDEX('~',SpecialScheme.AttachUrl)+1,LEN(SpecialScheme.AttachUrl)) AS AttachUrlName,
(CASE WHEN SpecialScheme.IsBuild = 1 THEN '集团' ELSE '' END ) AS IsBuildName
FROM dbo.Technique_SpecialScheme as SpecialScheme
left join Person_Persons as ur on ur.PersonId=SpecialScheme.AuditMan
left join Base_Unit as unit on unit.UnitId=SpecialScheme.UnitId
left join Base_SpecialSchemeType as t on t.SpecialSchemeTypeId=SpecialScheme.SpecialSchemeTypeId
GO