This commit is contained in:
skidoodle 2024-03-13 00:33:46 +01:00
commit e124a47765
19374 changed files with 9806149 additions and 0 deletions

View file

@ -0,0 +1,206 @@
-- ===================================================================
-- Author: Telek Ákos
-- Created: 2018.06.21.
-- Description:
-- Dictionary elemek FollowUp-ja, insert csak a
-- 100000 feletti ID-kra, törölt elemekre nem fut le
-- ===================================================================
IF OBJECT_ID('sp_FollowUpDictionaryItemBase') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpDictionaryItemBase
END
GO
CREATE PROCEDURE sp_FollowUpDictionaryItemBase
@pItemId int
,@pCurrentTanevId int
,@pNextTanevId int
,@pIntezmenyId int
AS
BEGIN
DECLARE
@typeName nvarchar(64)
,@sql nvarchar(max)
,@kovItemId int
,@isItemTorolt char(1)
,@isKovItemTorolt char(1)
,@columnList nvarchar(max)
,@columnListInsert nvarchar(max)
SELECT
@typeName = d.C_TYPE
,@isItemTorolt = d.TOROLT
FROM T_DICTIONARYITEMBASE_OSSZES d
WHERE d.ID = @pItemId
AND d.C_INTEZMENYID = @pIntezmenyId
AND d.C_TANEVID = @pCurrentTanevId
SELECT
@kovItemId = d.ID
,@isKovItemTorolt = d.TOROLT
FROM T_DICTIONARYITEMBASE_OSSZES d
WHERE d.C_INTEZMENYID = @pIntezmenyId
AND d.C_TANEVID = @pNextTanevId
AND d.ELOZOTANEVIREKORDID = @pItemId
IF @isItemTorolt = 'T' OR @isKovItemTorolt = 'T' BEGIN
RETURN
END
IF @kovItemId IS NULL AND @pItemId < 100000 BEGIN
INSERT INTO T_DICTIONARYITEMBASE (
C_VALUE
,C_NAME
,C_NAME_1
,C_NAME_2
,C_NAME_3
,C_NAME_4
,C_VISIBLE
,C_CODE
,C_TYPE
,C_PROTECTED
,C_COLOR
,C_ORDER
,C_BGCOLOR
,C_DESCRIPTION
,C_ISACTIVE
,C_SHORTNAME
,C_DICTIONARYTYPEID
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,SERIAL
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR
,ELOZOTANEVIREKORDID
,NNID
) SELECT
C_VALUE AS C_VALUE -- C_VALUE - int
,C_NAME AS C_NAME -- C_NAME - nvarchar(250)
,C_NAME_1 AS C_NAME_1 -- C_NAME_1 - nvarchar(250)
,C_NAME_2 AS C_NAME_2 -- C_NAME_2 - nvarchar(250)
,C_NAME_3 AS C_NAME_3 -- C_NAME_3 - nvarchar(250)
,C_NAME_4 AS C_NAME_4 -- C_NAME_4 - nvarchar(250)
,C_VISIBLE AS C_VISIBLE -- C_VISIBLE - char(1)
,C_CODE AS C_CODE -- C_CODE - nvarchar(20)
,C_TYPE AS C_TYPE -- C_TYPE - nvarchar(32)
,C_PROTECTED AS C_PROTECTED -- C_PROTECTED - char(1)
,C_COLOR AS C_COLOR -- C_COLOR - nvarchar(6)
,C_ORDER AS C_ORDER -- C_ORDER - int
,C_BGCOLOR AS C_BGCOLOR -- C_BGCOLOR - nvarchar(6)
,C_DESCRIPTION AS C_DESCRIPTION -- C_DESCRIPTION - nvarchar(255)
,C_ISACTIVE AS C_ISACTIVE -- C_ISACTIVE - char(1)
,C_SHORTNAME AS C_SHORTNAME -- C_SHORTNAME - nvarchar(30)
,C_DICTIONARYTYPEID AS C_DICTIONARYTYPEID -- C_DICTIONARYTYPEID - int
,C_INTEZMENYID AS C_INTEZMENYID -- C_INTEZMENYID - int
,@pNextTanevId AS C_TANEVID -- C_TANEVID - int
,TOROLT AS TOROLT -- TOROLT - char(1)
,0 AS SERIAL -- SERIAL - int
,GETDATE() AS LASTCHANGED -- LASTCHANGED - datetime
,GETDATE() AS CREATED -- CREATED - datetime
,MODIFIER AS MODIFIER -- MODIFIER - int
,MODIFIER AS CREATOR -- CREATOR - int
,ID AS ELOZOTANEVIREKORDID -- ELOZOTANEVIREKORDID - int
,NULL AS NNID -- NNID - int
FROM T_DICTIONARYITEMBASE_OSSZES d
WHERE d.ID = @pItemId
AND d.C_INTEZMENYID = @pIntezmenyId
AND d.C_TANEVID = @pCurrentTanevId
SET @kovItemId = SCOPE_IDENTITY()
SELECT @columnList = ISNULL(@columnList + ', ', '') + COLUMN_NAME
FROM INFORMATION_SCHEMA.COLUMNS
WHERE TABLE_NAME = 'T_' + @typeName
AND TABLE_SCHEMA = 'dbo'
ORDER BY ORDINAL_POSITION
SET @columnListInsert = REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(STUFF(@columnList, 1, 2, '@kovItemId'), 'CREATOR', 'MODIFIER'), 'C_ALTANEVID', '@pNextTanevId'), 'ELOZOTANEVIREKORDIDA', 'ID'), 'ELOZOTANEVIREKORDID', 'ID'), 'LASTCHANGED', 'GETDATE()')
SET @sql = N'
INSERT INTO T_' + @typeName + ' (' + @columnList + ')
SELECT ' + @columnListInsert + '
FROM T_' + @typeName + '_OSSZES
WHERE ID = @pItemId
AND C_ALTANEVID = @pCurrentTanevId
AND C_ALINTEZMENYID = @pIntezmenyId
'
EXEC sys.sp_executesql @sql, N'
@kovItemId int
,@pItemId int
,@pCurrentTanevId int
,@pNextTanevId int
,@pIntezmenyId int'
,@kovItemId = @kovItemId
,@pItemId = @pItemId
,@pCurrentTanevId = @pCurrentTanevId
,@pNextTanevId = @pNextTanevId
,@pIntezmenyId = @pIntezmenyId
END
ELSE BEGIN
UPDATE kov SET
kov.C_VALUE = akt.c_VALUE
,kov.C_NAME = akt.C_NAME
,kov.C_NAME_1 = akt.C_NAME_1
,kov.C_NAME_2 = akt.C_NAME_2
,kov.C_NAME_3 = akt.C_NAME_3
,kov.C_NAME_4 = akt.C_NAME_4
,kov.C_VISIBLE = akt.C_VISIBLE
,kov.C_CODE = akt.C_CODE
,kov.C_PROTECTED = akt.C_PROTECTED
,kov.C_COLOR = akt.C_COLOR
,kov.C_ORDER = akt.C_ORDER
,kov.C_BGCOLOR = akt.C_BGCOLOR
,kov.C_DESCRIPTION = akt.C_DESCRIPTION
,kov.C_ISACTIVE = akt.C_ISACTIVE
,kov.C_SHORTNAME = akt.C_SHORTNAME
FROM T_DICTIONARYITEMBASE_OSSZES kov
INNER JOIN T_DICTIONARYITEMBASE_OSSZES akt ON akt.ID = kov.ELOZOTANEVIREKORDID
WHERE akt.ID = @pItemId
AND kov.ID = @kovItemId
AND akt.C_TANEVID = @pCurrentTanevId
AND kov.C_TANEVID = @pNextTanevId
AND akt.C_INTEZMENYID = @pIntezmenyId
AND kov.C_INTEZMENYID = @pIntezmenyId
SET @columnList = ''
SELECT @columnList += 'kov.' + COLUMN_NAME + ' = akt.' + COLUMN_NAME + ', '
FROM INFORMATION_SCHEMA.COLUMNS
WHERE TABLE_NAME = 'T_' + @typeName
AND TABLE_SCHEMA = 'dbo'
AND COLUMN_NAME NOT IN ('ID', 'C_ALINTEZMENYID', 'C_ALTANEVID', 'TOROLT', 'ELOZOTANEVIREKORDID', 'ELOZOTANEVIREKORDIDA', 'NNID', 'LASTCHANGED', 'CREATOR', 'CREATED')
ORDER BY ORDINAL_POSITION
SET @columnList += 'kov.LASTCHANGED = GETDATE()'
SET @sql = N'
UPDATE kov SET
' + @columnList + '
FROM T_' + @typeName + '_OSSZES kov
INNER JOIN T_' + @typeName + '_OSSZES akt ON akt.ID = kov.ELOZOTANEVIREKORDID
WHERE akt.ID = @pItemId
AND kov.ID = @kovItemId
AND akt.C_ALTANEVID = @pCurrentTanevId
AND kov.C_ALTANEVID = @pNextTanevId
AND akt.C_ALINTEZMENYID = @pIntezmenyId
AND kov.C_ALINTEZMENYID = @pIntezmenyId
'
EXEC sys.sp_executesql @sql, N'
@kovItemId int
,@pItemId int
,@pCurrentTanevId int
,@pNextTanevId int
,@pIntezmenyId int'
,@kovItemId = @kovItemId
,@pItemId = @pItemId
,@pCurrentTanevId = @pCurrentTanevId
,@pNextTanevId = @pNextTanevId
,@pIntezmenyId = @pIntezmenyId
END
END
GO

