20240819 修改质量检查

This commit is contained in:
毕文静 2024-08-19 16:32:39 +08:00
parent 55471fb403
commit cb544cb297
4 changed files with 65 additions and 3 deletions

View File

@ -0,0 +1,62 @@
ALTER VIEW [dbo].[View_Check_JointCheckDetail]
AS
SELECT d.JointCheckDetailId,d.JointCheckId, d.UnitWorkId, d.CNProfessionalCode, d.QuestionDef, d.QuestionType,d.CheckSite,
d.Standard,d.RectifyOpinion,d.LimitDate,d.AttachUrl,d.HandleWay,d.RectifyDate,d.ReAttachUrl,d.Feedback,d.IsOK,
c.ProjectId,c.CheckType,c.UnitId,u.UnitName,c.CheckDate,d.State,d.CreateDate,d.HandleMan,SaveHandleMan,
case d.State when '6' then 1
else 0 end as OK,
case c.CheckType when '1' then '周检查'
when '2' then '月检查'
when '3' then '不定期检查'
when '4' then '专业检查'
else '' end as CheckTypeStr,
--case d.QuestionType when '1' then '质量不合格'
-- when '2' then '质量缺陷'
-- else '' end as QuestionTypeStr,
qqt.QualityQuestionType as QuestionTypeStr,
pu.UnitName as ProposeUnitName,
ppu.UnitType as ProposeUnitType,
(select top 1 ApproveDate from dbo.Check_JointCheckApprove jca where jca.JointCheckDetailId=d.JointCheckDetailId
order by ApproveDate desc) as OKDate,
uw.UnitWorkName,cn.ProfessionalName
FROM dbo.Check_JointCheckDetail AS d
LEFT JOIN dbo.Check_JointCheck AS c ON c.JointCheckId = d.JointCheckId
LEFT JOIN dbo.Base_Unit AS u ON u.UnitId = c.UnitId
LEFT JOIN dbo.WBS_UnitWork as uw on uw.UnitWorkId=d.UnitWorkId
LEFT JOIN dbo.Base_CNProfessional as cn on cn.CNProfessionalId=d.CNProfessionalCode
LEFT JOIN dbo.Base_Unit AS pu ON pu.UnitId = c.ProposeUnitId
LEFT JOIN dbo.Project_ProjectUnit AS ppu ON ppu.UnitId = c.ProposeUnitId and ppu.ProjectId=c.ProjectId
LEFT JOIN dbo.Base_QualityQuestionType AS qqt ON qqt.QualityQuestionTypeId = d.QuestionType
union
(SELECT d.CheckControlCode,'', d.UnitWorkId, d.CNProfessionalCode, d.QuestionDef, d.QuestionType,d.CheckSite,
'',d.RectifyOpinion,d.LimitDate,d.AttachUrl,d.HandleWay,d.RectifyDate,d.ReAttachUrl,null,null,
d.ProjectId,'5',d.UnitId,u.UnitName,d.CheckDate,d.State,d.CheckDate,'','',
case d.State when '7' then 1
else 0 end as OK,
'质量巡检' as CheckTypeStr,
--case d.QuestionType when '1' then '质量不合格'
-- when '2' then '质量缺陷'
-- else '' end as QuestionTypeStr,
qqt.QualityQuestionType as QuestionTypeStr,
pu.UnitName as ProposeUnitName,
ppu.UnitType as ProposeUnitType,
(select top 1 ApproveDate from dbo.Check_CheckControlApprove cca where cca.CheckControlCode=d.CheckControlCode
order by ApproveDate desc) as OKDate,
uw.UnitWorkName,cn.ProfessionalName
FROM dbo.Check_CheckControl AS d
LEFT JOIN dbo.Base_Unit AS u ON u.UnitId = d.UnitId
LEFT JOIN dbo.WBS_UnitWork as uw on uw.UnitWorkId=d.UnitWorkId
LEFT JOIN dbo.Base_CNProfessional as cn on cn.CNProfessionalId=d.CNProfessionalCode
LEFT JOIN dbo.Base_Unit AS pu ON pu.UnitId = d.ProposeUnitId
LEFT JOIN dbo.Project_ProjectUnit AS ppu ON ppu.UnitId = d.ProposeUnitId and ppu.ProjectId=d.ProjectId
LEFT JOIN dbo.Base_QualityQuestionType AS qqt ON qqt.QualityQuestionTypeId = d.QuestionType
)
GO

View File

@ -109,7 +109,7 @@ namespace FineUIPro.Web.CQMS.Check
string strSql = @"SELECT chec.CheckControlCode,chec.CheckSite,chec.ProjectId,chec.unitId,cNProfessional.ProfessionalName,"
+ @" QualityQuestionType.QualityQuestionType as QuestionType,chec.LimitDate,"
+ @" chec.checkman,chec.CheckDate,chec.DocCode,chec.submitman,chec.state,chec.CNProfessionalCode,"
+ @" unit.UnitName,unitWork.UnitWorkName+(case unitWork.ProjectType when '1' then '(建筑)' else '(安装)' end) as UnitWorkName,u.userName "
+ @" unit.UnitName,unitWork.UnitWorkName,u.userName "
+ @" FROM Check_CheckControl chec"
+ @" left join Base_Unit unit on unit.unitId=chec.unitId"
+ @" left join Base_CNProfessional cNProfessional on cNProfessional.CNProfessionalId=chec.CNProfessionalCode"

View File

@ -1,7 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<LastActiveSolutionConfig>Release|Any CPU</LastActiveSolutionConfig>
<LastActiveSolutionConfig>Debug|Any CPU</LastActiveSolutionConfig>
<UseIISExpress>true</UseIISExpress>
<Use64BitIISExpress>false</Use64BitIISExpress>
<IISExpressSSLPort />

View File

@ -1,7 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<LastActiveSolutionConfig>Release|Any CPU</LastActiveSolutionConfig>
<LastActiveSolutionConfig>Debug|Any CPU</LastActiveSolutionConfig>
<UseIISExpress>true</UseIISExpress>
<Use64BitIISExpress />
<IISExpressSSLPort />