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,104 @@
DROP PROCEDURE IF EXISTS uspGetTanuloErtekelesDataSetByMagatartasSzorgalom
GO
CREATE PROCEDURE uspGetTanuloErtekelesDataSetByMagatartasSzorgalom
@pTanevId int
,@pTanarId int
,@pOsztalyCsoportId int
,@pDatum date = NULL
AS
BEGIN
SET NOCOUNT ON;
DECLARE @kategoriaId int = (SELECT C_FELADATKATEGORIAID FROM T_OSZTALYCSOPORT_OSSZES WHERE ID = @pOsztalyCsoportId)
IF @pDatum IS NULL
SET @pDatum = CONVERT(date, GETDATE())
CREATE TABLE #TanuloOsztalyEvfolyamTipusIdList (
TanuloId int PRIMARY KEY
,EvfolyamTipusId int
)
INSERT INTO #TanuloOsztalyEvfolyamTipusIdList (
TanuloId
,EvfolyamTipusId
)
SELECT
tanuloOsztalyList.C_TANULOID AS TanuloId
,tanuloOsztalyList.C_EVFOLYAMTIPUSA AS EvfolyamTipusId
FROM fnGetOsztalyCsoportTanuloOsztalyList(@pTanevId, @pOsztalyCsoportId, @pDatum) tanuloOsztalyList
SELECT
FelhasznaloTanulo.ID AS TanuloId
,NULL AS TantargyId
,FelhasznaloTanulo.C_NYOMTATASINEV AS TanuloNev
,IIF(FelhasznaloTanulo.C_NEVSORREND = 'T', FelhasznaloTanulo.C_UTONEV + ' ' + FelhasznaloTanulo.C_VEZETEKNEV, FelhasznaloTanulo.C_VEZETEKNEV + ' ' + FelhasznaloTanulo.C_UTONEV) AS TanuloNevElotagNelkul
,FelhasznaloTanulo.C_ANYJANEVE AS AnyjaNeve
,FelhasznaloTanulo.C_SZULETESIDATUM AS SzuletesiIdo
,OsztalyCsoport.ID AS OsztalyId
,OsztalyCsoport.C_NEV AS OsztalyNev
,TanuloErtekeles.ID AS ID
,TanuloErtekeles.C_DATUM AS Datum
,TanuloErtekeles.C_ROGZITESDATUM AS RogzitesDatum
,TanuloErtekeles.C_TIPUSID AS TipusId
,TanuloErtekeles.C_NYOMTATASINEV AS ErtekeloNyomtatasiNev
,IIF(TanuloErtekeles.C_ERTEKELOID = @pTanarId,'T','F') AS Modosithato
,TanuloErtekeles.C_ROGZITESDATUM AS Created
,TanuloErtekeles.C_ISMAGATARTASSZORGALOM AS IsMagatartasSzorgalom
,TanuloErtekeles.C_ISERTESITESELKULDVE AS IsErtesitesElkuldve
,TanuloErtekeles.C_MAGATARTASOSZTALYZATID AS MagatartasOsztalyzatId
,TanuloErtekeles.C_MAGATARTASSZOVEG AS MagatartasSzoveg
,TanuloErtekeles.C_MAGATARTASSZOVEGROVIDNEV AS MagatartasSzovegRovidNev
,TanuloErtekeles.C_MAGATARTASERTEKID AS MagatartasErtekId
,TanuloErtekeles.C_SZORGALOMOSZTALYZATID AS SzorgalomOsztalyzatId
,TanuloErtekeles.C_SZORGALOMSZOVEG AS SzorgalomSzoveg
,TanuloErtekeles.C_SZORGALOMSZOVEGROVIDNEV AS SzorgalomSzovegRovidNev
,TanuloErtekeles.C_SZORGALOMERTEKID AS SzorgalomErtekId
FROM T_TANULOCSOPORT_OSSZES TanuloCsoport
INNER JOIN T_TANEV_OSSZES Tanev ON Tanev.ID = TanuloCsoport.C_TANEVID AND Tanev.TOROLT = 'F'
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloTanulo ON FelhasznaloTanulo.TOROLT = 'F' AND FelhasznaloTanulo.ID = TanuloCsoport.C_TANULOID
AND FelhasznaloTanulo.C_TANEVID = TanuloCsoport.C_TANEVID
INNER JOIN T_OSZTALYCSOPORT_OSSZES OsztalyCsoport ON OsztalyCsoport.TOROLT = 'F' AND OsztalyCsoport.ID = TanuloCsoport.C_OSZTALYCSOPORTID
AND OsztalyCsoport.C_TANEVID = TanuloCsoport.C_TANEVID
LEFT JOIN (
SELECT
TanuloErtekeles.*
,FelhasznaloErtekelo.C_NYOMTATASINEV
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.TOROLT = 'F' AND Osztaly.ID = TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID
AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.C_FELADATKATEGORIAID = @kategoriaId
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloErtekelo ON FelhasznaloErtekelo.TOROLT = 'F' AND FelhasznaloErtekelo.ID = TanuloErtekeles.C_ERTEKELOID
AND FelhasznaloErtekelo.C_TANEVID = TanuloErtekeles.C_TANEVID
INNER JOIN #TanuloOsztalyEvfolyamTipusIdList Evfolyam ON Evfolyam.TanuloId = TanuloErtekeles.C_TANULOID AND Evfolyam.EvfolyamTipusId = Osztaly.C_EVFOLYAMTIPUSA
WHERE TanuloErtekeles.TOROLT = 'F'
AND (TanuloErtekeles.C_TANTARGYID IS NULL OR TanuloErtekeles.C_ISMAGATARTASSZORGALOM = 'T')
AND TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NOT NULL
UNION
SELECT
TanuloErtekeles.*
,FelhasznaloErtekelo.C_NYOMTATASINEV
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.TOROLT = 'F' AND Osztaly.ID = TanuloErtekeles.C_OSZTALYCSOPORTID
AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.C_FELADATKATEGORIAID = @kategoriaId
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloErtekelo ON FelhasznaloErtekelo.TOROLT = 'F' AND FelhasznaloErtekelo.ID = TanuloErtekeles.C_ERTEKELOID
AND FelhasznaloErtekelo.C_TANEVID = TanuloErtekeles.C_TANEVID
INNER JOIN #TanuloOsztalyEvfolyamTipusIdList Evfolyam ON Evfolyam.TanuloId = TanuloErtekeles.C_TANULOID AND Evfolyam.EvfolyamTipusId = Osztaly.C_EVFOLYAMTIPUSA
WHERE TanuloErtekeles.TOROLT = 'F'
AND (TanuloErtekeles.C_TANTARGYID IS NULL OR TanuloErtekeles.C_ISMAGATARTASSZORGALOM = 'T')
AND TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NULL
) AS TanuloErtekeles ON TanuloErtekeles.C_TANULOID = TanuloCsoport.C_TANULOID AND TanuloErtekeles.C_OSZTALYCSOPORTID = OsztalyCsoport.ID
WHERE TanuloCsoport.TOROLT = 'F'
AND TanuloCsoport.C_TANEVID = @pTanevId
AND TanuloCsoport.C_OSZTALYCSOPORTID = @pOsztalyCsoportId
AND TanuloCsoport.C_BELEPESDATUM <= @pDatum
AND (TanuloCsoport.C_KILEPESDATUM > @pDatum OR TanuloCsoport.C_KILEPESDATUM IS NULL OR TanuloCsoport.C_KILEPESDATUM >= Tanev.C_UTOLSOTANITASINAP)
END
GO