View file

@ -0,0 +1,267 @@
-- ===============================================================
-- Author: Szekeres András
-- Create date: 2018.04.24.
-- Description:
-- Egy tanuló adatainak frissítése a következõ tanévre
-- Ha a tanuló nem törölt egyik évben sem
-- ===============================================================
IF OBJECT_ID('sp_FollowUpTanulo') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpTanulo
END;
GO
CREATE PROCEDURE sp_FollowUpTanulo
@intezmenyId int,
@aktTanevId int,
@kovTanevId int,
@tanuloId 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
WHERE akt.ID = @tanuloId
AND akt.C_INTEZMENYID = @intezmenyId
AND akt.C_TANEVID = @aktTanevId
AND kov.C_TANEVID = @kovTanevId
AND kov.C_INTEZMENYID = @intezmenyId
IF @kovTanuloId IS NULL OR (SELECT TOROLT FROM T_FELHASZNALO_OSSZES WHERE ID = @tanuloId) = 'T' OR (SELECT TOROLT FROM T_FELHASZNALO_OSSZES WHERE ID = @kovTanuloId) = 'T' BEGIN
RETURN
END
UPDATE kov SET
kov.C_ALLAMIGONDOZOTT = akt.C_ALLAMIGONDOZOTT
,kov.C_BANKSZAMLASZAM = akt.C_BANKSZAMLASZAM
,kov.C_BEILLESZKEDESINEHEZSEG = akt.C_BEILLESZKEDESINEHEZSEG
,kov.C_BEIRASINAPLOSORSZAM = akt.C_BEIRASINAPLOSORSZAM
,kov.C_BEJARO = akt.C_BEJARO
,kov.C_DIAKIGAZOLVANYKELTE = akt.C_DIAKIGAZOLVANYKELTE
,kov.C_DIAKIGAZOLVANYSZAM = akt.C_DIAKIGAZOLVANYSZAM
,kov.C_ELOZOINTEZMENY = akt.C_ELOZOINTEZMENY
,kov.C_EVISMETLO = akt.C_EVISMETLO
,kov.C_INGYENESTANKONVYELLATASA = akt.C_INGYENESTANKONVYELLATASA
,kov.C_JOGVISZONYATSZUNETELTETO = akt.C_JOGVISZONYATSZUNETELTETO
,kov.C_MAGANTANULO = akt.C_MAGANTANULO
,kov.C_MAGANTANULOSAGANAKOKA = akt.C_MAGANTANULOSAGANAKOKA
,kov.C_MAGANTANULOSAGKEZDETE = akt.C_MAGANTANULOSAGKEZDETE
,kov.C_POLGARISZERZODESES = akt.C_POLGARISZERZODESES
,kov.C_SZAKMAIGYAKORLATON = akt.C_SZAKMAIGYAKORLATON
,kov.C_SZOCIALISTAMOGATAS = akt.C_SZOCIALISTAMOGATAS
,kov.C_TANDIJATFIZETO = akt.C_TANDIJATFIZETO
,kov.C_TANKOTELEZETT = akt.C_TANKOTELEZETT
,kov.C_TANKOTELEZETTSEGVEGE = akt.C_TANKOTELEZETTSEGVEGE
,kov.C_TANULOSZERZODESES = akt.C_TANULOSZERZODESES
,kov.C_TERITESIDIJATFIZETO = akt.C_TERITESIDIJATFIZETO
,kov.C_TESTNEVELESTIPUSA = akt.C_TESTNEVELESTIPUSA
,kov.C_VENDEG = akt.C_VENDEG
,kov.C_BTMPROBLEMAS = akt.C_BTMPROBLEMAS
,kov.C_DIAKSPORTKOROS = akt.C_DIAKSPORTKOROS
,kov.C_EGYHAZKOZOSSEGE = akt.C_EGYHAZKOZOSSEGE
,kov.C_ETKEZESIKEDVEZMENY = akt.C_ETKEZESIKEDVEZMENY
,kov.C_HALMOZOTTANFOGYATEKOS = akt.C_HALMOZOTTANFOGYATEKOS
,kov.C_HATRANYOSHELYZETU = akt.C_HATRANYOSHELYZETU
,kov.C_KOLLEGIUMIELLATASOS = akt.C_KOLLEGIUMIELLATASOS
,kov.C_RENDSZERESGYERMEKVEDELMIKEDV = akt.C_RENDSZERESGYERMEKVEDELMIKEDV
,kov.C_SAJATOSNEVELESU = akt.C_SAJATOSNEVELESU
,kov.C_SPORTAG = akt.C_SPORTAG
,kov.C_SPORTEDZONEVE = akt.C_SPORTEDZONEVE
,kov.C_SPORTKLUB = akt.C_SPORTKLUB
,kov.C_SZAKKEPESITESSZAMA = akt.C_SZAKKEPESITESSZAMA
,kov.C_TANULOIJOGVISZONYOSELTARTOTT = akt.C_TANULOIJOGVISZONYOSELTARTOTT
,kov.C_TARTOSGYOGYKEZELESSZAMA = akt.C_TARTOSGYOGYKEZELESSZAMA
,kov.C_TOBBGYERMEKIGAZOLASSZAMA = akt.C_TOBBGYERMEKIGAZOLASSZAMA
,kov.C_VALLASA = akt.C_VALLASA
,kov.C_VESZELYEZTETETT = akt.C_VESZELYEZTETETT
,kov.C_JOGVISZONYVARHATOBEFEJEZESE = akt.C_JOGVISZONYVARHATOBEFEJEZESE
,kov.C_BEILLESZKEDESIPROBLEMAVALKUZ = akt.C_BEILLESZKEDESIPROBLEMAVALKUZ
,kov.C_BESZEDFOGYATEKOSOKMANYSZAM = akt.C_BESZEDFOGYATEKOSOKMANYSZAM
,kov.C_BNOKOD = akt.C_BNOKOD
,kov.C_BTMHATAROZATOKMANYSZAM = akt.C_BTMHATAROZATOKMANYSZAM
,kov.C_BTMHATAROZATTARTALMA = akt.C_BTMHATAROZATTARTALMA
,kov.C_BTMKIALLITOINTEZMENY = akt.C_BTMKIALLITOINTEZMENY
,kov.C_BTMKONTROLLIDOPONT = akt.C_BTMKONTROLLIDOPONT
,kov.C_BTMLETSZAMSULY = akt.C_BTMLETSZAMSULY
,kov.C_BTMOKMANYERVENYESSEGKEZDETE = akt.C_BTMOKMANYERVENYESSEGKEZDETE
,kov.C_BTMOKMANYERVENYESSEGVEGE = akt.C_BTMOKMANYERVENYESSEGVEGE
,kov.C_DISZGRAFIAOKMANYSZAM = akt.C_DISZGRAFIAOKMANYSZAM
,kov.C_DISZKALKULIAOKMANYSZAM = akt.C_DISZKALKULIAOKMANYSZAM
,kov.C_DISZLEXIAOKMANYSZAM = akt.C_DISZLEXIAOKMANYSZAM
,kov.C_ERTELMIFOGYATEKOS = akt.C_ERTELMIFOGYATEKOS
,kov.C_ERTELMIFOGYATEKOSOKMANYSZAM = akt.C_ERTELMIFOGYATEKOSOKMANYSZAM
,kov.C_FEJLESZTESREKIJELOLT = akt.C_FEJLESZTESREKIJELOLT
,kov.C_FEJLESZTOFOGLALKOZAS = akt.C_FEJLESZTOFOGLALKOZAS
,kov.C_FEJLESZTOFOGLALKOZASORASZAM = akt.C_FEJLESZTOFOGLALKOZASORASZAM
,kov.C_HALLASSERULT = akt.C_HALLASSERULT
,kov.C_HALLASSERULTOKMANYSZAM = akt.C_HALLASSERULTOKMANYSZAM
,kov.C_LATASSERULT = akt.C_LATASSERULT
,kov.C_LATASSERULTOKMANYSZAM = akt.C_LATASSERULTOKMANYSZAM
,kov.C_MAGATARTASIPROBLEMAVALKUZD = akt.C_MAGATARTASIPROBLEMAVALKUZD
,kov.C_MEGISMERONEMORGANIKUSOKMANYS = akt.C_MEGISMERONEMORGANIKUSOKMANYS
,kov.C_MEGISMEROORGANIKUSOKMANYSZAM = akt.C_MEGISMEROORGANIKUSOKMANYSZAM
,kov.C_MOZGASSERULTOKMANYSZAM = akt.C_MOZGASSERULTOKMANYSZAM
,kov.C_SNIKIALLITOINTEZMENY = akt.C_SNIKIALLITOINTEZMENY
,kov.C_SNIKONTROLLIDOPONT = akt.C_SNIKONTROLLIDOPONT
,kov.C_SNILETSZAMSULY = akt.C_SNILETSZAMSULY
,kov.C_SNIMEGHATAROZAS = akt.C_SNIMEGHATAROZAS
,kov.C_SNIOKMANYERVENYESSEGKEZDETE = akt.C_SNIOKMANYERVENYESSEGKEZDETE
,kov.C_SNIOKMANYERVENYESSEGVEGE = akt.C_SNIOKMANYERVENYESSEGVEGE
,kov.C_TANULASIPROBLEMADISZGRAFIA = akt.C_TANULASIPROBLEMADISZGRAFIA
,kov.C_TANULASIPROBLEMAVALKUZD = akt.C_TANULASIPROBLEMAVALKUZD
,kov.C_TANULASIPROBLEMAVALKUZDDISZK = akt.C_TANULASIPROBLEMAVALKUZDDISZK
,kov.C_TANULASIPROBLEMAVALKUZDDISZL = akt.C_TANULASIPROBLEMAVALKUZDDISZL
,kov.C_VISELKEDESNEMORGANIKUSOKMANY = akt.C_VISELKEDESNEMORGANIKUSOKMANY
,kov.C_VISELKEDESORGANIKUSOKMANYSZA = akt.C_VISELKEDESORGANIKUSOKMANYSZA
,kov.C_ELSOINTEZMENYOMKOD = akt.C_ELSOINTEZMENYOMKOD
,kov.C_EVISMETLOTANTARGYAK = akt.C_EVISMETLOTANTARGYAK
,kov.C_KOZEPFOKUOKTATASBATIZENHATOD = akt.C_KOZEPFOKUOKTATASBATIZENHATOD
,kov.C_MENEDEKJOGGALRENDELKEZO = akt.C_MENEDEKJOGGALRENDELKEZO
,kov.C_EGYEBDONTO = akt.C_EGYEBDONTO
,kov.C_MEGALLAPODASOS = akt.C_MEGALLAPODASOS
,kov.C_OSZTV = akt.C_OSZTV
,kov.C_SZETVAGAZAT = akt.C_SZETVAGAZAT
,kov.C_SZINTVIZSGA = akt.C_SZINTVIZSGA
,kov.C_SZKTV = akt.C_SZKTV
,kov.C_TECHNIKUSIEVFOLYAM = akt.C_TECHNIKUSIEVFOLYAM
,kov.C_EGYUTTMUKODESES = akt.C_EGYUTTMUKODESES
,kov.C_ISKOLAIKERETEKKOZOTT = akt.C_ISKOLAIKERETEKKOZOTT
,kov.C_TANTERVID = akt.C_TANTERVID
,kov.C_FELVETELTANEVEID = akt.C_FELVETELTANEVEID
,kov.SERIAL = kov.SERIAL + 1
,kov.LASTCHANGED = GETDATE()
FROM T_TANULO_OSSZES kov
INNER JOIN T_TANULO_OSSZES akt ON kov.ID = @kovTanuloId AND akt.ID = @tanuloId
UPDATE kov SET
kov.C_NEME = akt.C_NEME
,kov.C_SZULETESIDATUM = akt.C_SZULETESIDATUM
,kov.C_SZULETESINEV = akt.C_SZULETESINEV
,kov.C_ANYJANEVE = akt.C_ANYJANEVE
,kov.C_SZULETESIHELY = akt.C_SZULETESIHELY
,kov.C_TAJSZAM = akt.C_TAJSZAM
,kov.C_ALLAMPOLGARSAGA = akt.C_ALLAMPOLGARSAGA
,kov.C_LEIRAS = akt.C_LEIRAS
,kov.C_KERESESINEV = akt.C_KERESESINEV
,kov.C_SZULETESIORSZAG = akt.C_SZULETESIORSZAG
,kov.C_SZULETESINEVSORREND = akt.C_SZULETESINEVSORREND
,kov.C_ANYJANEVESORREND = akt.C_ANYJANEVESORREND
,kov.C_ALAPERTELMEZETTLCID = akt.C_ALAPERTELMEZETTLCID
,kov.C_LATASSERULTWEBHASZNALATA = akt.C_LATASSERULTWEBHASZNALATA
,kov.C_SMSSZAM = akt.C_SMSSZAM
,kov.C_SMSSZINKRONIZALT = akt.C_SMSSZINKRONIZALT
,kov.C_KELLADSZINKRONIZALAS = akt.C_KELLADSZINKRONIZALAS
,kov.C_SZULETESINEVELVALASZTO = akt.C_SZULETESINEVELVALASZTO
,kov.C_ANYJANEVEELVALASZTO = akt.C_ANYJANEVEELVALASZTO
,kov.C_DMSTARTTIME = akt.C_DMSTARTTIME
,kov.C_NYOMTATASINEV = akt.C_NYOMTATASINEV
,kov.C_UTONEV = akt.C_UTONEV
,kov.C_VEZETEKNEV = akt.C_VEZETEKNEV
,kov.C_ADOSZAM = akt.C_ADOSZAM
,kov.C_ELOTAG = akt.C_ELOTAG
,kov.C_ANYANYELVE = akt.C_ANYANYELVE
,kov.C_IGAZOLVANYSZAM = akt.C_IGAZOLVANYSZAM
,kov.C_IGAZOLVANYTIPUSA = akt.C_IGAZOLVANYTIPUSA
,kov.C_NEVSORREND = akt.C_NEVSORREND
,kov.C_NYILVANTARTASKEZDETE = akt.C_NYILVANTARTASKEZDETE
,kov.C_OKTATASIAZONOSITO = akt.C_OKTATASIAZONOSITO
,kov.C_OMKOD = akt.C_OMKOD
,kov.C_ALAIRAS = akt.C_ALAIRAS
,kov.C_PROFILKEP = akt.C_PROFILKEP
,kov.C_KRETAKOD = akt.C_KRETAKOD
,kov.C_KIRAZONOSITO = akt.C_KIRAZONOSITO
,kov.C_ALLAMPOLGARSAGA2 = akt.C_ALLAMPOLGARSAGA2
,kov.C_FENNTARTOAZONOSITO = akt.C_FENNTARTOAZONOSITO
,kov.SERIAL = akt.SERIAL + 1
,kov.LASTCHANGED = GETDATE()
FROM T_FELHASZNALO_OSSZES kov
INNER JOIN T_FELHASZNALO_OSSZES akt ON akt.C_OKTATASIAZONOSITO = kov.C_OKTATASIAZONOSITO
WHERE kov.ID = @kovTanuloId
AND akt.ID = @tanuloId
UPDATE kov SET
kov.C_KOTELEZOVALTOZTATNI = akt.C_KOTELEZOVALTOZTATNI
,kov.C_MEGHIUSULTBELEPESEK = akt.C_MEGHIUSULTBELEPESEK
,kov.C_UTOLSOBELEPES = akt.C_UTOLSOBELEPES
,kov.C_JELSZO = akt.C_JELSZO
,kov.C_JELSZOVALTOZTATASIDEJE = akt.C_JELSZOVALTOZTATASIDEJE
,kov.C_SO = akt.C_SO
,kov.C_BEJELENTKEZESINEV = akt.C_BEJELENTKEZESINEV
,kov.C_NEPTUNNAPLOJELSZO = akt.C_NEPTUNNAPLOJELSZO
,kov.C_GUID = akt.C_GUID
,kov.C_GONDVISELOID = akt.C_GONDVISELOID
,kov.SERIAL = akt.SERIAL + 1
,kov.LASTCHANGED = GETDATE()
FROM T_FELHASZNALOBELEPES_OSSZES kov
INNER JOIN T_FELHASZNALOBELEPES_OSSZES akt ON akt.C_FELHASZNALOID = @tanuloId AND akt.C_GONDVISELOID IS NULL AND akt.TOROLT = 'F' AND akt.C_TANEVID = @aktTanevId AND akt.C_INTEZMENYID = @intezmenyId
WHERE kov.C_FELHASZNALOID = @kovTanuloId
AND kov.C_GONDVISELOID IS NULL
AND kov.C_TANEVID = @kovTanevId
AND kov.TOROLT = 'F'
IF @@ROWCOUNT = 0 BEGIN -- Ha nem volt update, akkor insert
INSERT INTO T_FELHASZNALOBELEPES_OSSZES (
C_KOTELEZOVALTOZTATNI
,C_MEGHIUSULTBELEPESEK
,C_UTOLSOBELEPES
,C_JELSZO
,C_JELSZOVALTOZTATASIDEJE
,C_SO
,C_BEJELENTKEZESINEV
,C_NEPTUNNAPLOJELSZO
,C_GUID
,C_FELHASZNALOID
,C_GONDVISELOID
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,SERIAL
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR
,NNID
,ELOZOTANEVIREKORDID
) SELECT
C_KOTELEZOVALTOZTATNI
,C_MEGHIUSULTBELEPESEK
,C_UTOLSOBELEPES
,C_JELSZO
,C_JELSZOVALTOZTATASIDEJE
,C_SO
,C_BEJELENTKEZESINEV
,C_NEPTUNNAPLOJELSZO
,C_GUID
,@kovTanuloId
,C_GONDVISELOID
,C_INTEZMENYID
,@kovTanevId
,TOROLT
,0
,GETDATE()
,GETDATE()
,MODIFIER
,MODIFIER
,NULL
,ID
FROM T_FELHASZNALOBELEPES_OSSZES akt
WHERE akt.C_FELHASZNALOID = @tanuloId
AND akt.C_GONDVISELOID IS NULL
AND akt.TOROLT = 'F'
AND akt.C_TANEVID = @aktTanevId
AND akt.C_INTEZMENYID = @intezmenyId;
END
EXEC sp_FollowUpTanuloCim @intezmenyId, @aktTanevId, @kovTanevId, @tanuloId;
EXEC sp_FollowUpTanuloEmail @intezmenyId, @aktTanevId, @kovTanevId, @tanuloId;
EXEC sp_FollowUpTanuloFelmentes @intezmenyId, @aktTanevId, @kovTanevId, @tanuloId;
EXEC sp_FollowUpTanuloTelefon @intezmenyId, @aktTanevId, @kovTanevId, @tanuloId;
END
GO

