﻿DECLARE @tmp TABLE (Id_OLD INT, Id_NEW INT, Nev NVARCHAR(MAX))
DECLARE @tmp0 TABLE (Id_NEW INT, SKey NVARCHAR(MAX))

INSERT INTO @tmp (Id_OLD, Nev)
SELECT ID, CONVERT(VARCHAR(MAX), LOWER(C_NAME) COLLATE SQL_Latin1_General_Cp1251_CS_AS) AS Nev
FROM T_DICTIONARYITEMBASE
WHERE CONVERT(VARCHAR(MAX), LOWER(C_NAME) COLLATE SQL_Latin1_General_Cp1251_CS_AS) IN (N'szaktanari figyelmeztetes'
	,N'szaktanari intes'
	,N'szaktanari megrovas'
	,N'szaktanari dicseret'
	,N'osztalyfonoki figyelmeztetes'
	,N'osztalyfonoki intes'
	,N'osztalyfonoki megrovas'
	,N'osztalyfonoki dicseret'
	,N'igazgatoi figyelmeztetes'
	,N'igazgatoi intes'
	,N'igazgatoi megrovas'
	,N'igazgatoi dicseret'
	,N'felszereleshiany'
	,N'hazi feladat hiany'
	,N'figyelmeztetes bukasra allasrol'
	,N'figyelmeztetes gyenge tanulmanyi teljesitmenyrol'
	,N'tajekoztatas')
  AND ID > 100000
  AND C_TYPE = N'EsemenyTipus'

INSERT INTO @tmp0 VALUES 
(6312, N'szaktanari figyelmeztetes')
,(6313, N'szaktanari intes')
,(6314, N'szaktanari megrovas')
,(6315, N'szaktanari dicseret')
,(6316, N'osztalyfonoki figyelmeztetes')
,(6317, N'osztalyfonoki intes')
,(6318, N'osztalyfonoki megrovas')
,(6319, N'osztalyfonoki dicseret')
,(6320, N'igazgatoi figyelmeztetes')
,(6321, N'igazgatoi intes')
,(6322, N'igazgatoi megrovas')
,(6323, N'igazgatoi dicseret')
,(6324, N'felszereleshiany')
,(6325, N'hazi feladat hiany')
,(6326, N'figyelmeztetes bukasra allasrol')
,(6327, N'figyelmeztetes gyenge tanulmanyi teljesitmenyrol')
,(6328, N'tajekoztatas')

UPDATE @tmp
 SET Id_NEW = tmp0.Id_NEW
FROM @tmp
INNER JOIN @tmp0 tmp0 ON tmp0.SKey = Nev

UPDATE T_DICTIONARYITEMBASE
  SET TOROLT = 'T', C_NAME += N'_OLD'
WHERE ID IN (SELECT Id_OLD FROM @tmp)

UPDATE T_ESEMENYTIPUS 
	SET TOROLT = 'T'
WHERE ID IN (SELECT Id_OLD FROM @tmp)

DECLARE intezmenytanevekCursor CURSOR LOCAL FOR 
	SELECT C_INTEZMENYID, C_TANEVID
		FROM T_INTEZMENYADATOK

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))
    EXEC sp_Global_CreateDictionaryItems @IntezmenyId = @intezmenyId, @TanevId = @tanevId

	FETCH NEXT FROM intezmenytanevekCursor INTO @intezmenyId, @tanevId
END  

CLOSE intezmenytanevekCursor  
DEALLOCATE intezmenytanevekCursor

UPDATE T_TANULOESEMENY SET C_TIPUS = tmp.Id_NEW
FROM T_TANULOESEMENY te 
INNER JOIN @tmp tmp ON te.C_TIPUS = tmp.Id_OLD

GO