View file

@ -0,0 +1,141 @@
DROP PROCEDURE IF EXISTS uspGetTanuloErtekelesDataSetByTantargy
GO
CREATE PROCEDURE uspGetTanuloErtekelesDataSetByTantargy
@pTanevId int
,@pTanarId int
,@pTantargyId int
,@pOsztalyCsoportId int
,@pDatum date = NULL
AS
BEGIN
SET NOCOUNT ON;
IF @pDatum IS NULL
SET @pDatum = CONVERT(date, GETDATE())
DECLARE @kategoriaId int = (SELECT C_FELADATKATEGORIAID FROM T_OSZTALYCSOPORT_OSSZES WHERE ID = @pOsztalyCsoportId)
CREATE TABLE #TanuloOsztalyEvfolyamTipusIdList (
TanuloId int PRIMARY KEY
,EvfolyamTipusId int
)
CREATE TABLE #Mentessegek (
TanuloId int
,C_MENTESSEGOKA nvarchar (max)
,C_ERTEKELESMENTESITES char (1)
,C_SZOVEGESENERTEKELHETO char (1)
,rn int
)
INSERT INTO #TanuloOsztalyEvfolyamTipusIdList (
TanuloId
,EvfolyamTipusId
)
SELECT
tanuloOsztalyList.C_TANULOID AS TanuloId
,tanuloOsztalyList.C_EVFOLYAMTIPUSA AS EvfolyamTipusId
FROM fnGetOsztalyCsoportTanuloOsztalyList(@pTanevId, @pOsztalyCsoportId, @pDatum) tanuloOsztalyList
INSERT INTO #Mentessegek (
TanuloId
,C_MENTESSEGOKA
,C_ERTEKELESMENTESITES
,C_SZOVEGESENERTEKELHETO
,rn
)
SELECT
TanuloMentesseg.C_TANULOID
,TanuloMentesseg.C_MENTESSEGOKA
,TanuloMentesseg.C_ERTEKELESMENTESITES
,TanuloMentesseg.C_SZOVEGESENERTEKELHETO
,ROW_NUMBER() OVER (PARTITION BY TanuloMentesseg.C_TANULOID ORDER BY TanuloMentesseg.C_KEZDETE DESC) rn
FROM T_TANULOMENTESSEG_OSSZES TanuloMentesseg
WHERE TanuloMentesseg.TOROLT = 'F'
AND TanuloMentesseg.C_TANEVID = @pTanevId
AND TanuloMentesseg.C_TANTARGYID = @pTantargyId
AND ((TanuloMentesseg.C_KEZDETE IS NULL OR TanuloMentesseg.C_KEZDETE <= @pDatum) AND (TanuloMentesseg.C_VEGE IS NULL OR TanuloMentesseg.C_VEGE <= @pDatum))
SELECT
FelhasznaloTanulo.ID AS TanuloId
,@pTantargyId AS TantargyId
,FelhasznaloTanulo.C_NYOMTATASINEV AS TanuloNev
,IIF(FelhasznaloTanulo.C_NEVSORREND = 'T', FelhasznaloTanulo.C_UTONEV + ' '+ FelhasznaloTanulo.C_VEZETEKNEV, FelhasznaloTanulo.C_VEZETEKNEV + ' ' + FelhasznaloTanulo.C_UTONEV) AS TanuloNevElotagNelkul
,FelhasznaloTanulo.C_ANYJANEVE AS AnyjaNeve
,FelhasznaloTanulo.C_SZULETESIDATUM AS SzuletesiIdo
,OsztalyCsoport.ID AS OsztalyId
,OsztalyCsoport.C_NEV AS OsztalyNev
,TanuloMentesseg.C_MENTESSEGOKA AS MentessegOka
,TanuloMentesseg.C_ERTEKELESMENTESITES AS ErtkelesMentesseg
,TanuloMentesseg.C_SZOVEGESENERTEKELHETO AS SzovegesenErtekelheto
,TanuloErtekeles.ID AS ID
,TanuloErtekeles.C_DATUM AS Datum
,TanuloErtekeles.C_ROGZITESDATUM AS RogzitesDatum
,TanuloErtekeles.C_TIPUSID AS TipusId
,TanuloErtekeles.C_NYOMTATASINEV AS ErtekeloNyomtatasiNev
,IIF(TanuloErtekeles.C_ERTEKELOID = @pTanarId,'T','F') AS Modosithato
,TanuloErtekeles.C_ROGZITESDATUM AS Created
,TanuloErtekeles.C_ISMAGATARTASSZORGALOM AS IsMagatartasSzorgalom
,TanuloErtekeles.C_ISERTESITESELKULDVE AS IsErtesitesElkuldve
,TanuloErtekeles.C_ERTEKELESOSZTALYZATID AS ErtekelesOsztalyzatId
,TanariAtlagSuly.C_SULY AS Suly
,TanuloErtekeles.C_ERTEKELESSZOVEG AS ErtekelesSzoveg
,TanuloErtekeles.C_ERTEKELESSZOVEGROVIDNEV AS ErtekelesSzovegRovidNev
,TanuloErtekeles.C_ERTEKELESSZAZALEK AS ErtekelesSzazalek
,TanuloErtekeles.C_ERTEKELESMODID AS ErtekelesModId
,TanuloErtekeles.C_ERTEKELESTEMA AS ErtekelesTema
FROM T_TANULOCSOPORT_OSSZES TanuloCsoport
INNER JOIN T_TANEV_OSSZES Tanev ON Tanev.ID = TanuloCsoport.C_TANEVID AND Tanev.TOROLT = 'F'
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloTanulo ON FelhasznaloTanulo.TOROLT = 'F' AND FelhasznaloTanulo.ID = TanuloCsoport.C_TANULOID
AND FelhasznaloTanulo.C_TANEVID = TanuloCsoport.C_TANEVID
INNER JOIN T_OSZTALYCSOPORT_OSSZES OsztalyCsoport ON OsztalyCsoport.TOROLT = 'F' AND OsztalyCsoport.ID = TanuloCsoport.C_OSZTALYCSOPORTID
AND OsztalyCsoport.C_TANEVID = TanuloCsoport.C_TANEVID
LEFT JOIN (
SELECT
TanuloErtekeles.*
,FelhasznaloErtekelo.C_NYOMTATASINEV
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.TOROLT = 'F' AND Osztaly.ID = TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID
AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.C_FELADATKATEGORIAID = @kategoriaId
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloErtekelo ON FelhasznaloErtekelo.TOROLT = 'F' AND FelhasznaloErtekelo.ID = TanuloErtekeles.C_ERTEKELOID
AND FelhasznaloErtekelo.C_TANEVID = TanuloErtekeles.C_TANEVID
INNER JOIN #TanuloOsztalyEvfolyamTipusIdList Evfolyam ON Evfolyam.TanuloId = TanuloErtekeles.C_TANULOID AND Evfolyam.EvfolyamTipusId = Osztaly.C_EVFOLYAMTIPUSA
WHERE TanuloErtekeles.TOROLT = 'F'
AND TanuloErtekeles.C_TANTARGYID = @pTantargyId
AND TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NOT NULL
AND TanuloErtekeles.C_ISMAGATARTASSZORGALOM = 'F'
AND TanuloErtekeles.C_ERTEKELESOSZTALYZATID IS NOT NULL
UNION
SELECT
TanuloErtekeles.*
,FelhasznaloErtekelo.C_NYOMTATASINEV
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.TOROLT = 'F' AND Osztaly.ID = TanuloErtekeles.C_OSZTALYCSOPORTID
AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.C_FELADATKATEGORIAID = @kategoriaId
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloErtekelo ON FelhasznaloErtekelo.TOROLT = 'F' AND FelhasznaloErtekelo.ID = TanuloErtekeles.C_ERTEKELOID
AND FelhasznaloErtekelo.C_TANEVID = TanuloErtekeles.C_TANEVID
INNER JOIN #TanuloOsztalyEvfolyamTipusIdList Evfolyam ON Evfolyam.TanuloId = TanuloErtekeles.C_TANULOID AND Evfolyam.EvfolyamTipusId = Osztaly.C_EVFOLYAMTIPUSA
WHERE TanuloErtekeles.TOROLT = 'F'
AND TanuloErtekeles.C_TANTARGYID = @pTantargyId
AND TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NULL
AND TanuloErtekeles.C_ISMAGATARTASSZORGALOM = 'F'
AND TanuloErtekeles.C_ERTEKELESOSZTALYZATID IS NOT NULL
) AS TanuloErtekeles ON TanuloErtekeles.C_TANULOID = TanuloCsoport.C_TANULOID
LEFT JOIN T_TANARIATLAGSULY_OSSZES TanariAtlagSuly ON TanariAtlagSuly.TOROLT = 'F' AND TanariAtlagSuly.C_TANEVID = TanuloCsoport.C_TANEVID
AND TanariAtlagSuly.C_ERTEKELESMODID = TanuloErtekeles.C_ERTEKELESMODID
LEFT JOIN #Mentessegek TanuloMentesseg ON TanuloMentesseg.TanuloId = FelhasznaloTanulo.ID AND TanuloMentesseg.rn = 1
WHERE TanuloCsoport.TOROLT = 'F'
AND TanuloCsoport.C_TANEVID = @pTanevId
AND TanuloCsoport.C_OSZTALYCSOPORTID = @pOsztalyCsoportId
AND TanuloCsoport.C_BELEPESDATUM <= @pDatum
AND (TanuloCsoport.C_KILEPESDATUM > @pDatum OR TanuloCsoport.C_KILEPESDATUM IS NULL OR TanuloCsoport.C_KILEPESDATUM >= Tanev.C_UTOLSOTANITASINAP)
END
GO

