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
|
||
|
||
|