kreta/Kreta.DataAccess.Migrations/Scripts/Archive/20180619170337_KRETA_5960/sp_FollowUpTanterv.sql
2024-03-13 00:33:46 +01:00

70 lines
2.7 KiB
Transact-SQL

IF OBJECT_ID('sp_FollowUpTanterv') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpTanterv
END;
GO
CREATE PROCEDURE sp_FollowUpTanterv
@intezmenyId int,
@aktTanevId int,
@kovetkezoTanevId int,
@tantervId int
AS
BEGIN
IF (@tantervId = 0)
BEGIN
INSERT INTO T_TANTERV_OSSZES (
C_CSOPORTTIPUSA
,C_EVFOLYAMTOL
,C_EVFOLYAMIG
,C_KERETTANTERVREEPULO
,C_NEV
,C_MEGJEGYZES
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,SERIAL
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR
,NNID
,ELOZOTANEVIREKORDID
) SELECT
IIF((SELECT COUNT(1) FROM T_CSOPORTTIPUS_OSSZES WHERE C_ALTANEVID = @kovetkezoTanevId AND ID = t.C_CSOPORTTIPUSA) = 0,1031,t.C_CSOPORTTIPUSA) AS C_CSOPORTTIPUSA
,IIF((SELECT COUNT(1) FROM T_EVFOLYAMTIPUS_OSSZES WHERE C_ALTANEVID = @kovetkezoTanevId AND ID = t.C_EVFOLYAMTOL) = 0,1296,t.C_EVFOLYAMTOL) AS C_EVFOLYAMTOL
,IIF((SELECT COUNT(1) FROM T_EVFOLYAMTIPUS_OSSZES WHERE C_ALTANEVID = @kovetkezoTanevId AND ID = t.C_EVFOLYAMIG) = 0,1296,t.C_EVFOLYAMIG) AS C_EVFOLYAMIG
,C_KERETTANTERVREEPULO AS C_KERETTANTERVREEPULO
,C_NEV AS C_NEV
,C_MEGJEGYZES AS C_MEGJEGYZES
,@intezmenyID AS C_INTEZMENYID
,@kovetkezoTanevId AS C_TANEVID
,TOROLT AS TOROLT
,0 AS SERIAL
,GETDATE() AS LASTCHANGED
,GETDATE() AS CREATED
,MODIFIER AS MODIFIER
,MODIFIER AS CREATOR
,NULL AS NNID
,t.ID AS ELOZOTANEVIREKORDID
FROM T_TANTERV_OSSZES t WHERE C_TANEVID = @aktTanevId AND C_INTEZMENYID = @intezmenyId AND t.TOROLT='F'
AND 0 = (SELECT COUNT(1) FROM T_TANTERV_OSSZES WHERE C_TANEVID = @kovetkezoTanevId AND C_INTEZMENYID = @intezmenyId AND ELOZOTANEVIREKORDID = t.ID)
END
ELSE
BEGIN
UPDATE kovetkezo SET
kovetkezo.C_CSOPORTTIPUSA = IIF((SELECT COUNT(1) FROM T_CSOPORTTIPUS_OSSZES WHERE C_ALTANEVID = @kovetkezoTanevId AND ID = aktiv.C_CSOPORTTIPUSA) = 0, 1031, aktiv.C_CSOPORTTIPUSA)
,kovetkezo.C_EVFOLYAMTOL = IIF((SELECT COUNT(1) FROM T_EVFOLYAMTIPUS_OSSZES WHERE C_ALTANEVID = @kovetkezoTanevId AND ID = aktiv.C_EVFOLYAMTOL) = 0, 1296, aktiv.C_EVFOLYAMTOL)
,kovetkezo.C_EVFOLYAMIG = IIF((SELECT COUNT(1) FROM T_EVFOLYAMTIPUS_OSSZES WHERE C_ALTANEVID = @kovetkezoTanevId AND ID = aktiv.C_EVFOLYAMIG) = 0, 1296, aktiv.C_EVFOLYAMIG)
,kovetkezo.C_KERETTANTERVREEPULO = aktiv.C_KERETTANTERVREEPULO
,kovetkezo.C_NEV = aktiv.C_NEV
,kovetkezo.C_MEGJEGYZES = aktiv.C_MEGJEGYZES
,kovetkezo.TOROLT = aktiv.TOROLT
FROM T_TANTERV_OSSZES kovetkezo
INNER JOIN T_TANTERV_OSSZES aktiv ON aktiv.C_INTEZMENYID = kovetkezo.C_INTEZMENYID AND aktiv.C_TANEVID = @aktTanevId AND aktiv.ID = @tantervId AND aktiv.TOROLT='F'
WHERE kovetkezo.C_INTEZMENYID = @intezmenyId AND kovetkezo.C_TANEVID = @kovetkezoTanevId AND kovetkezo.ELOZOTANEVIREKORDID = @tantervId AND kovetkezo.TOROLT='F'
END
END
GO