View file

@ -0,0 +1,300 @@
DROP PROCEDURE IF EXISTS uspGetTanuloErtekelesDataSetByTanulo
GO
CREATE PROCEDURE uspGetTanuloErtekelesDataSetByTanulo
@pIntezmenyId int
,@pTanevId int
,@pTanarId int
,@pTanuloId int
,@pDatum date = NULL
,@pAmiKategoriaId int
,@pFeladatKategoriaId int = NULL
,@pKiiratkozottNeJelenjenMeg bit = 1
,@pOsztalyCsoportId int = NULL
AS BEGIN
SET NOCOUNT ON;
DECLARE
@evfolyamTipusId int
,@sql nvarchar (max)
IF @pDatum IS NULL
SET @pDatum = CONVERT(date, GETDATE())
SELECT TOP (1)
@evfolyamTipusId = tanuloOsztaly.EvfolyamTipusId
FROM fnGetTanuloOsztaly(@pTanuloId, @pDatum, @pFeladatKategoriaId, @pKiiratkozottNeJelenjenMeg) tanuloOsztaly
ORDER BY tanuloOsztaly.BelepesDatuma DESC
SET @sql = N'
CREATE TABLE #KapcsopodoTantargyak (
ID int
,C_FOTARGYID int
,C_NEV nvarchar (255)
,C_TARGYKATEGORIA int
,C_TANEVID int
)
CREATE TABLE #Tantargyak (
ID int
,C_FOTARGYID int
,C_NEV nvarchar (255)
,C_TARGYKATEGORIA int
,C_TANEVID int
)
INSERT INTO #KapcsopodoTantargyak (
ID
,C_FOTARGYID
,C_NEV
,C_TARGYKATEGORIA
,C_TANEVID
)
SELECT
kapcsolodoTargy.ID
,kapcsolodoTargy.C_FOTARGYID
,kapcsolodoTargy.C_NEV
,kapcsolodoTargy.C_TARGYKATEGORIA
,kapcsolodoTargy.C_TANEVID
FROM fnGetKapcsolodoTantargyak(@pIntezmenyId, @pTanevId, NULL) kapcsolodoTargy
CREATE TABLE #OsztalyCsoportIdList (
ID int PRIMARY KEY
)
INSERT INTO #OsztalyCsoportIdList (
ID
)
SELECT DISTINCT
OsztalyCsoport.ID
FROM T_TANULOCSOPORT_OSSZES TanuloCsoport
INNER JOIN T_OSZTALY_OSSZES Osztaly ON Osztaly.ID = TanuloCsoport.C_OSZTALYCSOPORTID AND Osztaly.C_ALTANEVID = TanuloCsoport.C_TANEVID
AND Osztaly.TOROLT = ''F''
INNER JOIN T_OSZTALYCSOPORT_OSSZES OsztalyCsoport ON OsztalyCsoport.ID = Osztaly.ID AND OsztalyCsoport.C_TANEVID = TanuloCsoport.C_TANEVID
AND OsztalyCsoport.TOROLT = ''F''
AND (OsztalyCsoport.C_FELADATKATEGORIAID = @pFeladatKategoriaId OR @pFeladatKategoriaId IS NULL)
INNER JOIN T_TANEV_OSSZES Tanev ON Tanev.ID = TanuloCsoport.C_TANEVID AND Tanev.TOROLT = ''F''
WHERE TanuloCsoport.C_TANEVID = @pTanevId
AND TanuloCsoport.TOROLT = ''F''
AND TanuloCsoport.C_TANULOID = @pTanuloId
AND TanuloCsoport.C_BELEPESDATUM <= @pDatum
'
IF @pKiiratkozottNeJelenjenMeg = 1
SET @sql += N'
AND (TanuloCsoport.C_KILEPESDATUM > @pDatum OR TanuloCsoport.C_KILEPESDATUM IS NULL OR TanuloCsoport.C_KILEPESDATUM >= Tanev.C_UTOLSOTANITASINAP)
'
SET @sql += N'
INSERT INTO #Tantargyak (
ID
,C_FOTARGYID
,C_NEV
,C_TARGYKATEGORIA
,C_TANEVID
)
SELECT
NULL
,NULL
,''Magatartás/Szorgalom''
,0
,@pTanevID;
WITH tantargy_CTE (
C_TANTARGYID
,C_FOTARGYID
,C_TANEVID
) AS
(
SELECT
Foglalkozas.C_TANTARGYID
,Tantargy.C_FOTARGYID
,Tantargy.C_TANEVID
FROM T_FOGLALKOZAS_OSSZES Foglalkozas
INNER JOIN T_TANTARGY_OSSZES Tantargy ON Tantargy.ID = Foglalkozas.C_TANTARGYID AND Tantargy.C_TANEVID = Foglalkozas.C_TANEVID
AND Tantargy.TOROLT = ''F''
INNER JOIN #OsztalyCsoportIdList OsztalyCsoport ON OsztalyCsoport.ID = Foglalkozas.C_OSZTALYCSOPORTID
WHERE Foglalkozas.C_TANEVID = @pTanevId
AND Foglalkozas.TOROLT = ''F''
UNION
SELECT
OrarendiOra.C_TANTARGYID
,Tantargy.C_FOTARGYID
,Tantargy.C_TANEVID
FROM T_ORARENDIORA_OSSZES OrarendiOra
INNER JOIN T_TANTARGY_OSSZES Tantargy ON Tantargy.ID = OrarendiOra.C_TANTARGYID AND Tantargy.C_TANEVID = OrarendiOra.C_TANEVID
AND Tantargy.TOROLT = ''F''
INNER JOIN #OsztalyCsoportIdList OsztalyCsoport ON OsztalyCsoport.ID = OrarendiOra.C_OSZTALYCSOPORTID
WHERE OrarendiOra.C_TANEVID = @pTanevId
AND OrarendiOra.TOROLT = ''F''
UNION
SELECT
TanuloErtekeles.C_TANTARGYID
,Tantargy.C_FOTARGYID
,Tantargy.C_TANEVID
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
LEFT JOIN T_TANTARGY_OSSZES Tantargy ON Tantargy.ID = TanuloErtekeles.C_TANTARGYID AND Tantargy.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Tantargy.TOROLT = ''F''
'
IF @pFeladatKategoriaId IS NOT NULL
IF @pFeladatKategoriaId <> @pAmiKategoriaId
SET @sql += N'
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.ID = TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.TOROLT = ''F''
AND Osztaly.C_EVFOLYAMTIPUSA = @evfolyamTipusId
AND Osztaly.C_FELADATKATEGORIAID = @pFeladatKategoriaId
'
ELSE
SET @sql += N'
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.ID = TanuloErtekeles.C_OSZTALYCSOPORTID AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.TOROLT = ''F''
AND Osztaly.C_EVFOLYAMTIPUSA = @evfolyamTipusId
AND Osztaly.C_FELADATKATEGORIAID = @pFeladatKategoriaId
'
SET @sql += N'
WHERE TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.TOROLT = ''F''
AND TanuloErtekeles.C_TANULOID = @pTanuloId
'
IF @pFeladatKategoriaId IS NOT NULL
BEGIN
IF @pFeladatKategoriaId = @pAmiKategoriaId
SET @sql += N'
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NULL
'
ELSE
SET @sql += N'
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NOT NULL
'
END
SET @sql += N'
)
INSERT INTO #Tantargyak (
ID
,C_FOTARGYID
,C_NEV
,C_TARGYKATEGORIA
,C_TANEVID
)
SELECT DISTINCT
KapcsopolodoTantargy.ID
,KapcsopolodoTantargy.C_FOTARGYID
,KapcsopolodoTantargy.C_NEV
,KapcsopolodoTantargy.C_TARGYKATEGORIA
,KapcsopolodoTantargy.C_TANEVID
FROM tantargy_CTE
INNER JOIN #KapcsopodoTantargyak KapcsopolodoTantargy ON tantargy_CTE.C_TANTARGYID = KapcsopolodoTantargy.ID OR tantargy_CTE.C_FOTARGYID = KapcsopolodoTantargy.ID
SELECT
@pTanuloId AS TanuloId
,Tantargy.ID AS TantargyId
,Tantargy.C_NEV AS TantargyNev
,TanuloErtekeles.ID AS ID
,TanuloErtekeles.C_DATUM AS Datum
,TanuloErtekeles.C_ROGZITESDATUM AS RogzitesDatum
,TanuloErtekeles.C_TIPUSID AS TipusId
,FelhasznaloErtekelo.C_NYOMTATASINEV AS ErtekeloNyomtatasiNev
,IIF(TanuloErtekeles.ID IS NULL, NULL, CASE WHEN TanuloErtekeles.C_ERTEKELOID = @pTanarId THEN ''T'' ELSE ''F'' END) AS Modosithato
,TanuloErtekeles.CREATED AS Created
,IIF(TanuloErtekeles.C_ISMAGATARTASSZORGALOM IS NOT NULL, TanuloErtekeles.C_ISMAGATARTASSZORGALOM, IIF(Tantargy.ID IS NOT NULL, ''F'', ''T'')) AS IsMagatartasSzorgalom
,TanuloErtekeles.C_ISERTESITESELKULDVE AS IsErtesitesElkuldve
,TanuloErtekeles.C_ERTEKELESOSZTALYZATID AS ErtekelesOsztalyzatId
,TanariAtlagSuly.C_SULY AS Suly
,TanuloErtekeles.C_ERTEKELESSZOVEG AS ErtekelesSzoveg
,TanuloErtekeles.C_ERTEKELESSZOVEGROVIDNEV AS ErtekelesSzovegRovidNev
,TanuloErtekeles.C_ERTEKELESSZAZALEK AS ErtekelesSzazalek
,TanuloErtekeles.C_ERTEKELESMODID AS ErtekelesModId
,TanuloErtekeles.C_ERTEKELESTEMA AS ErtekelesTema
,TanuloErtekeles.C_MAGATARTASOSZTALYZATID AS MagatartasOsztalyzatId
,TanuloErtekeles.C_MAGATARTASSZOVEG AS MagatartasSzoveg
,TanuloErtekeles.C_MAGATARTASSZOVEGROVIDNEV AS MagatartasSzovegRovidNev
,TanuloErtekeles.C_MAGATARTASERTEKID AS MagatartasErtekId
,TanuloErtekeles.C_SZORGALOMOSZTALYZATID AS SzorgalomOsztalyzatId
,TanuloErtekeles.C_SZORGALOMSZOVEG AS SzorgalomSzoveg
,TanuloErtekeles.C_SZORGALOMSZOVEGROVIDNEV AS SzorgalomSzovegRovidNev
,TanuloErtekeles.C_SZORGALOMERTEKID AS SzorgalomErtekId
,Tantargy.C_TARGYKATEGORIA AS TantargyKategoriaId
,Fotargy.ID AS FotargyId
,Fotargy.C_NEV AS FotargyNev
,Fotargy.C_TARGYKATEGORIA AS FotargyTantargyKategoriaId
FROM #Tantargyak Tantargy
LEFT JOIN (
SELECT
TanuloErtekeles.*
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
'
IF @pFeladatKategoriaId IS NOT NULL
IF @pFeladatKategoriaId <> @pAmiKategoriaId
SET @sql += N'
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.ID = TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.TOROLT = ''F''
AND Osztaly.C_EVFOLYAMTIPUSA = @evfolyamTipusId
AND Osztaly.C_FELADATKATEGORIAID = @pFeladatKategoriaId
'
ELSE
SET @sql += N'
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.ID = TanuloErtekeles.C_OSZTALYCSOPORTID AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.TOROLT = ''F''
AND Osztaly.C_EVFOLYAMTIPUSA = @evfolyamTipusId
AND Osztaly.C_FELADATKATEGORIAID = @pFeladatKategoriaId
'
SET @sql += N'
WHERE TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.TOROLT = ''F''
AND TanuloErtekeles.C_TANULOID = @pTanuloId
'
IF @pFeladatKategoriaId IS NOT NULL
BEGIN
IF @pFeladatKategoriaId = @pAmiKategoriaId
SET @sql += N'
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NULL
'
ELSE
SET @sql += N'
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NOT NULL
'
END
SET @sql += N'
) AS TanuloErtekeles ON (TanuloErtekeles.C_TANTARGYID = Tantargy.ID OR (TanuloErtekeles.C_TANTARGYID IS NULL AND Tantargy.ID IS NULL))
INNER JOIN T_FELHASZNALO_OSSZES FelhasznaloErtekelo ON FelhasznaloErtekelo.ID = TanuloErtekeles.C_ERTEKELOID AND FelhasznaloErtekelo.C_TANEVID = Tantargy.C_TANEVID
AND FelhasznaloErtekelo.TOROLT = ''F''
LEFT JOIN T_TANARIATLAGSULY_OSSZES TanariAtlagSuly ON TanariAtlagSuly.C_ERTEKELESMODID = TanuloErtekeles.C_ERTEKELESMODID AND TanariAtlagSuly.C_TANEVID = Tantargy.C_TANEVID
AND TanariAtlagSuly.TOROLT = ''F''
LEFT JOIN T_TANTARGY_OSSZES Fotargy ON Fotargy.ID = Tantargy.C_FOTARGYID AND Fotargy.C_TANEVID = Tantargy.C_TANEVID
AND Fotargy.TOROLT = ''F''
'
EXEC sp_executesql @sql, N'
@pIntezmenyId int
,@pTanevId int
,@pTanarId int
,@pTanuloId int
,@pFeladatKategoriaId int
,@evfolyamTipusId int
,@pDatum date
'
,@pIntezmenyId = @pIntezmenyId
,@pTanevId = @pTanevId
,@pTanarId = @pTanarId
,@pTanuloId = @pTanuloId
,@pFeladatKategoriaId = @pFeladatKategoriaId
,@evfolyamTipusId = @evfolyamTipusId
,@pDatum = @pDatum
END
GO