View file

@ -0,0 +1,102 @@
-- =============================================
-- Author: Szekeres András
-- Create date: 2018.04.24.
-- Description: Egy tanuló címeinek frissítése a következõ tanévre
-- =============================================
IF OBJECT_ID('sp_FollowUpTanuloCim') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpTanuloCim
END;
GO
CREATE PROCEDURE sp_FollowUpTanuloCim
@intezmenyId int,
@aktTanevId int,
@kovTanevId int,
@tanuloId int
AS
BEGIN
DECLARE @kovTanuloId int;
SELECT @kovTanuloId = kovTanevesTanulo.ID
FROM T_FELHASZNALO_OSSZES aktTanevesTanulo
INNER JOIN T_FELHASZNALO_OSSZES kovTanevesTanulo ON aktTanevesTanulo.C_OKTATASIAZONOSITO = kovTanevesTanulo.C_OKTATASIAZONOSITO AND kovTanevesTanulo.C_TANEVID = @kovTanevId AND kovTanevesTanulo.C_INTEZMENYID = @intezmenyId
WHERE aktTanevesTanulo.ID = @tanuloId
AND aktTanevesTanulo.C_INTEZMENYID = @intezmenyId
AND aktTanevesTanulo.C_TANEVID = @aktTanevId
AND kovTanevesTanulo.TOROLT = 'F'
AND aktTanevesTanulo.TOROLT = 'F'; --kell? elv olyat nem módosíthat, aki törölt
IF @kovTanuloId IS NOT NULL BEGIN
DELETE FROM T_CIM_OSSZES
WHERE C_FELHASZNALOID = @kovTanuloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @kovTanevId;
INSERT INTO T_CIM_OSSZES (
C_CIMTIPUSA
,C_ORSZAG
,C_IRANYITOSZAM
,C_VAROS
,C_MEGYE
,C_KOZTERULET
,C_KOZTERULETJELLEGE
,C_HAZSZAM
,C_EPULET
,C_LEPCSOHAZ
,C_EMELET
,C_AJTO
,C_OSSZETETTCIM
,C_ALAPERTELMEZETT
,C_FELHASZNALOID
,C_GONDVISELOID
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,SERIAL
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR
,NNID
,GID
,ELOZOTANEVIREKORDID
) SELECT
C_CIMTIPUSA
,C_ORSZAG
,C_IRANYITOSZAM
,C_VAROS
,C_MEGYE
,C_KOZTERULET
,C_KOZTERULETJELLEGE
,C_HAZSZAM
,C_EPULET
,C_LEPCSOHAZ
,C_EMELET
,C_AJTO
,C_OSSZETETTCIM
,C_ALAPERTELMEZETT
,@kovTanuloId
,C_GONDVISELOID
,C_INTEZMENYID
,@kovTanevId
,TOROLT
,0
,GETDATE()
,GETDATE()
,MODIFIER
,MODIFIER
,NULL
,GID
,ID
FROM T_CIM_OSSZES
WHERE C_FELHASZNALOID = @tanuloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @aktTanevId
AND TOROLT = 'F';
END
END
GO

