kreta/Kreta.DataAccess.Migrations/Scripts/Archive/20181018153938_OM_1459/uspFollowUpFelhasznaloEmail.sql
2024-03-13 00:33:46 +01:00

77 lines
1.8 KiB
Transact-SQL

-- =============================================
-- Author: Szekeres András
-- Create date: 2018.04.24.
-- Description: Egy tanuló email címeinek frissítése a következõ tanévre
-- =============================================
DROP PROCEDURE IF EXISTS uspFollowUpFelhasznaloEmail
GO
CREATE PROCEDURE uspFollowUpFelhasznaloEmail
@intezmenyId int,
@aktTanevId int,
@kovTanevId int,
@felhasznaloId int
AS
BEGIN
DECLARE @kovTanuloId int;
SELECT @kovTanuloId = kov.ID
FROM T_FELHASZNALO_OSSZES akt
INNER JOIN T_FELHASZNALO_OSSZES kov ON akt.C_OKTATASIAZONOSITO = kov.C_OKTATASIAZONOSITO AND kov.C_TANEVID = @kovTanevId AND kov.C_INTEZMENYID = @intezmenyId
WHERE akt.ID = @felhasznaloId
AND akt.C_INTEZMENYID = @intezmenyId
AND akt.C_TANEVID = @aktTanevId
AND kov.TOROLT = 'F'
AND akt.TOROLT = 'F'
IF @kovTanuloId IS NOT NULL BEGIN
DELETE FROM T_EMAIL_OSSZES
WHERE C_FELHASZNALOID = @kovTanuloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @kovTanevId;
INSERT INTO T_EMAIL_OSSZES (
C_EMAILTIPUSA
,C_EMAILCIM
,C_ALAPERTELMEZETT
,C_ISPUBLIC
,C_GONDVISELOID
,C_FELHASZNALOID
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,SERIAL
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR
,ELOZOTANEVIREKORDID
,NNID
) SELECT
C_EMAILTIPUSA
,C_EMAILCIM
,C_ALAPERTELMEZETT
,C_ISPUBLIC
,C_GONDVISELOID
,@kovTanuloId
,C_INTEZMENYID
,@kovTanevId
,TOROLT
,0
,GETDATE()
,GETDATE()
,MODIFIER
,MODIFIER
,ID
,NULL
FROM T_EMAIL_OSSZES
WHERE C_FELHASZNALOID = @felhasznaloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @aktTanevId
AND TOROLT = 'F';
END
END
GO