View file

@ -0,0 +1,170 @@
DROP PROCEDURE IF EXISTS uspGetTanuloErtekelesDetailDataSet
GO
CREATE PROCEDURE uspGetTanuloErtekelesDetailDataSet
@pTanevId int
,@pTanuloId int
,@pTantargyId int = NULL
,@pShowToroltElemek bit
,@pTanarId int
,@pErtekelesMegjelenesFajtaEnumTantargyId int
,@pErtekelesMegjelenesFajtaEnumMagatartasSzorgalomId int
,@pErtekelesMegjelenesFajtaId int
,@pDatum date = NULL
,@pAmiKategoriaId int
,@pFeladatKategoriaId int = NULL
,@pKiiratkozottNeJelenjenMeg bit = 1
,@pOsztalyCsoportId int = NULL
AS BEGIN
SET NOCOUNT ON;
DECLARE
@evfolyamTipusId int
,@sql nvarchar (max)
IF @pDatum IS NULL
SET @pDatum = CONVERT(date, GETDATE())
IF @pOsztalyCsoportId IS NULL
SELECT TOP (1)
@evfolyamTipusId = tanuloOsztaly.EvfolyamTipusId
FROM fnGetTanuloOsztaly(@pTanuloId, @pDatum, @pFeladatKategoriaId, @pKiiratkozottNeJelenjenMeg) tanuloOsztaly
ORDER BY tanuloOsztaly.BelepesDatuma DESC
ELSE
SELECT
@pFeladatKategoriaId = o.C_FELADATKATEGORIAID
,@evfolyamTipusId = o.C_EVFOLYAMTIPUSA
FROM T_OSZTALYCSOPORT_OSSZES o
WHERE ID = @pOsztalyCsoportId
SET @sql = N'
SELECT DISTINCT
TanuloErtekeles.ID AS ID
,TanuloErtekeles.C_DATUM AS Datum
,TanuloErtekeles.C_ROGZITESDATUM AS RogzitesDatum
,TanuloErtekeles.C_TIPUSID AS TipusId
,TanuloErtekeles.C_ISERTESITESELKULDVE AS IsErtesitesElkuldve
,TanuloErtekeles.C_TANORAID AS TanoraId
,TanuloErtekeles.C_ERTEKELESOSZTALYZATID AS ErtekelesOsztalyzatId
,TanuloErtekeles.C_ERTEKELESSZOVEG AS ErtekelesSzoveg
,TanuloErtekeles.C_ERTEKELESSZOVEGROVIDNEV AS ErtekelesSzovegRovidNev
,TanuloErtekeles.C_ERTEKELESSZAZALEK AS ErtekelesSzazalek
,TanuloErtekeles.C_ERTEKELESMODID AS ErtekelesModId
,TanuloErtekeles.C_ERTEKELESTEMA AS ErtekelesTema
,TanuloErtekeles.C_MAGATARTASOSZTALYZATID AS MagatartasOsztalyzatId
,TanuloErtekeles.C_MAGATARTASSZOVEG AS MagatartasSzoveg
,TanuloErtekeles.C_MAGATARTASSZOVEGROVIDNEV AS MagatartasSzovegRovidNev
,TanuloErtekeles.C_MAGATARTASERTEKID AS MagatartasErtekId
,TanuloErtekeles.C_SZORGALOMOSZTALYZATID AS SzorgalomOsztalyzatId
,TanuloErtekeles.C_SZORGALOMSZOVEG AS SzorgalomSzoveg
,TanuloErtekeles.C_SZORGALOMSZOVEGROVIDNEV AS SzorgalomSzovegRovidNev
,TanuloErtekeles.C_SZORGALOMERTEKID AS SzorgalomErtekId
,TanuloErtekeles.C_ISMAGATARTASSZORGALOM AS IsMagatartasSzorgalom
,TanuloErtekeles.CREATED AS Created
,TanuloErtekeles.TOROLT AS Torolt
,TanuloErtekeles.C_TANULOID AS TanuloId
,TanariAtlagSuly.C_SULY AS Suly
,Felhasznalo.C_NYOMTATASINEV AS ErtekeloNyomtatasiNev
,Tantargy.C_TARGYKATEGORIA AS TantargyKategoriaId
,CASE WHEN TanuloErtekeles.C_ERTEKELOID = @pTanarId THEN ''T'' ELSE ''F'' END AS Modosithato
FROM T_TANULOERTEKELES_OSSZES TanuloErtekeles
'
IF @pFeladatKategoriaId IS NOT NULL
BEGIN
IF @pFeladatKategoriaId <> @pAmiKategoriaId
BEGIN
SET @sql += N'
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.ID = TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID AND Osztaly.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'')
AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.C_EVFOLYAMTIPUSA = @evfolyamTipusId
AND Osztaly.C_FELADATKATEGORIAID = @pFeladatKategoriaId
INNER JOIN T_TANEV_OSSZES Tanev ON Tanev.ID = TanuloErtekeles.C_TANEVID AND Tanev.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'')
INNER JOIN T_TANULOCSOPORT_OSSZES TanuloCsoport ON TanuloCsoport.C_OSZTALYCSOPORTID = TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID AND TanuloCsoport.C_TANULOID = @pTanuloId
AND TanuloCsoport.C_TANEVID = TanuloErtekeles.C_TANEVID
AND TanuloCsoport.C_BELEPESDATUM <= @pDatum
AND TanuloCsoport.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'')
'
IF @pKiiratkozottNeJelenjenMeg = 1
SET @sql += N'
AND (TanuloCsoport.C_KILEPESDATUM > @pDatum OR TanuloCsoport.C_KILEPESDATUM IS NULL OR TanuloCsoport.C_KILEPESDATUM >= Tanev.C_UTOLSOTANITASINAP)
'
END
ELSE
SET @sql += N'
INNER JOIN T_OSZTALYCSOPORT_OSSZES Osztaly ON Osztaly.ID = TanuloErtekeles.C_OSZTALYCSOPORTID AND Osztaly.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'')
AND Osztaly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Osztaly.C_EVFOLYAMTIPUSA = @evfolyamTipusId
AND Osztaly.C_FELADATKATEGORIAID = @pFeladatKategoriaId
'
END
SET @sql += N'
LEFT JOIN T_TANTARGY_OSSZES Tantargy ON Tantargy.C_TANEVID = TanuloErtekeles.C_TANEVID AND Tantargy.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'')
AND Tantargy.ID = TanuloErtekeles.C_TANTARGYID
INNER JOIN T_FELHASZNALO_OSSZES AS Felhasznalo ON Felhasznalo.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'') AND Felhasznalo.C_TANEVID = TanuloErtekeles.C_TANEVID
AND Felhasznalo.ID = TanuloErtekeles.C_ERTEKELOID
LEFT JOIN T_TANARIATLAGSULY_OSSZES AS TanariAtlagSuly ON TanariAtlagSuly.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'') AND TanariAtlagSuly.C_TANEVID = TanuloErtekeles.C_TANEVID
AND TanariAtlagSuly.C_ERTEKELESMODID = TanuloErtekeles.C_ERTEKELESMODID
AND TanuloErtekeles.C_ERTEKELESOSZTALYZATID IS NOT NULL
WHERE TanuloErtekeles.TOROLT = IIF(@pShowToroltElemek = 1, TanuloErtekeles.TOROLT, ''F'')
AND TanuloErtekeles.C_TANEVID = @pTanevId
AND TanuloErtekeles.C_TANULOID = @pTanuloId'
IF @pFeladatKategoriaId IS NOT NULL
BEGIN
IF @pFeladatKategoriaId = @pAmiKategoriaId
SET @sql += N'
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NULL
'
ELSE
SET @sql += N'
AND TanuloErtekeles.C_ROGZITESKORITANULOOSZTALYID IS NOT NULL
'
END
SET @sql +=
CASE
WHEN @pErtekelesMegjelenesFajtaId = @pErtekelesMegjelenesFajtaEnumTantargyId
THEN N'
AND (TanuloErtekeles.C_ISMAGATARTASSZORGALOM = ''F'' AND TanuloErtekeles.C_TANTARGYID = @pTantargyId)
'
WHEN @pErtekelesMegjelenesFajtaId = @pErtekelesMegjelenesFajtaEnumMagatartasSzorgalomId
THEN N'
AND (TanuloErtekeles.C_ISMAGATARTASSZORGALOM = ''T'' AND TanuloErtekeles.C_TANTARGYID IS NULL)
'
ELSE N'
AND ((TanuloErtekeles.C_ISMAGATARTASSZORGALOM = ''F'' AND TanuloErtekeles.C_TANTARGYID = @pTantargyId AND @pTantargyId IS NOT NULL)
OR (TanuloErtekeles.C_ISMAGATARTASSZORGALOM = ''T'' AND TanuloErtekeles.C_TANTARGYID IS NULL AND @pTantargyId IS NULL))
'
END
SET @sql += N'
ORDER BY
Datum DESC
,RogzitesDatum DESC'
EXEC sp_executesql @sql, N'
@pTanevId int
,@pTanuloId int
,@pTantargyId int
,@pShowToroltElemek bit
,@pTanarId int
,@evfolyamTipusId int
,@pFeladatKategoriaId int
,@pDatum date
'
,@pTanevId = @pTanevId
,@pTanuloId = @pTanuloId
,@pTantargyId = @pTantargyId
,@pShowToroltElemek = @pShowToroltElemek
,@pTanarId = @pTanarId
,@evfolyamTipusId = @evfolyamTipusId
,@pFeladatKategoriaId= @pFeladatKategoriaId
,@pDatum = @pDatum
END
GO