DECLARE intezmenytanevekCursor CURSOR LOCAL FOR 
  SELECT Intezmeny.ID, Tanev.ID
		FROM T_INTEZMENY Intezmeny
    INNER JOIN T_TANEV Tanev ON Tanev.C_INTEZMENYID = Intezmeny.ID
      AND Tanev.TOROLT = 'F'
      AND Tanev.C_NEV in ('2019/2020', '2020/2021')
      AND Intezmeny.TOROLT = 'F'

DECLARE @intezmenyId int, @tanevId int

OPEN intezmenytanevekCursor  
FETCH NEXT FROM intezmenytanevekCursor INTO @intezmenyId, @tanevId

WHILE @@FETCH_STATUS = 0 
BEGIN  
	PRINT N'INTÉZMÉNY ID: ' + CAST(@intezmenyId AS NVARCHAR(10)) + N', TANÉV ID: ' + CAST(@tanevId AS NVARCHAR(10))

  DECLARE @BESZERZESIIGENYKEZELOID INT = NULL
  SELECT TOP 1 @BESZERZESIIGENYKEZELOID = ID FROM dbo.T_SZEREPKOR WHERE C_SZEREPKORTIPUS = 7893 AND C_INTEZMENYID = @intezmenyId AND C_TANEVID = @tanevId
  IF(@BESZERZESIIGENYKEZELOID IS NULL)  BEGIN
  	INSERT INTO [dbo].T_SZEREPKOR
  			   ([C_SZEREPKORTIPUS]
  			   ,[C_INTEZMENYID]
  			   ,[C_TANEVID]
  			   ,[SERIAL]
  			   ,[LASTCHANGED]
  			   ,[CREATED]
  			   ,[MODIFIER]
  			   ,[CREATOR])
  		 VALUES
  			   (7893  -- Beszerzési igény kezelő
  			   ,@intezmenyId
  			   ,@tanevId
  			   ,0
  			   ,GETDATE()
  			   ,GETDATE()
  			   ,NULL
  			   ,1)
  	SET @BESZERZESIIGENYKEZELOID = SCOPE_IDENTITY()	
  END

  DECLARE @BESZERZESIIGENYKEZELOJOGID INT = NULL
  SELECT TOP 1 @BESZERZESIIGENYKEZELOJOGID = ID FROM dbo.T_JOGOSULTSAG WHERE C_JOG = 'BeszerzesiIgenyKezelo' AND C_INTEZMENYID = @intezmenyId AND C_TANEVID = @tanevId
  IF(@BESZERZESIIGENYKEZELOJOGID IS NULL)
  BEGIN
  	INSERT INTO dbo.T_JOGOSULTSAG
  	(
  		C_JOG,  C_SZEREPKORTIPUS,[C_INTEZMENYID] , [C_TANEVID],  TOROLT,  SERIAL,  CREATED,  CREATOR 
  	)
  	VALUES
  	(
  		N'BeszerzesiIgenyKezelo', -- C_JOG - nvarchar
  		7893, -- BeszerzesiIgenyKezelo
  		@intezmenyId , @tanevId,
  		'F', -- TOROLT - char
  		0, -- SERIAL - int
  		GETDATE(), -- CREATED - datetime
  		0 -- CREATOR - int
  	)
  	SET @BESZERZESIIGENYKEZELOJOGID = SCOPE_IDENTITY()
  END

  FETCH NEXT FROM intezmenytanevekCursor INTO @intezmenyId, @tanevId
END  

CLOSE intezmenytanevekCursor  
DEALLOCATE intezmenytanevekCursor