ALTER PROCEDURE [dbo].[HJGL_sp_rpt_Repair] ( @CH_RepairID NVARCHAR(50) ) AS /******项目管理部返修焊缝检测委托单主表*******/ SELECT Repair.CH_RepairID, Repair.ProjectId, Repair.CH_RepairNo as CH_TrustCode, --记录编号 Unit.UnitName, --使用单位 Project.ProjectCode, --项目号 Project.ProjectName, --项目名称 Project.ShortName, Repair.CH_RepairNo,--委托单号 Installation.InstallationCode, --区域号 Installation.InstallationName, --分项工程 --检测时机 --检件编号 Repair.CH_ItemName,--检件名称 (CASE IsoInfo.IsHot WHEN '1' THEN '是' ELSE '否' END) AS IsHot,--热处理状态 IsoInfo.ISO_IsoNo,--检件名称 NDTType.NDT_Code,--检测方法 WeldMethod.WME_Code,--焊接方法 SlopeType.JST_Code,--坡口形式 NDTRate.NDTR_Name,--检测比例 Repair.CH_NDTCriteria,--检测标准 (CASE Repair.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), Repair.RepairTrustDate, 111) AS RepairTrustDate, --日期 (User1.UserName+'/'+CONVERT(VARCHAR(100), Repair.RepairTrustDate, 111)) as ManAndTrustDate, Repair.CH_CheckUnit, checkUnit.UnitName AS CheckUnitName FROM HJGL_CH_Repair AS Repair LEFT JOIN dbo.Base_Unit AS Unit ON Unit.UnitId = Repair.CH_TrustUnit LEFT JOIN dbo.Base_Project AS Project ON Project.ProjectId = Repair.ProjectId LEFT JOIN dbo.HJGL_PW_IsoInfo AS IsoInfo ON IsoInfo.ISO_ID = Repair.ISO_ID LEFT JOIN dbo.Project_Installation AS Installation ON Installation.InstallationId = Repair.InstallationId LEFT JOIN dbo.Sys_User AS User1 ON User1.UserId = Repair.CH_Tabler LEFT JOIN dbo.Sys_User AS User2 ON User2.UserId = Repair.CH_AuditMan LEFT JOIN dbo.HJGL_BO_Batch AS Batch ON Batch.BatchId = Repair.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 = Repair.CH_SlopeType LEFT JOIN dbo.HJGL_BS_WeldMethod AS WeldMethod ON WeldMethod.WME_ID = Repair.CH_WeldMethod LEFT JOIN dbo.HJGL_BS_NDTType AS NDTType ON NDTType.NDT_ID = Repair.NDT_ID LEFT JOIN Base_Unit as checkUnit ON checkUnit.UnitId = Repair.CH_CheckUnit WHERE Repair.CH_RepairID=@CH_RepairID GO ALTER PROCEDURE [dbo].[HJGL_sp_rpt_RepairItem] ( @CH_RepairID NVARCHAR(50) ) AS /******项目管理部返修焊缝检测委托单明细表*******/ SELECT ROW_NUMBER() OVER(ORDER BY JointInfo.Sort1,JointInfo.Sort2,JointInfo.Sort3,JointInfo.Sort4,JointInfo.Sort5) as Number, RepairItem.CH_RepairItemID, RepairItem.CH_RepairID, iso.ISO_IsoNo, batch.BatchCode, (JointInfo.JOT_JointNo+ (case when BatchDetail.PointType='2' then 'K' else '' end)+ '-'+isnull(RepairItem.FilmNum,'')+repairRecord.RepairMark) AS JOT_JointNo, --焊缝编号 (CASE WHEN JointInfo.JOT_CellWelder!=JointInfo.JOT_FloorWelder THEN FloorWelder.WED_Code+'/'+CellWelder.WED_Code ELSE FloorWelder.WED_Code END) AS WED_Code, --焊工号 JointInfo.JOT_JointDesc,--焊缝规格 (CASE WHEN Steel.STE_Code IS NOT NULL AND Steel2.STE_Code IS NOT NULL and Steel.STE_Code!=Steel2.STE_Code THEN Steel.STE_Code + '/' + Steel2.STE_Code WHEN Steel.STE_Code IS NOT NULL THEN Steel.STE_Code ELSE ISNULL(Steel2.STE_Code,'') END) AS STE_Code, --材质 RepairItem.CheckPlace as CH_Remark,--备注 isoClass.ISC_IsoName FROM HJGL_CH_RepairItem AS RepairItem LEFT JOIN dbo.HJGL_PW_JointInfo AS JointInfo ON JointInfo.JOT_ID = RepairItem.JOT_ID LEFT JOIN dbo.HJGL_BO_BatchDetail AS BatchDetail ON JointInfo.JOT_ID = BatchDetail.JOT_ID LEFT JOIN dbo.HJGL_CH_Repair Repair on Repair.CH_RepairID=RepairItem.CH_RepairID LEFT JOIN dbo.HJGL_BO_Batch batch on batch.BatchId=Repair.BatchId LEFT JOIN dbo.HJGL_PW_IsoInfo iso on iso.ISO_ID=JointInfo.ISO_ID LEFT JOIN dbo.HJGL_BS_Steel AS Steel ON Steel.STE_ID = JointInfo.STE_ID LEFT JOIN dbo.HJGL_BS_Steel AS Steel2 ON Steel2.STE_ID=JointInfo.STE_ID2 LEFT JOIN dbo.HJGL_BS_Welder AS CellWelder ON CellWelder.WED_ID=JointInfo.JOT_CellWelder LEFT JOIN dbo.HJGL_BS_Welder AS FloorWelder ON FloorWelder.WED_ID=JointInfo.JOT_FloorWelder LEFT JOIN dbo.HJGL_CH_RepairItemRecord AS repairRecord ON repairRecord.RepairItemRecordId = RepairItem.RepairItemRecordId LEFT JOIN HJGL_BS_IsoClass AS isoClass ON isoClass.ISC_ID = iso.ISC_ID WHERE RepairItem.CH_RepairID=@CH_RepairID GO