DROP TABLE IF EXISTS tmpForSwitchDictionaryItemBase 
CREATE TABLE tmpForSwitchDictionaryItemBase(RegiID int, UjID int, TanevID int, C_NAME nvarchar(500), C_TYPE nvarchar(64), Torolni char(1))
DECLARE @TEMP_EnvironmentName nvarchar(1000), @LastTanevSorszam int 
SET @LastTanevSorszam  = (SELECT MAX(C_SORSZAM) FROM T_TANEV WHERE TOROLT = 'F' AND (C_KOVETKEZO = 'T' OR C_AKTIV = 'T'))
SET @TEMP_EnvironmentName = (SELECT [Value] 
FROM dev.EnvironmentInfo WHERE [Key] = 'Dictionary')
IF (@TEMP_EnvironmentName IS NULL OR @TEMP_EnvironmentName NOT IN ('KK','NSZFH','HOI','AZURE'))
BEGIN  INSERT INTO T_DICTIONARYITEMBASE(C_VALUE) VALUES('Nincs Dictionary ertek a dev.EnvironmentInfo tablaban') END  -- elszall a migracio ha nincs 

IF @TEMP_EnvironmentName = 'KK'
  BEGIN 
    -----  8961 ----- Kérdőív kitöltő - Kérdőív kezelő -----
    INSERT INTO tmpForSwitchDictionaryItemBase(RegiID, UjID, TanevID, C_NAME, C_TYPE, Torolni)
    SELECT DIB.ID, 8961, DIB.C_TANEVID, DIB.C_NAME, DIB.C_TYPE, 'F' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
    UPDATE DIB SET 
    DIB.TOROLT = 'T' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
END 

IF @TEMP_EnvironmentName = 'NSZFH'
  BEGIN 
    -----  8961 ----- Kérdőív kitöltő - Kérdőív kezelő -----
    INSERT INTO tmpForSwitchDictionaryItemBase(RegiID, UjID, TanevID, C_NAME, C_TYPE, Torolni)
    SELECT DIB.ID, 8961, DIB.C_TANEVID, DIB.C_NAME, DIB.C_TYPE, 'F' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
    UPDATE DIB SET 
    DIB.TOROLT = 'T' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
END 

IF @TEMP_EnvironmentName = 'HOI'
  BEGIN 
    -----  8961 ----- Kérdőív kitöltő - Kérdőív kezelő -----
    INSERT INTO tmpForSwitchDictionaryItemBase(RegiID, UjID, TanevID, C_NAME, C_TYPE, Torolni)
    SELECT DIB.ID, 8961, DIB.C_TANEVID, DIB.C_NAME, DIB.C_TYPE, 'F' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
    UPDATE DIB SET 
    DIB.TOROLT = 'T' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
END 

IF @TEMP_EnvironmentName = 'AZURE'
  BEGIN 
    -----  8961 ----- Kérdőív kitöltő - Kérdőív kezelő -----
    INSERT INTO tmpForSwitchDictionaryItemBase(RegiID, UjID, TanevID, C_NAME, C_TYPE, Torolni)
    SELECT DIB.ID, 8961, DIB.C_TANEVID, DIB.C_NAME, DIB.C_TYPE, 'F' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
    UPDATE DIB SET 
    DIB.TOROLT = 'T' 
    FROM T_DICTIONARYITEMBASE DIB 
      WHERE DIB.C_DICTIONARYTYPEID = 67 AND DIB.C_NAME = N'Kérdőív kitöltő - Kérdőív kezelő' AND DIB.TOROLT = 'F' 
END 
;
 DISABLE TRIGGER ALL ON T_DICTIONARYITEMBASE;  
 EXEC [dev].[uspCreateDictionaryItems] NULL, NULL; 
 ENABLE TRIGGER ALL ON T_DICTIONARYITEMBASE;  
 EXEC [dev].uspSwitchDictionaryItemBaseFromTmp;  

-- ================================================================================================================
-- Ezekhez az újonnan felvett dictionary elemek felvételekor más táblákba is
-- szükséges lehet kapcsolódó rekordokat beszúrni
-- dev.uspSetDictionaryProperties SP-be felejtsd el berakni, ez kell az új intézmény létrehozásához
-- ================================================================================================================


-- 8961 - Kérdőív kitöltő - Kérdőív kezelő
INSERT INTO T_SZEREPKOR (
   C_SZEREPKORTIPUS
  ,C_INTEZMENYID
  ,C_TANEVID
  ,TOROLT
  ,SERIAL
  ,LASTCHANGED
  ,CREATED
  ,MODIFIER
  ,CREATOR
)
SELECT 8961, i.ID, tv.ID, 'F', 0, GETDATE(), GETDATE(), NULL, NULL   
FROM T_INTEZMENY i
  INNER JOIN T_TANEV tv ON tv.C_INTEZMENYID = i.ID
WHERE tv.TOROLT = 'F' AND i.TOROLT = 'F' AND tv.C_AKTIV = 'T'