HJGL_DS/DataBase/版本日志/HJGLDB_DS_2025-02-20_bwj.sql

71 lines
3.3 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].[HJGL_sp_rpt_Trust]
(
@CH_TrustID NVARCHAR(50)
)
AS
/******项目管理部焊缝检测委托单主表Todo*******/
SELECT Trust.CH_TrustID,
Trust.ProjectId,
--记录编号
Unit.UnitName, --使用单位
Project.ProjectCode, --项目号
Project.ProjectName, --项目名称
Project.ShortName,
Trust.CH_TrustCode,--委托单号
Installation.InstallationCode, --装置号
Installation.InstallationName,--装置名称
--isoClass.ISC_IsoName,--分项工程
'' AS ISC_IsoName,--分项工程
--检测时机
(SELECT TOP 1 CheckAddress FROM HJGL_BO_BatchDetail bd
LEFT JOIN HJGL_CH_TrustItem ti ON ti.BatchDetailId=bd.BatchDetailId WHERE ti.CH_TrustID=Trust.CH_TrustID) AS CheckAddress, --检测地点
--检件编号
Trust.CH_ItemName,--检件名称
--(CASE IsoInfo.IsHot WHEN '1' THEN '是' ELSE '否' END) AS IsHot,--热处理状态
'' AS IsHot,--热处理状态
NDTType.NDT_Code,--检测方法
WeldMethod.WME_Code,--焊接方法
SlopeType.JST_Name,--坡口形式
NDTRate.NDTR_Name,--检测比例
NDTRate.NDTR_Rate,
Trust.CH_NDTCriteria,--检测标准
--IsoInfoView.ISO_Executive, --验收标准
'' AS ISO_Executive, --验收标准
--(CASE WHEN (NDTType.NDT_Code='MT' OR NDTType.NDT_Code='PT')
-- AND (SELECT TOP 1 joty.JOTY_Group FROM dbo.HJGL_CH_TrustItem trustItem LEFT JOIN HJGL_PW_JointInfo jot ON jot.JOT_ID=trustItem.JOT_ID LEFT JOIN dbo.HJGL_BS_JointType joty ON joty.JOTY_ID = jot.JOTY_ID
-- WHERE trustItem.CH_TrustID = @CH_TrustID)='1' THEN ''
-- ELSE (SELECT TOP 1 jot.JOT_QualifiedLevel FROM dbo.HJGL_CH_TrustItem trustItem LEFT JOIN HJGL_PW_JointInfo jot ON jot.JOT_ID=trustItem.JOT_ID
-- WHERE trustItem.CH_TrustID = @CH_TrustID) END) AS AcceptGrade,--合格级别
(case Trust.CH_AcceptGrade when '1' then '' when '2' then '' when '3' then '' when '4' then '' when '5' then '' end)as AcceptGrade,
User1.UserName AS TrustManName,--委托人
User2.UserName AS AuditManName,--审核人
--接收人
CONVERT(VARCHAR(100), Trust.CH_TrustDate, 111) AS CH_TrustDate,--日期
User1.UserName+'/'+CONVERT(VARCHAR(10),YEAR(Trust.CH_TrustDate))+''+CONVERT(VARCHAR(10),MONTH(Trust.CH_TrustDate))+''+CONVERT(VARCHAR(10),DAY(Trust.CH_TrustDate))+'' AS ManAndTrustDate, --委托人/日期
checkUnit.UnitName AS CheckUnitName
FROM HJGL_CH_Trust AS Trust
LEFT JOIN dbo.Base_Unit AS Unit ON Unit.UnitId = Trust.CH_TrustUnit
LEFT JOIN dbo.Base_Project AS Project ON Project.ProjectId = Trust.ProjectId
--LEFT JOIN dbo.HJGL_PW_IsoInfo AS IsoInfo ON IsoInfo.ISO_ID = Trust.ISO_ID
--LEFT JOIN dbo.HJGL_View_IsoInfo AS IsoInfoView ON IsoInfoView.ISO_ID = Trust.ISO_ID
LEFT JOIN dbo.Project_Installation AS Installation ON Installation.InstallationId = Trust.InstallationId
LEFT JOIN dbo.Sys_User AS User1 ON User1.UserId = Trust.CH_TrustMan
LEFT JOIN dbo.Sys_User AS User2 ON User2.UserId = Trust.CH_AuditMan
LEFT JOIN dbo.HJGL_BO_Batch AS batch ON batch.BatchId = Trust.BatchId
LEFT JOIN dbo.HJGL_BS_NDTRate AS NDTRate ON NDTRate.NDTR_ID = batch.NDTR_ID
LEFT JOIN dbo.HJGL_BS_SlopeType AS SlopeType ON SlopeType.JST_ID = Trust.CH_SlopeType
LEFT JOIN dbo.HJGL_BS_WeldMethod AS WeldMethod ON WeldMethod.WME_ID = Trust.CH_WeldMethod
LEFT JOIN dbo.HJGL_BS_NDTType AS NDTType ON NDTType.NDT_ID = Trust.CH_NDTMethod
LEFT JOIN Base_Unit AS checkUnit ON checkUnit.UnitId = Trust.CH_CheckUnit
--LEFT JOIN dbo.HJGL_BS_IsoClass AS isoClass ON isoClass.ISC_ID = batch.ISC_ID
WHERE Trust.CH_TrustID=@CH_TrustID
GO