View file

@ -0,0 +1,79 @@
-- =============================================
-- Author: Szekeres András
-- Create date: 2018.04.24.
-- Description: Egy tanuló email címeinek frissítése a következõ tanévre
-- =============================================
IF OBJECT_ID('sp_FollowUpTanuloEmail') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpTanuloEmail
END;
GO
CREATE PROCEDURE sp_FollowUpTanuloEmail
@intezmenyId int,
@aktTanevId int,
@kovTanevId int,
@tanuloId 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 = @tanuloId
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 = @tanuloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @aktTanevId
AND TOROLT = 'F';
END
END
GO

View file

@ -0,0 +1,81 @@
-- ==============================================================================
-- Author: Szekeres András
-- Create date: 2018.04.24.
-- Description: Egy tanuló felmentéseinek frissítése a következõ tanévre
-- ==============================================================================
IF OBJECT_ID('sp_FollowUpTanuloFelmentes') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpTanuloFelmentes
END;
GO
CREATE PROCEDURE sp_FollowUpTanuloFelmentes
@intezmenyId int,
@aktTanevId int,
@kovTanevId int,
@tanuloId 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 = @tanuloId
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_TANULOMENTESSEG_OSSZES
WHERE C_TANULOID = @kovTanuloId
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @kovTanevId;
INSERT INTO T_TANULOMENTESSEG_OSSZES (
C_ERTEKELESMENTESITES
,C_KEZDETE
,C_MENTESSEGOKA
,C_ORAMENTESITES
,C_VEGE
,C_SZOVEGESENERTEKELHETO
,C_TANTARGYID
,C_TANULOID
,C_INTEZMENYID
,C_TANEVID
,TOROLT
,SERIAL
,LASTCHANGED
,CREATED
,MODIFIER
,CREATOR
,NNID
,ELOZOTANEVIREKORDID
) SELECT
C_ERTEKELESMENTESITES
,C_KEZDETE
,C_MENTESSEGOKA
,C_ORAMENTESITES
,C_VEGE
,C_SZOVEGESENERTEKELHETO
,C_TANTARGYID
,@kovTanuloId
,C_INTEZMENYID
,@kovTanevId
,TOROLT
,0
,GETDATE()
,GETDATE()
,MODIFIER
,MODIFIER
,NULL
,ID
FROM T_TANULOMENTESSEG_OSSZES
WHERE C_TANULOID = @tanuloId
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @aktTanevId
AND TOROLT = 'F';
END
END
GO

