65 lines
1.8 KiB
Transact-SQL
65 lines
1.8 KiB
Transact-SQL
-- =============================================
|
|
-- Author: Steamware
|
|
-- Create date: 2014.04.23
|
|
-- Description: duplica record QuoteList generando una NUOVA REVISIONE
|
|
-- =============================================
|
|
CREATE PROCEDURE [dbo].[stp_QL_newRev]
|
|
(
|
|
@QuoteType CHAR(1) = 'Q',
|
|
@CodQuote BIGINT = 0,
|
|
@QuoteRev_orig INT = 0
|
|
)
|
|
AS
|
|
|
|
-- variabili
|
|
DECLARE @QuoteRev INT = 0
|
|
|
|
SET @QuoteRev = @QuoteRev_orig + 1
|
|
|
|
SET XACT_ABORT ON;
|
|
BEGIN TRAN
|
|
|
|
-- inserisco riga in QuoteList
|
|
INSERT INTO QuoteList(QuoteType, CodQuote, QuoteRev, CodClient, CodItem, UnitWeight, BatchQty, CodItemGroup, RawMat, CodInco, Note)
|
|
SELECT QuoteType, @CodQuote, @QuoteRev as QuoteRev, CodClient, CodItem, UnitWeight, BatchQty, CodItemGroup, RawMat, CodInco, Note
|
|
FROM QuoteList
|
|
WHERE QuoteType = @QuoteType
|
|
AND CodQuote = @CodQuote
|
|
AND QuoteRev = @QuoteRev_orig
|
|
|
|
-- ora inserisco in QuoteRM
|
|
INSERT INTO QuoteRM(QuoteType, CodQuote, QuoteRev, NumRM, RawMat, RawMatCost, RawMatExtraCost)
|
|
SELECT QuoteType, @CodQuote, @QuoteRev as QuoteRev, NumRM, RawMat, RawMatCost, RawMatExtraCost
|
|
FROM QuoteRM
|
|
WHERE QuoteType = @QuoteType
|
|
AND CodQuote = @CodQuote
|
|
AND QuoteRev = @QuoteRev_orig
|
|
|
|
-- se la scheda di destinazione è simulazione
|
|
IF(@QuoteType = 'S')
|
|
BEGIN
|
|
EXEC stp_QL_copyParamS @QuoteType, @QuoteType, @CodQuote, @CodQuote, @QuoteRev, @QuoteRev_orig
|
|
END
|
|
|
|
-- ricalcolo!
|
|
EXEC stp_QL_fullDataUpdate @QuoteType
|
|
,@CodQuote
|
|
,@QuoteRev
|
|
,'Y'
|
|
|
|
-- PATCH 2014/10 rieseguo ricalcolo x problema parametri simulati mancanti in quoteparam
|
|
EXEC stp_QL_fullDataUpdate @QuoteType
|
|
, @CodQuote
|
|
, @QuoteRev
|
|
, 'Y'
|
|
|
|
COMMIT TRAN
|
|
|
|
-- seleziono intera riga!
|
|
SELECT *
|
|
FROM QuoteList
|
|
WHERE QuoteType = @QuoteType
|
|
AND CodQuote = @CodQuote
|
|
AND QuoteRev = @QuoteRev
|
|
|
|
RETURN |