kreta/Kreta.DataAccess.Migrations/Scripts/20220228140451_KRETA2_11431/KRETA2_11431.sql
2024-03-13 00:33:46 +01:00

71 lines
2 KiB
Transact-SQL

DECLARE intezmenytanevekCursor CURSOR LOCAL FOR
SELECT IntezmenyAdatok.C_INTEZMENYID, IntezmenyAdatok.C_TANEVID
FROM T_INTEZMENYADATOK IntezmenyAdatok
INNER JOIN T_TANEV Tanev ON Tanev.ID = C_TANEVID
AND Tanev.TOROLT = 'F'
AND Tanev.C_AKTIV = 'T'
DECLARE @intezmenyId int, @tanevId int
OPEN intezmenytanevekCursor
FETCH NEXT FROM intezmenytanevekCursor INTO @intezmenyId, @tanevId
WHILE @@FETCH_STATUS = 0
BEGIN
IF ((SELECT C_ISSZAKKEPZO FROM T_INTEZMENYADATOK_OSSZES WHERE C_INTEZMENYID = @intezmenyId AND C_TANEVID = @tanevId AND TOROLT = 'F') = 'T')
BEGIN
DECLARE @DualisAdminId INT = NULL
SELECT TOP 1 @DualisAdminId = ID FROM dbo.T_SZEREPKOR WHERE C_SZEREPKORTIPUS = 9001 AND C_INTEZMENYID = @intezmenyId AND C_TANEVID = @tanevId
IF(@DualisAdminId IS NULL) BEGIN
INSERT INTO [dbo].T_SZEREPKOR
([C_SZEREPKORTIPUS]
,[C_INTEZMENYID]
,[C_TANEVID]
,[SERIAL]
,[LASTCHANGED]
,[CREATED]
,[MODIFIER]
,[CREATOR])
VALUES
(9001 -- Duális képzőhelyi adminisztrátor
,@intezmenyId
,@tanevId
,0
,GETDATE()
,GETDATE()
,NULL
,1)
SET @DualisAdminId = SCOPE_IDENTITY()
END
DECLARE @DualisAdminJogId INT = NULL
SELECT TOP 1 @DualisAdminJogId = ID FROM dbo.T_JOGOSULTSAG WHERE C_JOG = 'Dualis_Admin' AND C_INTEZMENYID = @intezmenyId AND C_TANEVID = @tanevId
IF(@DualisAdminJogId IS NULL)
BEGIN
INSERT INTO dbo.T_JOGOSULTSAG
(
C_JOG, C_SZEREPKORTIPUS,[C_INTEZMENYID] , [C_TANEVID], TOROLT, SERIAL, CREATED, CREATOR
)
VALUES
(
N'Dualis_Admin', -- C_JOG - nvarchar
9001, -- Duális képzőhelyi adminisztrátor
@intezmenyId , @tanevId,
'F', -- TOROLT - char
0, -- SERIAL - int
GETDATE(), -- CREATED - datetime
0 -- CREATOR - int
)
SET @DualisAdminJogId = SCOPE_IDENTITY()
END
END
FETCH NEXT FROM intezmenytanevekCursor INTO @intezmenyId, @tanevId
END
CLOSE intezmenytanevekCursor
DEALLOCATE intezmenytanevekCursor
GO