104 lines
4.2 KiB
Transact-SQL
104 lines
4.2 KiB
Transact-SQL
|
|
|||
|
|
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
|
|||
|
|
|
|||
|
|
|