--增加无损检测工菜单按钮权限 INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('eab01c05-d6ae-4c3f-9367-e95a6aedaf1a','13F11D51-1B54-400F-BDBB-36685BC94819','修改',1) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('6341239e-6a24-465a-867f-60d60f724f6d','13F11D51-1B54-400F-BDBB-36685BC94819','保存',2) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('4c356a22-1a10-4e8c-b402-85190bd966e9','13F11D51-1B54-400F-BDBB-36685BC94819','查看',3) GO --热处理报告 INSERT INTO dbo.Sys_Menu(MenuId,MenuName,Url,SortIndex,SuperMenu,MenuType,IsOffice,IsEnd,IsUsed) VALUES('71a7de4f-5216-41cb-bcc9-8a5e43d5d168','热处理报告','HJGL/HotProcessHard/HotProessReport.aspx',20,'7FE911EF-616A-4F04-AACD-E53E633A9E86','Menu_HJGL',0,1,1) GO /*热处理报告及数据录入*/ INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('479ceaf7-39dd-473b-ab78-59bb14ebde64','71a7de4f-5216-41cb-bcc9-8a5e43d5d168','增加',1) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('7bdcc0f8-8c81-4d6f-94da-7e95fb0795a1','71a7de4f-5216-41cb-bcc9-8a5e43d5d168','修改',2) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('a8197327-5004-4a97-8338-c2065ee65145','71a7de4f-5216-41cb-bcc9-8a5e43d5d168','删除',3) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('8cb65fe6-6976-488c-8071-cbf7565d9679','71a7de4f-5216-41cb-bcc9-8a5e43d5d168','保存',4) GO --硬度检测报告 INSERT INTO dbo.Sys_Menu(MenuId,MenuName,Url,SortIndex,SuperMenu,MenuType,IsOffice,IsEnd,IsUsed) VALUES('c5ba5ef6-2112-4fe2-9ada-b8762cb629f6','硬度检测报告','HJGL/HotProcessHard/HardReport.aspx',65,'7FE911EF-616A-4F04-AACD-E53E633A9E86','Menu_HJGL',0,1,1) GO /*硬度检测报告及数据录入*/ INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('9caf15f8-048d-4522-909b-34f4af38b7ae','c5ba5ef6-2112-4fe2-9ada-b8762cb629f6','增加',1) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('5f84ded3-c23b-4d1e-b50a-936b34dac03b','c5ba5ef6-2112-4fe2-9ada-b8762cb629f6','修改',2) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('5948fe09-6326-463e-87ee-e01dc02808bb','c5ba5ef6-2112-4fe2-9ada-b8762cb629f6','删除',3) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('4f32b10e-7ba3-436e-a3e4-172b46026f4b','c5ba5ef6-2112-4fe2-9ada-b8762cb629f6','保存',4) GO --焊接任务单 INSERT INTO dbo.Sys_Menu(MenuId,MenuName,Url,SortIndex,SuperMenu,MenuType,IsOffice,IsEnd,IsUsed) VALUES('6ce0b6bc-aa4d-4f0d-9f1f-75a553810793','焊接任务单','HJGL/WeldingManage/WeldTask.aspx',10,'4D36E99E-B3D8-4C61-826A-CBD98EC51515','Menu_HJGL',0,1,1) GO /*焊接任务单*/ INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('46a7d961-6d25-4c7f-af06-3c613fc6fd74','6ce0b6bc-aa4d-4f0d-9f1f-75a553810793','增加',1) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('671b16af-1e5d-482c-a51b-ae01b50dd8e9','6ce0b6bc-aa4d-4f0d-9f1f-75a553810793','修改',2) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('15450068-414a-4dde-a175-3b5a34df85d6','6ce0b6bc-aa4d-4f0d-9f1f-75a553810793','删除',3) INSERT INTO Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('21743940-338a-4adc-8753-64bb90c16dd8','6ce0b6bc-aa4d-4f0d-9f1f-75a553810793','保存',4) GO update Sys_Menu set MenuName='热处理委托',SortIndex=10 where MenuId='90579BE7-E38C-4CD2-A3BC-755169FF3BB2' GO update Sys_Menu set MenuName='硬度检测委托' where MenuId='72B3E508-1315-4CC3-939F-E840FA701A0E' GO update Sys_Menu set SortIndex='40' where MenuId='5TYHMD2F-2582-4DEB-905E-6E9DCFEFBGHO' GO --焊口表加字段 Alter table [dbo].[HJGL_WeldJoint] add DesignIsHotProess bit NULL EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'是否热处理（设计基础数据）' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldJoint', @level2type=N'COLUMN',@level2name=N'DesignIsHotProess' GO --硬度检测表加字段 Alter table [dbo].[HJGL_Hard_Trust] add CheckName nvarchar(50) NULL,AcceptStandard nvarchar(50) NULL,EquipmentModel nvarchar(50) NULL EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'检件名称' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_Hard_Trust', @level2type=N'COLUMN',@level2name=N'CheckName' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'验收标准' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_Hard_Trust', @level2type=N'COLUMN',@level2name=N'AcceptStandard' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'设备型号' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_Hard_Trust', @level2type=N'COLUMN',@level2name=N'EquipmentModel' GO ALTER VIEW [dbo].[View_HJGL_Hard_Trust] AS /*******硬度委托***********/ SELECT Trust.HardTrustID, Trust.HardTrustNo, Trust.HardTrustUnit, Trust.HardTrustDate, Trust.AuditMan, Trust.AuditDate, Trust.HardnessRate, Trust.HardnessMethod, Trust.CheckUnit, Trust.ProjectId, Trust.UnitWorkId, Trust.DetectionTime, Trust.Sendee, Trust.Standards, Trust.InspectionNum, Trust.CheckNum, Trust.TestWeldNum, Trust.HardTrustMan, Trust.CheckName, Trust.AcceptStandard, Trust.EquipmentModel, trustUnit.UnitName AS HardTrustUnitName, checkUnit.UnitName AS checkUnitName, UnitWork.UnitWorkName, auditMan.UserName AS AuditManName, CASE Trust.DetectionTime WHEN '0' THEN '工厂化预制焊口' ELSE '安装施工焊口' END AS DetectionTimeStr, hardTrustMan.UserName AS HardTrustManName FROM HJGL_Hard_Trust AS Trust LEFT JOIN Base_Unit AS trustUnit ON trustUnit.UnitId=Trust.HardTrustUnit LEFT JOIN Base_Unit AS checkUnit ON checkUnit.UnitId=Trust.CheckUnit LEFT JOIN WBS_UnitWork AS UnitWork ON UnitWork.UnitWorkId=Trust.UnitWorkId LEFT JOIN Sys_User AS auditMan ON auditMan.UserId=Trust.AuditMan LEFT JOIN Sys_User AS hardTrustMan ON hardTrustMan.UserId=Trust.HardTrustMan GO --新增焊接任务单表 CREATE TABLE [dbo].[HJGL_WeldTask]( [WeldTaskId] [nvarchar](50) NOT NULL, [ProjectId] [nvarchar](50) NULL, [UnitWorkId] [nvarchar](50) NULL, [UnitId] [nvarchar](50) NULL, [WeldJointId] [nvarchar](50) NULL, [TaskDate] [datetime] NULL, [CoverWelderId] [nvarchar](50) NULL, [BackingWelderId] [nvarchar](50) NULL, [JointAttribute] [nvarchar](10) NULL, [WelderCodeStr] [nvarchar](500) NULL, [Tabler] [nvarchar](50) NULL, [TableDate] [datetime] NULL, [WeldingMode] [nvarchar](100) NULL, CONSTRAINT [PK_HJGL_WeldTask] PRIMARY KEY CLUSTERED ( [WeldTaskId] ASC )WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY] ) ON [PRIMARY] GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'项目' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'ProjectId' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'单位工程' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'UnitWorkId' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'单位' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'UnitId' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'焊口ID' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'WeldJointId' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'盖面焊工' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'CoverWelderId' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'打底焊工' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'BackingWelderId' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'焊口属性' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'JointAttribute' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'可焊焊口' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'WelderCodeStr' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'创建人' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'Tabler' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'创建日期' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'TableDate' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'机械化程度' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask', @level2type=N'COLUMN',@level2name=N'WeldingMode' GO EXEC sys.sp_addextendedproperty @name=N'MS_Description', @value=N'焊接任务单表' , @level0type=N'SCHEMA',@level0name=N'dbo', @level1type=N'TABLE',@level1name=N'HJGL_WeldTask' GO INSERT INTO dbo.Sys_Menu(MenuId,MenuName,Url,SortIndex,SuperMenu,MenuType,IsOffice,IsEnd,IsUsed) VALUES('96D3FDDB-208C-45E1-BE52-C02F50ED277D','报表设计','',25,'0','Menu_SysSet',1,0,1) GO INSERT INTO dbo.Sys_Menu(MenuId,MenuName,Url,SortIndex,SuperMenu,MenuType,IsOffice,IsEnd,IsUsed) VALUES('7E741129-9FD7-4DE1-970B-375C3165E21F','报表模板设计','ReportPrint/PrintDesigner.aspx',10,'96D3FDDB-208C-45E1-BE52-C02F50ED277D','Menu_SysSet',1,1,1) GO INSERT INTO dbo.Sys_ButtonToMenu(ButtonToMenuId,MenuId,ButtonName,SortIndex) VALUES('71A08203-8D32-4B63-A467-3DF652C6B974','7E741129-9FD7-4DE1-970B-375C3165E21F','设计',1) GO ----------------------------100--150为焊接报表设置值---------------------------- INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'100','管道焊接工作记录',100,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'101','管道焊接工作记录（续）',101,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'102','管道焊接接头热处理报告',102,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'103','管道焊接接头热处理报告（续）',103,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'104','硬度检测报告',104,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'105','硬度检测报告（续）',105,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'106','管道无损检测结果汇总表',106,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'107','管道无损检测结果汇总表（续）',107,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'108','管道无损检测数量统计表',108,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'109','管道无损检测数量统计表（续）',109,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'110','管道无损检测结果汇总表',110,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'111','管道无损检测结果汇总表（续）',111,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'112','管道系统压力试验条件确认记录',112,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'111','管道试压包一览表',111,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'112','管道系统压力试验记录',112,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'113','管道系统泄漏性/真空试验条件确认与试验记录',113,'Report') GO INSERT INTO dbo.Sys_Const(ID, ConstValue, ConstText,SortIndex, GroupId) VALUES (NEWID(),'114','管道吹扫/清洗检验记录',114,'Report') GO INSERT INTO dbo.ReportServer(ReportId) VALUES ('100') GO CREATE FUNCTION [dbo].[HJGL_Fun_GetPTPIsoNo] ( @ProjectId NVARCHAR(50), --项目ID @UnitWorkId NVARCHAR(50), --单位工程ID @PTP_ID NVARCHAR(50), --试压包ID @DetectionRateId NVARCHAR(50) --探伤比例ID ) RETURNS NVARCHAR(2000) AS --根据试压包管线分组获取其包含的管线号（佘春生于2020.08.27） BEGIN DECLARE @output VARCHAR(2000)--返回PipelineCode SELECT @output=COALESCE(@output+',', '') + t.PipelineCode FROM (SELECT DISTINCT pipe.PipelineCode FROM dbo.PTP_PipelineList item LEFT JOIN dbo.PTP_TestPackage ptp ON ptp.PTP_ID = item.PTP_ID LEFT JOIN dbo.HJGL_Pipeline pipe ON pipe.PipelineId = item.PipelineId WHERE ptp.ProjectId=@ProjectId AND ptp.UnitWorkId=@UnitWorkId AND item.PTP_ID=@PTP_ID AND pipe.DetectionRateId=@DetectionRateId) t RETURN @output END GO --SELECT trust.ProjectId,trust.UnitWorkId,iso.PTP_ID,ptp.TestPackageNo,pipe.DetectionRateId, -- COUNT(item.NDEItemID) AS Rt1Num, -- dbo.HJGL_Fun_GetPTPIsoNo(trust.ProjectId,trust.UnitWorkId,iso.PTP_ID,pipe.DetectionRateId) AS IsoNo --FROM dbo.HJGL_Batch_NDEItem item -- LEFT JOIN dbo.HJGL_Batch_BatchTrustItem trustItem ON trustItem.TrustBatchItemId = item.TrustBatchItemId -- LEFT JOIN dbo.HJGL_Batch_BatchTrust trust ON trust.TrustBatchId = trustItem.TrustBatchId -- LEFT JOIN dbo.Base_DetectionType ndt ON ndt.DetectionTypeId = trust.DetectionTypeId -- LEFT JOIN dbo.HJGL_WeldJoint jot ON jot.WeldJointId = trustItem.WeldJointId -- LEFT JOIN dbo.HJGL_Pipeline pipe ON pipe.PipelineId = jot.PipelineId -- LEFT JOIN dbo.PTP_PipelineList iso ON iso.PipelineId = jot.PipelineId -- LEFT JOIN dbo.PTP_TestPackage ptp ON ptp.PTP_ID = iso.PTP_ID -- LEFT JOIN dbo.Base_WeldType joty ON joty.WeldTypeId = jot.WeldTypeId -- WHERE ndt.DetectionTypeCode='RT' AND joty.WeldTypeCode='B' AND item.CheckResult='1' -- AND iso.PT_PipeId IS NOT NULL -- GROUP BY trust.ProjectId, trust.UnitWorkId,iso.PTP_ID,ptp.TestPackageNo,pipe.DetectionRateId