Mike Phares ab800974b7 Programmability objects from database
Removed commented code
Added fn_GetExpiredTECNByOriginator
2024-12-12 12:15:46 -07:00

226 lines
4.2 KiB
Transact-SQL

USE [FabApprovalSystem]
GO
/****** Object: StoredProcedure [dbo].[ECNCopyECN] Script Date: 11/21/2024 11:29:04 AM ******/
SET
ANSI_NULLS ON
GO
SET
QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author: <Author,,Name>
-- Create date: <Create Date,,>
-- Description: <Description,,>
-- =============================================
CREATE PROCEDURE [dbo].[ECNCopyECN] -- Add the parameters for the stored procedure here
@ECNNumber INT,
@NewECNTypeString VARCHAR(50),
@TempNewECNNumber INT OUTPUT AS BEGIN -- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
DECLARE @ECN INT DECLARE @TECN INT DECLARE @ETECN INT
SET
NOCOUNT ON;
IF @NewECNTypeString = 'ECN' BEGIN
SET
@ECN = 1
SET
@TECN = 0
SET
@ETECN = 0
END
ELSE IF @NewECNTypeString = 'TECN' BEGIN
SET
@ECN = 0
SET
@TECN = 1
SET
@ETECN = 0
END
ELSE IF @NewECNTypeString = 'E-TECN' -- THIS SHOULD NEVER HAPPEN
BEGIN
SET
@ECN = 0
SET
@TECN = 0
SET
@ETECN = 1
END
INSERT INTO
ECN (
Title,
IssueDate,
SubmitedDate,
CloseDate,
OriginatorID,
IsECN,
IsTECN,
IsEmergencyTECN,
ExpirationDate,
ExtensionDate,
CancellationDate,
AcknowledgementRequired,
TrainingRequired,
AreaID,
TechnologyID,
PCRBRequired,
PCRBNumber,
TestProgramChangeRequired,
SPCChangeRequired,
NewPartFlowRequired,
SPNChangeRequired,
ImplementationDetails,
ImpactOnEnvironment,
ImpactOnEnvironmentDescription,
ImpactOnCapacity,
ImpactOnCapacityDescription,
IsMA,
IsRH,
IsAU,
IsIndustrial,
MaterialConsumptionChangeRequired,
MaterialConsumptionChangeDescription,
ReasonForChange,
DescriptionOfChange,
NotAFlowChange,
AttachECN_TECNToLots,
SPNFlowChangeAtSingleStep,
SPNFlowChangeAtMultipleSteps,
CurrentStep,
TECNExtensionState,
Deleted,
CancellationApproved,
CancellationInProgress,
CancellationApprovalDate,
ExpirationProcessed,
ExpirationInProgress,
ExpirationProcessedlDate,
ReSubmitted,
Converted,
ConvertedFromNumber
)
SELECT
Title,
IssueDate,
NULL AS SubmitedDate,
NULL AS CloseDate,
OriginatorID,
@ECN AS IsECN,
@TECN AS IsTECN,
@ETECN AS IsEmergencyTECN,
NULL AS ExpirationDate,
NULL AS ExtensionDate,
NULL AS CancellationDate,
AcknowledgementRequired,
TrainingRequired,
AreaID,
TechnologyID,
PCRBRequired,
PCRBNumber,
TestProgramChangeRequired,
SPCChangeRequired,
NewPartFlowRequired,
SPNChangeRequired,
ImplementationDetails,
ImpactOnEnvironment,
ImpactOnEnvironmentDescription,
ImpactOnCapacity,
ImpactOnCapacityDescription,
IsMA,
IsRH,
IsAU,
IsIndustrial,
MaterialConsumptionChangeRequired,
MaterialConsumptionChangeDescription,
ReasonForChange,
DescriptionOfChange,
NotAFlowChange,
AttachECN_TECNToLots,
SPNFlowChangeAtSingleStep,
SPNFlowChangeAtMultipleSteps,
0 AS CurrentStep,
TECNExtensionState,
0 AS Deleted,
0 AS CancellationApproved,
0 AS CancellationInProgress,
0 AS CancellationApprovalDate,
0 AS ExpirationProcessed,
0 AS ExpirationInProgress,
NULL AS ExpirationProcessedlDate,
0 AS ReSubmitted,
0 AS Converted,
@ECNNumber
FROM
ECN
WHERE
ECNNumber = @ECNNumber
SET
@TempNewECNNumber = SCOPE_IDENTITY();
INSERT INTO
ECNAffectedDepartment (DepartmentID, ECNNumber)
SELECT
DepartmentID,
@TempNewECNNumber
FROM
ECNAffectedDepartment
WHERE
ECNNumber = @ECNNumber
INSERT INTO
ECNAffectedModule (ModuleID, ECNNumber)
SELECT
ModuleID,
@TempNewECNNumber
FROM
ECNAffectedModule
WHERE
ECNNumber = @ECNNumber
INSERT INTO
ECNAffectedArea (AreaID, ECNNumber)
SELECT
AreaID,
@TempNewECNNumber
FROM
ECNAffectedArea
WHERE
ECNNumber = @ECNNumber
INSERT INTO
ECNAffectedTechnology (TechnologyID, ECNNumber)
SELECT
TechnologyID,
@TempNewECNNumber
FROM
ECNAffectedTechnology
WHERE
ECNNumber = @ECNNumber
INSERT INTO
ECNAcknowledgementBy (AcknowledgementTrainingByID, ECNNumber)
SELECT
AcknowledgementTrainingByID,
@TempNewECNNumber
FROM
ECNAcknowledgementBy
WHERE
ECNNumber = @ECNNumber
INSERT INTO
ECNTrainingBy (AcknowledgementTrainingByID, ECNNumber)
SELECT
AcknowledgementTrainingByID,
@TempNewECNNumber
FROM
ECNTrainingBy
WHERE
ECNNumber = @ECNNumber
INSERT INTO
ECNAttachment (ECNNumber, [FileName], UserID, UploadDate)
SELECT
@TempNewECNNumber,
[FileName],
UserID,
UploadDate
FROM
ECNAttachment
WHERE
ECNNumber = @ECNNumber
END
GO