View file

@ -0,0 +1,82 @@
-- =============================================
-- Author: Szekeres András
-- Create date: 2018.04.24.
-- Description: Egy tanuló telefonszámainak frissítése a következõ tanévre
-- =============================================
IF OBJECT_ID('sp_FollowUpTanuloTelefon') IS NOT NULL BEGIN
DROP PROCEDURE sp_FollowUpTanuloTelefon
END;
GO
CREATE PROCEDURE sp_FollowUpTanuloTelefon
@intezmenyId int,
@aktTanevId int,
@kovTanevId int,
@tanuloId 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 = @tanuloId
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_TELEFON_OSSZES
WHERE C_FELHASZNALOID = @kovTanuloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @kovTanevId;
INSERT INTO T_TELEFON_OSSZES (
C_TELEFONTIPUSA
, C_TELEFONSZAM
, C_LEIRAS
, C_ALAPERTELMEZETT
, C_ISPUBLIC
, C_GONDVISELOID
, C_FELHASZNALOID
, C_INTEZMENYID
, C_TANEVID
, TOROLT
, SERIAL
, LASTCHANGED
, CREATED
, MODIFIER
, CREATOR
, ELOZOTANEVIREKORDID
, NNID
) SELECT
C_TELEFONTIPUSA
,C_TELEFONSZAM
,C_LEIRAS
,C_ALAPERTELMEZETT
,C_ISPUBLIC
,C_GONDVISELOID
,@kovTanuloId
,C_INTEZMENYID
,@kovTanevId
,TOROLT
,0
,GETDATE()
,GETDATE()
,MODIFIER
,MODIFIER
,ID
,NULL
FROM T_TELEFON_OSSZES
WHERE C_FELHASZNALOID = @tanuloId
AND C_GONDVISELOID IS NULL
AND C_INTEZMENYID = @intezmenyId
AND C_TANEVID = @aktTanevId
AND TOROLT = 'F';
END
END
GO