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

View File

@@ -0,0 +1,220 @@
DROP FUNCTION IF EXISTS fnGetLemorzsolodottTanulokByFelhely
GO
CREATE FUNCTION [dbo].[fnGetLemorzsolodottTanulokByFelhely] (@feladatEllatasiHelyId int, @tanevId int, @isFelevi int)
RETURNS @FHHozTartozoTanulok TABLE(
TanuloId int
,Evfolyam int
,Neme int
,TanuloNev nvarchar(510)
,OktatasiAzonosito nvarchar(11)
,OsztalyNev nvarchar(510)
,OsztalyId int
,KozepesMiatt bit
,RontottMiatt bit
)
AS
BEGIN
DECLARE @Tanulok TABLE(
TanuloId int PRIMARY KEY
,EvFolyam int
,Neme int
,NyomtatasiNev nvarchar(510)
,OktatasiAzonosito nvarchar(11)
,OsztalyNev nvarchar(510)
,OsztalyId int
)
DECLARE @Osztalyzatok TABLE(
Id int PRIMARY KEY
,Ertek float
)
DECLARE @TanuloAtlagok TABLE(
TanuloId int PRIMARY KEY
,AktualisAtlag float
,KorabbiAtlag float
)
DECLARE @KozepesAlattiTanulok TABLE(
TanuloId int PRIMARY KEY
)
DECLARE @RontottTanulok TABLE(
TanuloId int PRIMARY KEY
)
DECLARE @MuvCsoportTip TABLE(
CsoptipId int PRIMARY KEY
)
DECLARE @EslTantargyak TABLE(
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 @Tanulok /*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 >= tcs.C_BELEPESDATUM AND (@BesorolasiDatum < tcs.C_KILEPESDATUM OR tcs.C_KILEPESDATUM IS NULL)
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 --Nappali rendszerű iskolai oktatás
AND C_EVFOLYAMTIPUSA IN (7366,6909,6912,6913,6908,6910,6911) --1-4 évfolyamok és összevont osztály
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 >= tcs.C_BELEPESDATUM AND (@BesorolasiDatum < tcs.C_KILEPESDATUM OR tcs.C_KILEPESDATUM IS NULL)
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 @Tanulok 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 @Tanulok 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 @Tanulok 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 @Tanulok fht
INNER JOIN @TanuloAtlagok ta ON ta.TanuloId = fht.TanuloId
WHERE (ta.AktualisAtlag+1.1) <= ta.KorabbiAtlag
INSERT INTO @FhHozTartozoTanulok
SELECT
fht.TanuloId
,fht.Evfolyam
,fht.Neme
,fht.NyomtatasiNev
,fht.OktatasiAzonosito
,fht.Osztalynev
,fht.OsztalyId
,IIF(kozepes.TanuloId IS NULL, 0, 1)
,IIF(rontott.TanuloId IS NULL, 0, 1)
FROM @Tanulok 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)
RETURN
END
GO

View File

@@ -0,0 +1,632 @@
DROP PROCEDURE IF EXISTS sp_ExportEsl_A03T01_1
GO
CREATE PROCEDURE [dbo].[sp_ExportEsl_A03T01_1]
@tanevId int
,@feladatEllatasiHelyId int
,@isFelevi int = 0
AS
BEGIN
SET NOCOUNT ON;
--Táblák deklarálása
CREATE TABLE #Tanulok (
TanuloNev nvarchar(1024)
,Neme int
,Evfolyam int
,Kategoria nvarchar(500)
)
CREATE TABLE #TanulokOsszes (
Kategoria nvarchar(500)
,Osszes int
,OsszesLany int
)
CREATE TABLE #TanuloErtekeles (
Id int
,Tanulo int
,Ertekeles int
,Tipus int
)
CREATE TABLE #ErintettTanulok (
Evfolyam int
,TanuloId int
,Neme int
,TanuloNev nvarchar(255)
,Oktatasiazonosito nvarchar(11)
,TanuloOsztalyNev nvarchar(255)
,IsKozepesMiatt int
,IsRontasMiatt int
,TanuloOsztalyId int
,INDEX IX_01 (TanuloId)
)
CREATE TABLE #KetFeltetelTanulok (
TanuloId int
,Evfolyam int
,Neme int
,TanuloNev nvarchar(510)
,OktatasiAzonosito nvarchar(11)
,TanuloOsztalyNev nvarchar(255)
,IsHianyzasMiatt int
,IsKiemeltMiatt int
,IsGyermekVedelemMiatt int
,IsAltalanosIskolaMiatt int
)
CREATE TABLE #Kategoria(
KategoriaNev nvarchar(500)
,Sorrend int
)
CREATE TABLE #IntezmenyEvfolyamok(
ID int
,EvfolyamNev nvarchar(510)
)
INSERT INTO #Kategoria( --Egyszerűbb így, hogy meglegyen minden kategória a végén, sorrenddel együtt, akkor is, ha nincs hozzá elem
KategoriaNev
,Sorrend
) VALUES
('Osszesen',1)
,('Lany',2)
,('AFelevErtekelesenelMinositesenelATanuloEgyTizedesjegyigSzamitottTanulmanyiAtlagaAMagatartasEsSzorgalomErtekelesetMinositesetNemBeleszamitvaNemEriElKozepes3Szintet',3)
,('AzEvVegiJegyekAlapjanAFeleviJegyekhezKepestLegalabb11NyiAtlagotRontoTanulokSzama',4)
,('AFelevErtekelesenelMinositesenelATanuloEgyVagyTobbTantargybolElegtelen1OsztalyzatotKapott',5)
,('AFelevMagatartasanakErtekelesenelMinositesenelATanuloRossz2ErtekelestKapott',6)
,('AFelevSzorgalmanakErtekelesenelMinositesenelATanuloHanyag2ErtekelestKapott',7)
,('AzAdottTanitasiEvbenEvismetlesreKotelezett',8)
,('AFelevbenATanulo50OratMeghaladoHianyzassalRendelkezik',9)
,('AFelevbenSzuloiKeresreMagantanulovaValtTanulo',10)
,('AFelevbenMenekultOltalmazottMenedekesTanulokSzama',11)
,('AFelevbenVeszelyezeztetteValtTanulokSzama',12)
,('AFelevbenIdeiglenesHatallyalElhelyezettVagyNevelesbeVettTanulokSzama',13)
,('KettoFeltetelTelejesuleseEsetenLemorzsolodassalVeszelyeztetettTanulo',14)
,('EbbolAFelevben100OratEleroIgazoltHianyzassalRendelkezoTanulokSzama',15)
,('EbbolKiemeltFigyelmetIgenyloTanulokSzamaAKiemeltenTehetsegesTanulokKivetelevel',16)
,('EbbolRendszeresGyermekvedelmiKedvezmenybenReszesuloTanulokSzama',17)
,('EbbolAlapfokuOktatasbanBetoltotteA16Eletevet',18)
DECLARE @FelevKezdete DATETIME= (
SELECT C_DATUM + IIF(@isFelevi = 1, 0, 1)
FROM T_TANEVRENDJE_OSSZES tr
WHERE C_NAPTIPUSA = IIF(@isFelevi = 1, 1394, 1400)
AND C_TANEVID = @tanevid
AND TOROLT = 'F'
)
DECLARE @FelevVege DATETIME= (
SELECT C_DATUM + 1
FROM T_TANEVRENDJE tr
WHERE C_NAPTIPUSA = IIF(@isFelevi = 1, 1400, 1395)
AND C_TANEVID=@tanevid
AND TOROLT='F')
DECLARE @ertekelesTipus int=IIF(@isFelevi=1,1519,1520)
DECLARE @osszesDb int
DECLARE @cols nvarchar(max)
INSERT INTO #IntezmenyEvfolyamok(
Id
,Evfolyamnev
)
SELECT DISTINCT
dib.ID
,dib.C_NAME
FROM T_OSZTALYCSOPORT ocs
INNER JOIN T_DICTIONARYITEMBASE dib ON dib.ID = ocs.C_EVFOLYAMTIPUSA AND dib.ID NOT IN(1303,1304,1305,1306,7366)--1-4 évfolyamok és összevont osztály
INNER JOIN T_OSZTALY o ON o.ID = ocs.ID
WHERE ocs.C_FELADATELLATASIHELYID = @feladatEllatasiHelyId AND ocs.C_KEPZESIFORMA = 1096 --Nappali rendszerű iskolai oktatás
UNION
SELECT DISTINCT
dib.ID
,dib.C_NAME
FROM T_TANULOTANUGYIADATOK tta
INNER JOIN T_TANULOCSOPORT tcs ON tcs.ID = tta.C_TANULOCSOPORTID
INNER JOIN T_OSZTALYCSOPORT ocs ON ocs.ID = tcs.C_OSZTALYCSOPORTID AND ocs.C_FELADATELLATASIHELYID = @feladatEllatasiHelyId
AND ocs.C_KEPZESIFORMA = 1096 --Nappali rendszerű iskolai oktatás
INNER JOIN T_OSZTALY o ON o.ID = ocs.ID
INNER JOIN T_DICTIONARYITEMBASE dib ON dib.ID = tta.C_TANULOEVFOLYAMTIPUSID
WHERE tta.C_TANULOEVFOLYAMTIPUSID NOT IN (1303,1304,1305,1306,7366) --1-4 évfolyamok és összevont osztály
SET @cols =
STUFF((SELECT ',' + QUOTENAME(Evfolyamnev)
FROM #IntezmenyEvfolyamok
ORDER BY ID
FOR XML PATH('')),1,1,'')
INSERT INTO #ErintettTanulok (
TanuloId
,Evfolyam
,Neme
,TanuloNev
,OktatasiAzonosito
,TanuloOsztalyNev
,TanuloOsztalyId
,IsKozepesMiatt
,IsRontasMiatt
)
SELECT * FROM fnGetLemorzsolodottTanulokByFelhely (@feladatEllatasiHelyId, @tanevId, @isFelevi)
INSERT INTO #TanuloErtekeles
SELECT
te.ID
,C_TANULOID
,C_ERTEKELESOSZTALYZATID
,C_TIPUSID
FROM T_TANULOERTEKELES te
INNER JOIN #ErintettTanulok fht ON fht.TanuloId=te.C_TANULOID
INNER JOIN T_TANTARGY tgy ON tgy.ID = te.C_TANTARGYID AND tgy.C_ESLTANTARGYKATEGORIAID IS NOT NULL
WHERE te.C_TIPUSID=@ertekelesTipus
DECLARE @Kategoria nvarchar(500)
----------------------------------------------------------------------
-- PRINT '1'
----------------------------------------------------------------------
-- Összes
----------------------------------------------------------------------
SET @Kategoria = 'Osszesen'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok
----------------------------------------------------------------------
-- PRINT '2'
----------------------------------------------------------------------
-- Lány
----------------------------------------------------------------------
SET @Kategoria = 'Lany'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok
WHERE Neme = 5
----------------------------------------------------------------------
-- PRINT '3'
----------------------------------------------------------------------
-- Összes rontott
----------------------------------------------------------------------
SET @Kategoria = 'AFelevErtekelesenelMinositesenelATanuloEgyTizedesjegyigSzamitottTanulmanyiAtlagaAMagatartasEsSzorgalomErtekelesetMinositesetNemBeleszamitvaNemEriElKozepes3Szintet'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok
WHERE IsKozepesMiatt = 1
----------------------------------------------------------------------
-- PRINT '4'
----------------------------------------------------------------------
-- Legalább 1.1-et rontott
----------------------------------------------------------------------
SET @Kategoria = 'AzEvVegiJegyekAlapjanAFeleviJegyekhezKepestLegalabb11NyiAtlagotRontoTanulokSzama'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok
WHERE IsRontasMiatt = 1
----------------------------------------------------------------------
-- PRINT '5'
----------------------------------------------------------------------
-- egy, vagy több tantárgyból elégtelen osztályzat
----------------------------------------------------------------------
SET @Kategoria = 'AFelevErtekelesenelMinositesenelATanuloEgyVagyTobbTantargybolElegtelen1OsztalyzatotKapott'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #TanuloErtekeles te
INNER JOIN #ErintettTanulok fht ON fht.TanuloId=te.Tanulo
WHERE te.Tipus = @ertekelesTipus AND te.Ertekeles = 1501
----------------------------------------------------------------------
-- PRINT '6'
----------------------------------------------------------------------
-- félév, magatartás, 2
----------------------------------------------------------------------
SET @Kategoria = 'AFelevMagatartasanakErtekelesenelMinositesenelATanuloRossz2ErtekelestKapott'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN T_TANULOERTEKELES te ON te.C_TANULOID=fht.TanuloId AND te.C_ISMAGATARTASSZORGALOM = 'T'
AND (te.C_MAGATARTASERTEKID=1558 OR te.C_MAGATARTASOSZTALYZATID=1502)
----------------------------------------------------------------------
-- PRINT '7'
----------------------------------------------------------------------
-- félév, szorgalom, 2
----------------------------------------------------------------------
SET @Kategoria = 'AFelevSzorgalmanakErtekelesenelMinositesenelATanuloHanyag2ErtekelestKapott'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN T_TANULOERTEKELES te ON te.C_TANULOID=fht.TanuloId AND te.C_ISMAGATARTASSZORGALOM = 'T'
AND (te.C_SZORGALOMERTEKID = 1562 OR te.C_SZORGALOMOSZTALYZATID=1502) AND fht.Neme=5
----------------------------------------------------------------------
-- PRINT '8'
----------------------------------------------------------------------
-- adott évben évismétlés
----------------------------------------------------------------------
SET @Kategoria = 'AzAdottTanitasiEvbenEvismetlesreKotelezett'
IF @isFelevi = 0
BEGIN
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN (
SELECT COUNT(DISTINCT fht.TanuloId) db,fht.TanuloId
FROM #ErintettTanulok fht
INNER JOIN #TanuloErtekeles te ON te.Tanulo=fht.TanuloId AND te.Ertekeles=1501
GROUP BY fht.TanuloId
HAVING COUNT(*)>=4) x ON x.TanuloId = fht.TanuloId
END
----------------------------------------------------------------------
-- PRINT '9'
----------------------------------------------------------------------
-- Félévben 50 órát elérő igazolatlan hiányzás
----------------------------------------------------------------------
SET @Kategoria = 'AFelevbenATanulo50OratMeghaladoHianyzassalRendelkezik'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,fht.Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN (
SELECT fht.TanuloId AS Tanulo FROM T_TANULOMULASZTAS tm
INNER JOIN #ErintettTanulok fht on fht.TanuloId=tm.C_ORATANULOIID
INNER JOIN T_TANITASIORA tao on tao.ID=tm.C_TANITASIORAKID AND tao.C_DATUM >= @FelevKezdete AND tao.C_DATUM<@FelevVege
LEFT JOIN T_CSOPORT cs ON cs.ID = tao.C_OSZTALYCSOPORTID AND cs.C_TIPUSA NOT IN (SELECT ID FROM fnGetTanoraiCeluCsoportTipusok(@tanevId))
WHERE tm.C_IGAZOLT='F' AND cs.ID IS NULL
GROUP BY fht.TanuloId
HAVING COUNT(Tanuloid) > 50) x ON x.Tanulo = fht.TanuloId
----------------------------------------------------------------------
-- PRINT '10'
----------------------------------------------------------------------
-- Szülő kérésére magántanuló
----------------------------------------------------------------------
SET @Kategoria = 'AFelevbenSzuloiKeresreMagantanulovaValtTanulo'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,fht.Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN T_TANULOCSOPORT tcs ON tcs.C_TANULOID=fht.TanuloId AND tcs.C_OSZTALYCSOPORTID=fht.TanuloOsztalyId
INNER JOIN T_TANULOTANUGYIADATOK tta ON tcs.ID=tta.C_TANULOCSOPORTID AND tta.C_MAGANTANULOSAGANAKOKAID IN (663, 664)
----------------------------------------------------------------------
-- PRINT '11'
----------------------------------------------------------------------
-- Menekült, menedékjoggal rendelkező
----------------------------------------------------------------------
SET @Kategoria = 'AFelevbenMenekultOltalmazottMenedekesTanulokSzama'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,fht.Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN T_TANULO t ON t.C_MENEDEKJOGGALRENDELKEZO='T' AND fht.TanuloId=t.ID
----------------------------------------------------------------------
-- PRINT '12'
----------------------------------------------------------------------
-- Félévben veszélyeztetett tanulók száma
----------------------------------------------------------------------
SET @Kategoria = 'AFelevbenVeszelyezeztetteValtTanulokSzama'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,fht.Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN T_TANULO t ON t.ID=fht.TanuloId AND t.C_VESZELYEZTETETT='T'
----------------------------------------------------------------------
-- PRINT '13'
----------------------------------------------------------------------
-- ideiglenes hatállyal elhelyezett vagy nevelésbe vett tanulók
----------------------------------------------------------------------
SET @Kategoria = 'AFelevbenIdeiglenesHatallyalElhelyezettVagyNevelesbeVettTanulokSzama'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,fht.Neme
,Evfolyam
,@Kategoria
FROM #ErintettTanulok fht
INNER JOIN T_TANULO t ON t.C_ALLAMIGONDOZOTT='T' AND fht.TanuloId=t.ID
----------------------------------------------------------------------
-- PRINT '14'
----------------------------------------------------------------------
-- legalább 2 feltétel teljesül
----------------------------------------------------------------------
INSERT INTO #KetFeltetelTanulok
SELECT DISTINCT
ftt.TanuloId
,ftt.Evfolyam
,ftt.Neme
,ftt.TanuloNev
,ftt.OktatasiAzonosito
,ftt.TanuloOsztalyNev
,IIF((SELECT COUNT(1)
FROM T_TANULOMULASZTAS tm
INNER JOIN T_TANITASIORA tno ON tno.ID = tm.C_TANITASIORAKID AND tno.C_DATUM > @FelevKezdete AND tno.C_DATUM < @FelevVege
LEFT JOIN T_CSOPORT cs ON cs.ID = tno.C_OSZTALYCSOPORTID
WHERE (cs.ID IS NULL OR cs.C_TIPUSA IN (SELECT ID FROM fnGetTanoraiCeluCsoportTipusok(@tanevId))) AND tm.C_IGAZOLT='T' AND tm.C_TIPUS = 1500 AND tm.C_ORATANULOIID = ftt.TanuloId) > 100, 1, 0) AS IsHianyzasMiatt
,IIF((SELECT COUNT(1)
FROM T_TANULO t
WHERE t.ID = ftt.TanuloId
AND (t.C_SAJATOSNEVELESU='T' OR t.C_BTMPROBLEMAS='T' OR t.C_HATRANYOSHELYZETU IN (1122, 1123))) > 0, 1, 0) AS IsKiemeltMiatt
,IIF((SELECT COUNT(1)
FROM T_TANULO t
WHERE t.ID = ftt.TanuloId
AND t.C_RENDSZERESGYERMEKVEDELMIKEDV IS NOT NULL) > 0, 1, 0) AS IsGyermekVedelemMiatt
,IIF((SELECT COUNT(1)
FROM T_FELHASZNALO t
INNER JOIN T_TANULOCSOPORT tcs ON tcs.C_TANULOID=t.ID
INNER JOIN T_OSZTALYCSOPORT ocs ON ocs.ID=tcs.C_OSZTALYCSOPORTID
INNER JOIN T_TANULOTANUGYIADATOK tta ON tta.C_TANULOCSOPORTID = tcs.ID AND tta.C_ISESL16EVESUTANBELEPETT = 'T'
INNER JOIN T_FELADATELLATASIHELY fh ON fh.ID=ocs.C_FELADATELLATASIHELYID AND fh.C_OKTATASINEVELESIFELADATTIPUS IN (1158,1178)
AND fh.ID = @feladatEllatasiHelyId
WHERE t.ID = ftt.TanuloId) > 0, 1, 0) AS IsAltalanosIskolaMiatt
FROM #ErintettTanulok ftt
DELETE kt FROM #KetFeltetelTanulok kt WHERE (kt.IsHianyzasMiatt + kt.IsKiemeltMiatt + kt.IsGyermekVedelemMiatt + kt.IsAltalanosIskolaMiatt) < 2
SET @Kategoria = 'KettoFeltetelTelejesuleseEsetenLemorzsolodassalVeszelyeztetettTanulo'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,Neme
,Evfolyam
,@Kategoria
FROM #KetFeltetelTanulok
----------------------------------------------------------------------
-- PRINT '15'
----------------------------------------------------------------------
-- kettő feltétel esetén ... félévben 100 órát elért igazolt hiányzás
----------------------------------------------------------------------
SET @Kategoria = 'EbbolAFelevben100OratEleroIgazoltHianyzassalRendelkezoTanulokSzama'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,kt.Neme
,Evfolyam
,@Kategoria
FROM #KetFeltetelTanulok kt
WHERE kt.IsHianyzasMiatt = 1
----------------------------------------------------------------------
-- PRINT '16'
----------------------------------------------------------------------
-- kettő feltétel ... kiemelet figyelmet igénylő --sni, btmn, hh, 3h
----------------------------------------------------------------------
SET @Kategoria = 'EbbolKiemeltFigyelmetIgenyloTanulokSzamaAKiemeltenTehetsegesTanulokKivetelevel'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,kt.Neme
,Evfolyam
,@Kategoria
FROM #KetFeltetelTanulok kt
WHERE kt.IsKiemeltMiatt = 1
----------------------------------------------------------------------
-- PRINT '17'
----------------------------------------------------------------------
-- kettő feltétel ... --rendszeres gyermekvédelmi támogatás
----------------------------------------------------------------------
SET @Kategoria = 'EbbolRendszeresGyermekvedelmiKedvezmenybenReszesuloTanulokSzama'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,kt.Neme
,Evfolyam
,@Kategoria
FROM #KetFeltetelTanulok kt
WHERE kt.IsGyermekVedelemMiatt = 1
----------------------------------------------------------------------
-- PRINT '18'
----------------------------------------------------------------------
-- kettő feltétel ... alapfokú oktatásban 16
----------------------------------------------------------------------
SET @Kategoria = 'EbbolAlapfokuOktatasbanBetoltotteA16Eletevet'
INSERT INTO #Tanulok(
TanuloNev
,Neme
,Evfolyam
,Kategoria
) SELECT DISTINCT
TanuloNev + ' - ' + OktatasiAzonosito + '; ' + TanuloOsztalyNev
,kt.Neme
,Evfolyam
,@Kategoria
FROM #KetFeltetelTanulok kt
WHERE kt.IsAltalanosIskolaMiatt = 1
INSERT INTO #TanulokOsszes(
Kategoria
,Osszes
,OsszesLany
) SELECT
Kategoria
,COUNT(TanuloNev)
,SUM(IIF(Neme = 5,1,0))
FROM #Tanulok
GROUP BY Kategoria
DECLARE @query nvarchar(max)
set @query =
'SELECT
KategoriaNev
,Sorrend
,rn
,' + @cols + '
,Osszes
,OsszesLany
INTO #RetTable
FROM (
SELECT
k.KategoriaNev
,t.TanuloNev
,ROW_NUMBER() OVER (PARTITION BY t.Kategoria,t.Evfolyam ORDER BY t.TanuloNev) rn
,dib.C_NAME as Evfolyam
,k.Sorrend
,Ossz.Osszes
,Ossz.OsszesLany
FROM #Kategoria k
LEFT JOIN #Tanulok t ON t.Kategoria = k.KategoriaNev
LEFT JOIN T_DICTIONARYITEMBASE dib ON dib.ID = t.Evfolyam
LEFT JOIN #TanulokOsszes ossz ON ossz.Kategoria = k.KategoriaNev
) x
PIVOT (
MIN(TanuloNev)
FOR Evfolyam IN (' + @cols + ')
) p
SELECT
KategoriaNev as Leiras
,'+@cols+'
,Osszes as Összesen
,OsszesLany as Lány
FROM #RetTable
ORDER BY Sorrend,rn'
EXEC sp_executesql @query
END
GO