kreta/Kreta.DataAccess.Migrations/Scripts/Archive/20200130105617_DB_1987/uspGetLemorzsolodottTanulokByFelhely.sql
2024-03-13 00:33:46 +01:00

206 lines
7.6 KiB
Transact-SQL

DROP PROCEDURE IF EXISTS uspGetLemorzsolodottTanulokByFelhely
GO
CREATE PROCEDURE [dbo].[uspGetLemorzsolodottTanulokByFelhely] (@feladatEllatasiHelyId int, @tanevId int, @isFelevi int) AS
BEGIN
SET NOCOUNT ON;
CREATE TABLE #Osztalyzatok (
Id int PRIMARY KEY
,Ertek float
)
CREATE TABLE #FHhozTartozoTanulok (
TanuloId int PRIMARY KEY
,Evfolyam int
,Neme int
,TanuloNev nvarchar(255)
,OktatasiAzonosito nvarchar(11) COLLATE DATABASE_DEFAULT
,TanuloOsztalyNev nvarchar(255)
,TanuloOsztalyId int
)
CREATE TABLE #TanuloAtlagok (
TanuloId int PRIMARY KEY
,AktualisAtlag float
,KorabbiAtlag float
)
CREATE TABLE #KozepesAlattiTanulok (
TanuloId int PRIMARY KEY
)
CREATE TABLE #RontottTanulok (
TanuloId int PRIMARY KEY
)
CREATE TABLE #MuvCsoportTip (
CsoptipId int PRIMARY KEY
)
CREATE TABLE #EslTantargyak(
TantargyId int PRIMARY KEY
,TanevId int
)
-- Mi a "Közepes" értéke az adott feladatellátási helyen
DECLARE @FelHelyTipusKozepes float = 3.0
DECLARE @ErtekelesTipus int = IIF(@isFelevi = 0,1520,1519)
DECLARE @ExErtekelesTipus int = IIF(@ErtekelesTipus = 1520,1519,1520)
SELECT
@FelHelyTipusKozepes = IIF(fh.C_OKTATASINEVELESIFELADATTIPUS IN (1160, 1161, 1162, 5435, 1176, 6463),2.5,3.0)
FROM T_FELADATELLATASIHELY fh
WHERE fh.ID = @feladatEllatasiHelyId AND fh.TOROLT='F'
INSERT INTO #MuvCsoportTip (CsoptipID)
VALUES (1071),(1070),(1069),(1068),(1067),(6756),(6757),(6758),(6759),(6760),(6761) --művészeti csoporttípusok
-- Az elõzõ tanév ID-ja
DECLARE @ElozoTanevId int = 0
IF @IsFelevi = 0
BEGIN
SET @ElozoTanevId = @tanevId
END
ELSE
BEGIN
SELECT @ElozoTanevId = ISNULL(elozotanev.ID,0)
FROM T_TANEV akttanev
INNER JOIN T_TANEV_OSSZES elozotanev ON elozotanev.TOROLT = 'F' AND elozotanev.C_SORSZAM = akttanev.C_SORSZAM-2
AND elozotanev.C_INTEZMENYID = akttanev.C_INTEZMENYID
WHERE akttanev.ID = @tanevId
END
DECLARE @BesorolasiDatum DATE = (SELECT TOP 1 C_DATUM from T_TANEVRENDJE tr WHERE C_NAPTIPUSA = IIF(@isFelevi = 0,1395,1400) AND C_TANEVID = @tanevid AND TOROLT='F')
INSERT INTO #Osztalyzatok
SELECT
ID
,CONVERT(float,C_VALUE)
FROM T_DICTIONARYITEMBASE
WHERE C_TYPE = 'OsztalyzatTipus' AND C_TANEVID = @tanevId AND TOROLT='F'
INSERT INTO #EslTantargyak (
TantargyId
,TanevId
)
SELECT
tgy.ID
,@tanevId
FROM T_TANTARGY tgy
WHERE (tgy.C_ALTANTARGYKENTNYOMTATVANYBAN='T' OR tgy.C_FOTARGYE='T')
AND tgy.C_TANEVID = @tanevId AND tgy.TOROLT='F'
AND tgy.C_ESLTANTARGYKATEGORIAID IS NOT NULL
UNION
SELECT
tgy.ID
,@ElozoTanevId
FROM T_TANTARGY_OSSZES tgy
WHERE (tgy.C_ALTANTARGYKENTNYOMTATVANYBAN='T' OR tgy.C_FOTARGYE='T')
AND tgy.C_TANEVID = @ElozoTanevId AND tgy.TOROLT='F'
AND tgy.C_ESLTANTARGYKATEGORIAID IS NOT NULL
-- Egy adott FH-hoz tartozó tanulók kilistázása (évfolyamonként, nemenként) összevont osztályokkal együtt
INSERT INTO #FHhozTartozoTanulok/*TODO:Tobb Osztaly*//*OM-1582*/
SELECT DISTINCT
tcs.C_TANULOID
,ISNULL(tta.C_TANULOEVFOLYAMTIPUSID,1307)
,f.C_NEME
,f.C_NYOMTATASINEV
,f.C_OKTATASIAZONOSITO
,ocs.C_NEV
,ocs.ID
FROM T_OSZTALYCSOPORT ocs
INNER JOIN T_OSZTALY o ON o.ID = ocs.ID AND o.TOROLT='F'
INNER JOIN T_TANULOCSOPORT tcs ON tcs.C_OSZTALYCSOPORTID = o.ID AND tcs.TOROLT = 'F'
AND @BesorolasiDatum BETWEEN tcs.C_BELEPESDATUM AND ISNULL(tcs.C_KILEPESDATUM,'22000101')
INNER JOIN T_TANULOTANUGYIADATOK tta ON tta.C_TANULOCSOPORTID = tcs.ID AND tta.TOROLT = 'F' /*Ha a tanuló összevont évfolyamú osztályba jár, de van megadva neki egyénileg évfolyam a tanügyi adataiban,*/
INNER JOIN T_FELHASZNALO f ON f.ID = tcs.C_TANULOID AND f.TOROLT='F' /*akkor azt kell megjeleníteni*/
WHERE ocs.C_FELADATELLATASIHELYID = @feladatEllatasiHelyId
AND ocs.C_TANEVID = @tanevId AND ocs.C_KEPZESIFORMA = 1096
AND C_EVFOLYAMTIPUSA IN (7366,6909,6912,6913,6908,6910,6911)
AND ocs.TOROLT = 'F'
UNION
SELECT DISTINCT
tcs.C_TANULOID
,ocs.C_EVFOLYAMTIPUSA
,f.C_NEME
,f.C_NYOMTATASINEV
,f.C_OKTATASIAZONOSITO
,ocs.C_NEV
,ocs.ID
FROM T_OSZTALYCSOPORT ocs
INNER JOIN T_TANULOCSOPORT tcs ON tcs.C_OSZTALYCSOPORTID = ocs.ID AND tcs.TOROLT = 'F'
AND @BesorolasiDatum BETWEEN tcs.C_BELEPESDATUM AND ISNULL(tcs.C_KILEPESDATUM,'22000101')
INNER JOIN T_OSZTALY o ON o.id = tcs.C_OSZTALYCSOPORTID AND o.TOROLT='F'
INNER JOIN T_FELHASZNALO f ON f.id = tcs.C_TANULOID AND f.TOROLT='F'
WHERE ocs.C_FELADATELLATASIHELYID = @feladatEllatasiHelyId
AND ocs.C_TANEVID = @tanevId AND ocs.C_KEPZESIFORMA = 1096
AND C_EVFOLYAMTIPUSA NOT IN (7366,6909,6912,6913,6908,6910,6911)
AND ocs.TOROLT = 'F'
DELETE FROM #FHhozTartozoTanulok WHERE Evfolyam BETWEEN 1303 AND 1306 --1-4 évfolyamok nem kellenek
-- Visszatérési tábla számítása
INSERT INTO #KozepesAlattiTanulok (TanuloId)
SELECT DISTINCT
fht.TanuloId
FROM T_TANULOERTEKELES te
INNER JOIN #EslTantargyak tgy ON tgy.TanevId = te.C_TANEVID AND tgy.TantargyId = te.C_TANTARGYID
INNER JOIN #Osztalyzatok o ON o.ID = te.C_ERTEKELESOSZTALYZATID
INNER JOIN #FHhozTartozoTanulok fht ON fht.TanuloId = te.C_TANULOID
LEFT JOIN T_CSOPORT cs ON cs.ID=te.C_OSZTALYCSOPORTID AND cs.TOROLT='F'
WHERE te.C_TIPUSID = @ErtekelesTipus AND ISNULL(cs.C_TIPUSA,0) NOT IN(SELECT CsoptipID FROM #MuvCsoportTip) --alapf. műv okt csoportok osztályzatai nem kellenek
AND te.TOROLT='F' AND te.C_TANEVID = @tanevId
GROUP BY fht.TanuloId
HAVING ROUND(AVG(o.Ertek),2) < @FelHelyTipusKozepes
INSERT INTO #TanuloAtlagok (
TanuloId
,AktualisAtlag
,KorabbiAtlag
)
SELECT
fht.TanuloId
,(
SELECT
ROUND(AVG(o.Ertek),2)
FROM T_TANULOERTEKELES te
INNER JOIN #Osztalyzatok o ON o.ID = te.C_ERTEKELESOSZTALYZATID
INNER JOIN #EslTantargyak tgy ON tgy.Tantargyid = te.C_TANTARGYID AND tgy.TanevId = te.C_TANEVID
WHERE te.C_TANULOID = tanulo.ID AND te.C_TIPUSID = @ErtekelesTipus AND te.TOROLT='F' AND te.C_TANEVID = tanulo.C_TANEVID
AND NOT EXISTS(SELECT 1 FROM T_CSOPORT WHERE ID = te.C_OSZTALYCSOPORTID AND C_TIPUSA IN (SELECT CsoptipID FROM #MuvCsoportTip))
) AktualisAtlag
,(
SELECT
ROUND(AVG(o.Ertek),2)
FROM T_TANULOERTEKELES_OSSZES te
INNER JOIN #Osztalyzatok o ON o.ID = te.C_ERTEKELESOSZTALYZATID
INNER JOIN #EslTantargyak tgy ON tgy.Tantargyid = te.C_TANTARGYID AND tgy.TanevId = te.C_TANEVID
WHERE te.C_TANULOID = extanulo.ID AND te.C_TIPUSID = @ExErtekelesTipus AND te.TOROLT = 'F' AND te.C_TANEVID = extanulo.C_TANEVID
AND NOT EXISTS(SELECT 1 FROM T_CSOPORT_OSSZES WHERE ID = te.C_OSZTALYCSOPORTID AND C_TIPUSA IN (SELECT CsoptipID FROM #MuvCsoportTip) AND TOROLT='F')
) KorabbiAtlag
FROM #FHhozTartozoTanulok fht
INNER JOIN T_FELHASZNALO tanulo ON tanulo.ID = fht.TanuloId
INNER JOIN T_FELHASZNALO_OSSZES extanulo ON tanulo.C_OKTATASIAZONOSITO = extanulo.C_OKTATASIAZONOSITO
AND extanulo.C_TANEVID = @ElozoTanevId AND extanulo.TOROLT = 'F'
INSERT INTO #RontottTanulok (TanuloId)
SELECT DISTINCT
fht.TanuloId
FROM #FHhozTartozoTanulok fht
INNER JOIN #TanuloAtlagok ta ON ta.TanuloId = fht.TanuloId
WHERE (ta.AktualisAtlag+1.1) <= ta.KorabbiAtlag
SELECT
fht.TanuloId
,fht.Evfolyam
,fht.Neme
,fht.TanuloNev
,fht.OktatasiAzonosito
,fht.TanuloOsztalyNev
,fht.TanuloOsztalyId
,IIF(kozepes.TanuloId IS NULL, 0, 1)
,IIF(rontott.TanuloId IS NULL, 0, 1)
FROM #FHhozTartozoTanulok fht
LEFT JOIN #KozepesAlattiTanulok kozepes ON kozepes.TanuloId = fht.TanuloId
LEFT JOIN #RontottTanulok rontott ON rontott.TanuloId = fht.TanuloId
WHERE (kozepes.TanuloId IS NOT NULL OR rontott.TanuloId IS NOT NULL)
END
GO