﻿SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-- =================================================
-- Author:		  Solyom Peter - Telek Ákos
-- Create date: 2015.12.03
-- Description:	Osztálynapló nyomtatványhoz adatok.
-- =================================================
IF OBJECT_ID('sp_GetOsztalyNaplo') IS NOT NULL BEGIN
  DROP PROCEDURE [sp_GetOsztalyNaplo] 
END  
GO

CREATE PROCEDURE [sp_GetOsztalyNaplo]
   @intezmenyId int,
  @tanevId int,
  @osztalyId int,
  @isSzövegesNaplo bit = 0
AS
BEGIN
  SET NOCOUNT ON;

declare @AktivtanevId int = (select Id from T_TANEV_OSSZES tanev where c_aktiv='T' and c_intezmenyId=@intezmenyId and Torolt='F')

declare @HetEleje date
declare @HetVege date

if (@tanevId=@AktivtanevId)
	begin
		set @HetEleje =(select top 1  nh.c_hetkezdonapja  from T_NAPTARIHET_OSSZES nh where getdate()>nh.c_hetkezdonapja and getdate()<nh.c_hetutolsonapja and nh.torolt='F' and nh.c_tanevid=@tanevid and nh.c_intezmenyId=@intezmenyId)
		set @HetVege =(select top 1 nh.c_hetutolsonapja  from T_NAPTARIHET_OSSZES nh where getdate()>nh.c_hetkezdonapja and getdate()<nh.c_hetutolsonapja and nh.torolt='F' and nh.c_tanevid=@tanevid and nh.c_intezmenyId=@intezmenyId)
	end
	begin
		declare @UtolsoNap date = (select top 1 c_napdatuma from t_naptarinap_osszes where c_naptipusa=1395 and c_intezmenyId=@intezmenyId and c_tanevId=@tanevid and torolt='F')
		set @HetEleje =(select top 1 nh.c_hetkezdonapja  from T_NAPTARIHET_OSSZES nh where @UtolsoNap>nh.c_hetkezdonapja and @UtolsoNap<nh.c_hetutolsonapja and nh.torolt='F' and nh.c_tanevid=@tanevid and nh.c_intezmenyId=@intezmenyId)
		set @HetVege =(select top 1 nh.c_hetutolsonapja  from T_NAPTARIHET_OSSZES nh where @UtolsoNap>nh.c_hetkezdonapja and @UtolsoNap<nh.c_hetutolsonapja and nh.torolt='F' and nh.c_tanevid=@tanevid and nh.c_intezmenyId=@intezmenyId)
	end
  declare @osztalyRovidNev nvarchar(max)=(select iif(len(ocs.c_nev)>13, SUBSTRING (ocs.c_nev, 1 , 10)+'...', ocs.c_nev) RovidNev from T_OSZTALYCSOPORT_OSSZES ocs where ocs.id=@osztalyId)

   -- Naplo fooldal
  DECLARE @osztalycsoportok TABLE (osztalycsoportid int primary key) 
  DECLARE @AktualisOsztalyCsoportok TABLE (osztalycsoportid int)

  INSERT INTO @osztalycsoportok (osztalycsoportid)
  (SELECT ID FROM fnGetKapcsolodoOsztalycsoportok(@osztalyId)
    where (id in (select id from t_osztaly_osszes) or id in (select id from t_csoport_osszes where C_TIPUSA=1034)))

  INSERT INTO @AktualisOsztalyCsoportok (osztalycsoportid)
  (SELECT ID FROM fnGetKapcsolodoOsztalycsoportokByDate(@osztalyId,@HetEleje,@HetVege)
    where (id in (select id from t_osztaly_osszes) or id in (select id from t_csoport_osszes where C_TIPUSA=1034)))

  SELECT DISTINCT ocs.C_NEV OsztalyNev, @osztalyRovidNev RovidNev, o.C_OSZTALYNAPLOLEIRASA OsztalyMegjegyzes, o.C_OSZTALYFONOKID PartnerID, ofo.C_NYOMTATASINEV Osztalyfonok,
    i.C_IGAZGATONEVE IntezmenyVezeto, i.C_NEV IntezmenyNeve,
  	i.C_IRANYITOSZAM IntezmenyIranyitoszam, i.C_VAROS IntezmenyVaros, i.C_CIME IntezmenyCime, i.C_OMKOD IntezmenyOMKod,
  	FORMAT(o.c_osztalynaplomegnyitasa, 'yyyy. MMMM dd.', 'hu-hu') NaploMegnyitasanakDatuma,
	isnull(FORMAT(o.c_osztalynaplozarasa, 'yyyy. MMMM dd.', 'hu-hu'),'-') NaploZarasanakDatuma 
  FROM T_OSZTALYCSOPORT_OSSZES ocs 
  	INNER JOIN T_OSZTALY_OSSZES o ON ocs.ID = o.ID and o.torolt='F'
  	LEFT JOIN T_FELHASZNALO_OSSZES ofo ON ofo.ID = o.C_OSZTALYFONOKID 
  	inner JOIN T_INTEZMENYADATOK_OSSZES i on i.C_INTEZMENYID=ocs.C_INTEZMENYID
  WHERE ocs.ID = @osztalyId 

  -- Tanarok
  SELECT targy.C_NEV TargyNev, tanar.C_NYOMTATASINEV TanarNev
  FROM T_FELHASZNALO_OSSZES tanar
  	INNER JOIN T_FOGLALKOZASOK_TANAROK_OSSZES ft ON tanar.ID = ft.C_TANAROKID
  	INNER JOIN T_FOGLALKOZAS_OSSZES f ON f.ID = ft.C_FOGLALKOZASOKID and f.torolt='F'
  	INNER JOIN T_TANTARGY_OSSZES targy ON targy.ID = f.C_TANTARGYID and targy.torolt='F' 
  WHERE tanar.TOROLT = 'F' AND f.TOROLT = 'F' 
  	AND f.C_OSZTALYCSOPORTID IN (SELECT osztalycsoportid FROM @osztalycsoportok) 
  GROUP BY targy.C_NEV, tanar.C_NYOMTATASINEV
  ORDER BY targy.C_NEV, tanar.C_NYOMTATASINEV


  -- Orarend
   EXEC sp_GetOrarendOsztalyonkent @intezmenyId, @tanevID, @osztalyid


  -- Oralatogatasok
  SELECT  
  convert(nvarchar(100), datepart(year, T_ORALATOGATAS_OSSZES.C_DATUM))+'. '+convert(nvarchar(100), datepart(month, T_ORALATOGATAS_OSSZES.C_DATUM))+'. '+
  convert(nvarchar(100), datepart(day, T_ORALATOGATAS_OSSZES.C_DATUM))+'. ' DATUM, 
  TANITASIORA.C_ORASZAM ORASZAM, TARGY.C_NEV TARGYNEV, T_FELHASZNALO_OSSZES.C_NYOMTATASINEV LATOGATO, 
  	T_ORALATOGATAS_OSSZES.C_ORALATOGATOBEOSZTASA LATOGATOBEOSZTAS, T_ORALATOGATAS_OSSZES.C_MEGJEGYZES ESZREVETEL
  FROM T_ORALATOGATAS_OSSZES
  	INNER JOIN T_FELHASZNALO_OSSZES ON T_FELHASZNALO_OSSZES.ID = T_ORALATOGATAS_OSSZES.C_ERTEKELOID
  	INNER JOIN (SELECT ID, C_TANTARGYID, C_ORASZAM, C_FOGLALKOZASID FROM T_TANITASIORA_OSSZES ) TANITASIORA ON TANITASIORA.ID = T_ORALATOGATAS_OSSZES.C_MEGTARTOTTORAID
  	INNER JOIN T_TANTARGY_OSSZES TARGY ON TARGY.ID = TANITASIORA.C_TANTARGYID
  WHERE T_ORALATOGATAS_OSSZES.TOROLT='F' and T_ORALATOGATAS_OSSZES.c_intezmenyId=@intezmenyId and T_ORALATOGATAS_OSSZES.c_tanevId=@tanevId
  	AND EXISTS (SELECT 1 FROM T_FOGLALKOZAS_OSSZES WHERE T_FOGLALKOZAS_OSSZES.ID = TANITASIORA.C_FOGLALKOZASID AND T_FOGLALKOZAS_OSSZES.C_OSZTALYCSOPORTID = @osztalyId)
  ORDER BY T_ORALATOGATAS_OSSZES.C_DATUM, TANITASIORA.C_ORASZAM

  -- Naploellenorzesek
  SELECT 
  convert(nvarchar(100), datepart(year, C_ELLENORZESDATUMA))+'. '+convert(nvarchar(100), datepart(month, C_ELLENORZESDATUMA))+'. '+
  convert(nvarchar(100), datepart(day, C_ELLENORZESDATUMA))+'. '+convert(nvarchar(100), datepart(hour, C_ELLENORZESDATUMA))+':'+
  convert(nvarchar(100), datepart(minute, C_ELLENORZESDATUMA)) ELLENORZESDATUMA, 
  ELLENORZO.C_NYOMTATASINEV ELLENORZOSZEMELY, T_NAPLOELLENORZES_OSSZES.C_ESZREVETEL ESZREVETEL
  FROM T_NAPLOELLENORZES_OSSZES
  	INNER JOIN T_FELHASZNALO_OSSZES ELLENORZO ON ELLENORZO.ID = T_NAPLOELLENORZES_OSSZES.C_ELLENORZOSZEMELYID
  WHERE C_OSZTALYID = @osztalyId 
    AND T_NAPLOELLENORZES_OSSZES.TOROLT = 'F' and T_NAPLOELLENORZES_OSSZES.c_tanevId=@tanevId

  /* Napló */
      DECLARE @TenylegesOrak TABLE (
    HetirendID int,
    HetNapja int, 
    Oraszam int, 
    Targyid int, 
    Targy nvarchar(max), 
    Terem nvarchar(max), 
    Tanar nvarchar(max)
  )	
    INSERT INTO @TenylegesOrak
  SELECT o.C_HETIREND AS HetiRend, o.C_HETNAPJA HetNapja, o.C_ORASZAM Oraszam, t.ID, ISNULL(t.C_NEVNYOMTATVANYBAN, t.C_NEV) TargyNev, tm.C_NEV Terem, 
    (SELECT TOP 1 tanar.C_NYOMTATASINEV
  	  FROM T_FELHASZNALO_OSSZES tanar 
  		  INNER JOIN T_FOGLALKOZASOK_TANAROK_OSSZES ft ON tanar.ID = ft.C_TANAROKID
  		WHERE ft.C_FOGLALKOZASOKID = f.ID ) TanarNev
  FROM T_ORARENDIORA_OSSZES o
  	INNER JOIN T_FOGLALKOZAS_OSSZES f ON f.ID = o.C_FOGLALKOZASID
    INNER JOIN @osztalycsoportok ocs ON f.C_OSZTALYCSOPORTID = ocs.osztalycsoportid
  	INNER JOIN T_TANTARGY_OSSZES t ON t.ID = f.C_TANTARGYID
  	LEFT  JOIN T_TEREM_OSSZES tm ON tm.ID = o.C_TEREMID
  WHERE o.TOROLT = 'F' and o.torolt='F' and o.c_tanevId=@tanevId

  SELECT nn.C_HETSORSZAMA, MIN(nn.C_NAPDATUMA), MAX(nn.C_NAPDATUMA) FROM T_NAPTARINAP_OSSZES nn
  INNER JOIN T_TANEV_OSSZES te ON te.ID = nn.C_TANEVID AND te.TOROLT = 'F'
  WHERE nn.C_NAPDATUMA BETWEEN te.C_ELSOTANITASINAP AND te.C_UTOLSOTANITASINAP
    AND (nn.C_HETNAPJA BETWEEN 1408 AND 1412 OR nn.C_ORARENDINAP = 'T')
	and nn.torolt='F' and nn.c_intezmenyId=@intezmenyId and nn.c_tanevId=@tanevId
  GROUP BY nn.C_HETSORSZAMA
  ORDER BY MIN(nn.C_NAPDATUMA)

  declare @datum date=getdate()
  create table #OraSorszam (TanitasioraId int, OraSorszam int)
  insert into #OraSorszam 
  EXEC	sp_GetOraSorszamByOsztaly
		@osztalyCsoportId = @osztalyId,
		@datum = @datum,
		@intezmenyId = @intezmenyId,
		@tanevId = @tanevId

  IF @isSzövegesNaplo = 0 BEGIN   /* NORMÁL OSZTÁLYNAPLÓ */
     DECLARE @prepare nvarchar(MAX),
      @orarendSql nvarchar(MAX),
      @mulasztasSql nvarchar(MAX),
      @superSql nvarchar(MAX)

    SET @prepare = '
    DECLARE @csoportok TABLE (id int primary key)   
    
    INSERT INTO @csoportok (id)
    (SELECT ID FROM fnGetKapcsolodoOsztalycsoportok(@osztaly)
	WHERE (ID IN (SELECT ID FROM T_OSZTALY_OSSZES) OR ID IN (SELECT ID FROM T_CSOPORT_OSSZES WHERE C_TIPUSA=1034)))

    DECLARE @oraszam TABLE (oraszam int primary key);
    
    INSERT INTO @oraszam (oraszam) 
    VALUES (1),(2),(3),(4),(5),(6),(7),(8),(9),(10); 
    
    DECLARE @hianyzasTmp TABLE (naptarinap int, hianyzas nvarchar(4000))
    
    INSERT INTO @hianyzasTmp
    SELECT DISTINCT n.C_NAPTARINAPID, 
    t.C_NYOMTATASINEV + '' ['' + STUFF((
      SELECT  '', '' + CAST(o.C_ORASZAM AS VARCHAR(3)) + IIF(tm.C_TIPUS = 1500, '''', ''(k)'')
      FROM T_TANULOMULASZTAS_OSSZES tm
        INNER JOIN T_TANITASIORA_OSSZES o ON o.ID = tm.C_TANITASIORAKID
        --INNER JOIN @csoportok cs ON cs.id = o.C_OSZTALYCSOPORTID
      WHERE n.C_NAPTARINAPID = o.C_NAPTARINAPID
        AND m.C_ORATANULOIID = tm.C_ORATANULOIID
        AND tm.TOROLT = ''F'' and tm.c_tanevId=@tanevId
		and tm.c_oratanuloiid in (SELECT C_TANULOID FROM T_TANULOCSOPORT_OSSZES WHERE C_OSZTALYCSOPORTID=@osztaly AND TOROLT=''F'')
      ORDER BY o.C_NAPTARINAPID, o.C_ORASZAM
      FOR XML PATH(''''), TYPE).value(''.'', ''varchar(max)''),1,2,'''') + ''] '' + CAST(SUM(IIF(m.C_IGAZOLT = ''T'', 1, 0)) AS varchar(2)) + ''/'' + CAST(SUM(IIF(m.C_IGAZOLT = ''T'' OR m.C_TIPUS = 1499, 0, 1)) AS varchar(2)) AS hianyzas
    FROM T_TANITASIORA_OSSZES n
      INNER JOIN T_TANULOMULASZTAS_OSSZES m ON m.C_TANITASIORAKID = n.ID  
      INNER JOIN @csoportok cs ON cs.id = n.C_OSZTALYCSOPORTID
      INNER JOIN T_FELHASZNALO_OSSZES t ON t.ID = m.C_ORATANULOIID
    WHERE m.TOROLT = ''F''  and m.c_intezmenyId=@intezmenyId and m.c_tanevId=@tanevId
    GROUP BY n.C_NAPTARINAPID, C_ORATANULOIID, C_NYOMTATASINEV
    '
    
    SET @orarendSql = '
    SELECT * FROM (
      SELECT n.ID AS T1ID, IIF(n.C_ORARENDINAP = ''T'', DENSE_RANK() OVER(PARTITION BY n.C_TANEVID, n.C_ORARENDINAP ORDER BY n.C_NAPDATUMA), NULL) AS NAPSZAM, n.C_NAPDATUMA, n.C_HETSORSZAMA, sz.ORASZAM, n.C_HETNAPJA, o.tantargyak AS TANTARGY
      FROM T_NAPTARINAP_OSSZES n
        CROSS JOIN @oraszam sz
        LEFT JOIN (
          SELECT t.C_NAPTARINAPID, t.C_ORASZAM,
            STUFF((
              SELECT DISTINCT '' | '' + ISNULL(tt.C_NEVNYOMTATVANYBAN, tt.C_NEV)
              FROM T_TANITASIORA_OSSZES t2
                INNER JOIN T_FOGLALKOZAS_OSSZES f ON t2.C_FOGLALKOZASID = f.ID 
                INNER JOIN T_TANTARGY_OSSZES tt ON tt.ID = f.C_TANTARGYID
                INNER JOIN @csoportok cs ON t2.C_OSZTALYCSOPORTID = cs.ID
              WHERE t.C_NAPTARINAPID = t2.C_NAPTARINAPID 
                AND t.C_ORASZAM = t2.C_ORASZAM
              FOR XML PATH(''''), TYPE).value(''.'', ''varchar(max)''),1,3,'''')  AS tantargyak
          FROM T_TANITASIORA_OSSZES t
          INNER JOIN @csoportok cs ON t.C_OSZTALYCSOPORTID = cs.ID  
          GROUP BY   t.C_NAPTARINAPID, t.C_ORASZAM
        ) o ON o.C_NAPTARINAPID = n.ID AND o.C_ORASZAM = sz.oraszam
        INNER JOIN T_TANEV_OSSZES te ON n.C_TANEVID = te.ID
      WHERE /*te.C_AKTIV = ''T''*/ te.id=@tanevId and te.torolt=''F'' and te.c_intezmenyId=@intezmenyId 
        AND n.C_NAPDATUMA BETWEEN te.C_ELSOTANITASINAP AND te.C_UTOLSOTANITASINAP
        AND (n.C_HETNAPJA BETWEEN 1408 AND 1412 OR n.C_ORARENDINAP = ''T'')
        AND n.TOROLT = ''F''
    ) T1
    LEFT JOIN (
      SELECT DISTINCT n.ID AS T2ID,
        tr.C_MEGJEGYZES AS [Megjegyzés],   
        STUFF((
          SELECT char(13) + char(10) + hianyzas
          FROM @hianyzasTmp tbl 
          WHERE tbl.naptarinap = nn.naptarinap
          FOR XML PATH(''''), TYPE).value(''.'', ''varchar(max)''),2,1,'''') AS MULASZTAS
      FROM T_NAPTARINAP_OSSZES n 
        LEFT JOIN @hianyzasTmp nn ON n.ID = nn.naptarinap
        LEFT JOIN T_TANEVRENDJE_OSSZES tr ON tr.C_DATUM = n.C_NAPDATUMA
        INNER JOIN T_TANEV_OSSZES te ON te.ID = n.C_TANEVID AND te.TOROLT = ''F'' AND te.id=@tanevId --and te.C_AKTIV = ''T''
      WHERE n.TOROLT = ''F'' AND (tr.TOROLT = ''F'' OR tr.TOROLT IS NULL)       
    ) T2 ON T1.T1ID = T2.T2ID AND T1.ORASZAM = 1
    '
    
    DECLARE @selectList nvarchar(MAX),
      @pivotList nvarchar(MAX),
      @sql nvarchar(MAX)
    SELECT @pivotList = ISNULL(@pivotList + ', ', '') + '[' + CAST(t.Targyid AS varchar(6)) + ']',
      @selectList = ISNULL(@selectList + ', ', '') + '[' + CAST(t.Targyid AS varchar(6)) + '] AS [' + t.Targy + ']' 
    FROM (
    SELECT DISTINCT Targyid, Targy/* + '(' + Tanar + ')' AS Targy*/ FROM @TenylegesOrak) t
    
    SET @sql = '  LEFT JOIN ( SELECT T3ID, ' + @selectList + ' 
      FROM (
        SELECT o.C_NAPTARINAPID AS T3ID, o.C_TANTARGYID,
                STUFF((
            SELECT '', '' +convert(nvarchar(max),isnull(oes.OraSorszam, ''-'')) + ''.: '' + C_TEMA 
            FROM T_TANITASIORA_OSSZES oo 
      	  INNER JOIN @csoportok cs ON cs.id = oo.C_OSZTALYCSOPORTID
		  left JOIN #OraSorszam oes on oes.TanitasioraId=oo.Id
      	  WHERE o.C_NAPTARINAPID = oo.C_NAPTARINAPID
              AND o.C_TANTARGYID = oo.C_TANTARGYID
              AND oo.TOROLT = ''F''
            ORDER BY oo.ID --oo.C_ORAEVESSORSZAM  
            FOR XML PATH(''''), TYPE).value(''.'', ''varchar(max)'')
          ,1,2,'' '') AS tema
        FROM T_TANITASIORA_OSSZES o
      	  LEFT JOIN T_NAPTARINAP_OSSZES n ON o.C_NAPTARINAPID = n.ID
          LEFT JOIN T_TANEV_OSSZES te ON n.C_TANEVID = te.ID
        WHERE te.id=@tanevId --andte.C_AKTIV = ''T''
          AND n.C_NAPDATUMA BETWEEN te.C_ELSOTANITASINAP AND te.C_UTOLSOTANITASINAP
          AND n.C_ORARENDINAP = ''T''
          AND n.TOROLT = ''F'' and n.c_intezmenyId=@intezmenyId and n.c_tanevId=@tanevId
          AND o.C_OSZTALYCSOPORTID IN (SELECT id FROM @csoportok)
          AND (o.TOROLT = ''F'' OR o.TOROLT IS NULL)  
        GROUP BY o.C_NAPTARINAPID, o.C_TANTARGYID )p
      PIVOT
      (
      MAX(tema)
      FOR C_TANTARGYID IN (' + @pivotList + ')
      ) AS pvt'
    
    SET @superSql = @orarendSql + ISNULL(@sql + '
    ) T3 ON T1.T1ID = T3.T3ID AND T1.ORASZAM = 1', '') + '
    ORDER BY T1.T1ID, T1.C_HETNAPJA, T1.ORASZAM'
    
    SET @superSql = @prepare + @superSql  
    EXEC sp_executesql @superSql, N'@osztaly int, @intezmenyId int, @tanevId int', @osztalyId, @intezmenyId, @tanevId
  END -- NORMÁL OSZTÁLYNAPLÓ

  ELSE BEGIN -- SZÖVEGES OSZTÁLYNAPLÓ
   SELECT	nn.C_NAPDATUMA
			, FORMAT(C_NAPDATUMA, 'dddd', 'hu-hu') AS NAPNEVE
			, tr.C_MEGJEGYZES
			, nh.C_HETKEZDONAPJA
			, nh.C_HETUTOLSONAPJA
			, nn.C_HETSORSZAMA
			, sorszam AS ORASORSZAM,
			IIF(nn.C_ORARENDINAP = 'T', DENSE_RANK() OVER(PARTITION BY nn.C_TANEVID, nn.C_ORARENDINAP ORDER BY nn.C_NAPDATUMA), NULL) AS NAPSZAM
			, ISNULL(tt.C_NEVNYOMTATVANYBAN, tt.C_NEV) AS TANTARGY
			, ISNULL(ht.C_NYOMTATASINEV
			, at.C_NYOMTATASINEV) AS TANAR
			, o.C_TEMA ORAANYAGA
			, IIF(o.C_SORSZAMOZANDO = 'F', '-', CAST(oes.OraSorszam AS VARCHAR(MAX))) AS C_ORAEVESSORSZAM
	INTO #szoveges
    FROM T_NAPTARINAP_OSSZES nn
      CROSS JOIN (VALUES (1),(2),(3),(4),(5),(6),(7),(8),(9),(10), (11), (12)) sz (sorszam)
      INNER JOIN T_NAPTARIHET_OSSZES nh ON nn.C_NAPDATUMA BETWEEN nh.C_HETKEZDONAPJA AND nh.C_HETUTOLSONAPJA AND nh.C_TANEVID = @tanevId and nh.torolt='F' 
      LEFT JOIN T_TANITASIORA_OSSZES o ON o.C_DATUM = nn.C_NAPDATUMA AND sz.sorszam = o.C_ORASZAM AND o.C_TANEVID = @tanevId and o.torolt='F' AND (o.C_OSZTALYCSOPORTID IN (SELECT osztalycsoportid FROM @osztalycsoportok))
	  LEFT JOIN #OraSorszam oes on oes.TanitasioraId=o.id
      LEFT JOIN T_FOGLALKOZAS_OSSZES f ON f.ID = o.C_FOGLALKOZASID AND f.C_TANEVID = @tanevId and f.torolt='F' 
      LEFT JOIN T_TANTARGY_OSSZES tt ON tt.ID = o.C_TANTARGYID
      LEFT JOIN T_FELHASZNALO_OSSZES ht ON o.C_HELYETTESITOTANARID = ht.ID AND ht.C_TANEVID = @tanevId
      LEFT JOIN T_FOGLALKOZASOK_TANAROK ft ON f.ID = ft.C_FOGLALKOZASOKID 
      LEFT JOIN T_FELHASZNALO_OSSZES at ON ft.C_TANAROKID = at.ID
      LEFT JOIN T_TANEVRENDJE_OSSZES tr ON tr.C_DATUM = nn.C_NAPDATUMA AND tr.C_TANEVID = @tanevId and tr.torolt='F' and tr.c_intezmenyId=@intezmenyId
    WHERE 
			nn.C_HETNAPJA BETWEEN 1408 AND 1412 /* Hétfő - Péntek */
			AND nn.C_TANEVID = @tanevId 
			AND nn.torolt='F'
	order by nn.C_NAPDATUMA, sorszam, tt.c_nev

	select distinct c_napdatuma
			, napneve
			, c_megjegyzes
			, c_hetkezdonapja
			, c_hetutolsonapja
			, c_hetsorszama
			, orasorszam
			, napszam
			, STUFF((SELECT  ' | ' + CAST(bszov.TANTARGY AS VARCHAR(max)) 
					 FROM #szoveges bszov 
					 WHERE 
					 bszov.C_NAPDATUMA=szov.C_NAPDATUMA
					 and bszov.ORASORSZAM=szov.ORASORSZAM
					 and bszov.napszam=szov.napszam
					 FOR XML PATH(''), TYPE)
					.value('.','NVARCHAR(MAX)'),1,2,' ') TANTARGY
			, STUFF((SELECT  ' | ' + CAST(bszov.TANAR AS VARCHAR(max)) 
					 FROM #szoveges bszov 
					 WHERE 
					 bszov.C_NAPDATUMA=szov.C_NAPDATUMA
					 and bszov.ORASORSZAM=szov.ORASORSZAM
					 and bszov.napszam=szov.napszam
					 FOR XML PATH(''), TYPE)
					.value('.','NVARCHAR(MAX)'),1,2,' ') TANAR
			, STUFF((SELECT  ' | ' + CAST(bszov.ORAANYAGA AS VARCHAR(max)) 
					 FROM #szoveges bszov 
					 WHERE 
					 bszov.C_NAPDATUMA=szov.C_NAPDATUMA
					 and bszov.ORASORSZAM=szov.ORASORSZAM
					 and bszov.napszam=szov.napszam
					 FOR XML PATH(''), TYPE)
					.value('.','NVARCHAR(MAX)'),1,2,' ') ORAANYAGA
			, STUFF((SELECT  ' | ' + CAST(bszov.C_ORAEVESSORSZAM AS VARCHAR(max)) 
					 FROM #szoveges bszov 
					 WHERE 
					 bszov.C_NAPDATUMA=szov.C_NAPDATUMA
					 and bszov.ORASORSZAM=szov.ORASORSZAM
					 and bszov.napszam=szov.napszam
					 FOR XML PATH(''), TYPE)
					.value('.','NVARCHAR(MAX)'),1,2,' ') OraEvesSorszama
	from #szoveges szov
	order by C_NAPDATUMA, orasorszam
drop table #OraSorszam
drop table #szoveges

    
    /*Hiányzások*/
    SELECT C_HETSORSZAMA, C_NYOMTATASINEV, 
      MAX([1]) AS [Hetfo], MAX([2]) AS [Kedd], MAX([3]) AS [Szerda], 
      MAX([4]) AS [Csutortok], MAX([5]) AS [Pentek], MAX([6]) AS [Szombat] 
    FROM (
      SELECT C_HETSORSZAMA, C_NYOMTATASINEV, [0], [1], [2], [3], [4], [5], [6]
      FROM (
       SELECT DISTINCT n.C_NAPTARINAPID, DATEPART(dw,n.C_DATUM) AS NAP, t.C_NYOMTATASINEV, n.C_HETSORSZAMA,
        '[' + STUFF((
          SELECT  ', ' + CAST(o.C_ORASZAM AS VARCHAR(3)) + IIF(tm.C_TIPUS = 1500, '', '(k)')
          FROM T_TANULOMULASZTAS_OSSZES tm
            INNER JOIN T_TANITASIORA_OSSZES o ON o.ID = tm.C_TANITASIORAKID
            INNER JOIN @osztalycsoportok cs ON cs.osztalycsoportid = o.C_OSZTALYCSOPORTID
          WHERE n.C_NAPTARINAPID = o.C_NAPTARINAPID
            AND m.C_ORATANULOIID = tm.C_ORATANULOIID
            AND tm.C_TANEVID = @tanevId
			and tm.torolt='F' and tm.c_intezmenyId=@intezmenyId and o.c_tanevId=@tanevId
			and tm.c_oratanuloiid in (SELECT C_TANULOID FROM T_TANULOCSOPORT_OSSZES WHERE C_OSZTALYCSOPORTID=@osztalyId AND TOROLT='F')
          ORDER BY o.C_NAPTARINAPID, o.C_ORASZAM
          FOR XML PATH(''), TYPE).value('.', 'varchar(max)'),1,2,'') + '] ' + CAST(SUM(IIF(m.C_IGAZOLT = 'T', 1, 0)) AS varchar(2)) + '/' + CAST(SUM(IIF(m.C_IGAZOLT = 'T' OR m.C_TIPUS = 1499, 0, 1)) AS varchar(2)) AS hianyzas
        FROM T_TANITASIORA_OSSZES n
          INNER JOIN T_TANULOMULASZTAS_OSSZES m ON m.C_TANITASIORAKID = n.ID  and m.torolt='F' --and m.c_intezmenyId=@intezmenyId
          INNER JOIN @osztalycsoportok cs ON cs.osztalycsoportid = n.C_OSZTALYCSOPORTID
          INNER JOIN T_FELHASZNALO t ON t.ID = m.C_ORATANULOIID
        WHERE n.C_TANEVID = @tanevId AND m.C_TANEVID = @tanevId 
        GROUP BY n.C_NAPTARINAPID, C_ORATANULOIID, C_NYOMTATASINEV, n.C_HETSORSZAMA, n.C_DATUM) AS SUB
        PIVOT
        (
        MAX(HIANYZAS)
        FOR NAP IN ([0], [1], [2], [3], [4], [5], [6])
      ) AS PivotTable
    ) AS ASD
    GROUP BY C_HETSORSZAMA, C_NYOMTATASINEV
    ORDER BY C_HETSORSZAMA  
  END --SZÖVEGES OSZTÁLYNAPLÓ

  /*TANULÓ adatai*/
  DECLARE @students TABLE (ID INT PRIMARY KEY)
  INSERT INTO @students
  SELECT DISTINCT 
	C_TANULOID 
  FROM T_TANULOCSOPORT_OSSZES 
  WHERE C_OSZTALYCSOPORTID = @osztalyId 
	AND TOROLT = 'F' 
	AND C_BELEPESDATUM < GETDATE()

	DECLARE @NaploSorszam TABLE (
		TanuloId INT
		,Sorszam INT	
		)

	INSERT INTO @NaploSorszam
	EXEC [sp_GetDokumentumTanuloNaploSorszam]
		@osztalyId = @osztalyId

	SELECT DISTINCT 
		tanuloID
		, sorszam
		, torzslapSzam
		, oktAzon
		, tajSzam
		, anyjaNeve
		, szulHely
		, CONVERT(NVARCHAR(100),DATEPART(YEAR,szulIdo))+'. '+CONVERT(NVARCHAR(100)
		,datepart(month,szulIdo))+'. '+convert(nvarchar(100)
		,datepart(day,szulIdo))+'.' SzulIdo
		, gondviselok
		, IIF(socAdat = '', '', 
			 LEFT(socAdat, len(socAdat)- 1)) socAdat
		, kepzes
		, tanuloNeve
		, allampolgarsaga
		, diakIgazolvanySzam
		, kilepesDatum
  FROM (
  SELECT  
	t.ID AS tanuloID
	, naploSorszam.Sorszam as sorszam
	, f.C_NYILVANTARTASISZAM as torzslapSzam
	,f.C_OKTATASIAZONOSITO as oktAzon
	, f.C_TAJSZAM as tajSzam
	, f.C_ANYJANEVE as anyjaNeve, 
    f.C_SZULETESIHELY  AS szulHely
	,f.C_SZULETESIDATUM as szulIdo
	,IIF(t.C_MAGANTANULO = 'T', 'Magántanuló (eü. ok), ', '') +
    IIF(t.C_JOGVISZONYATSZUNETELTETO = 'T', 'Jogviszony szüneteltetve, ', '') + 
    IIF(t.C_SZAKMAIGYAKORLATON = 'T', 'Szakmai gyakorlat, ', '') + 
    IIF(t.C_SZOCIALISTAMOGATAS = 'T', 'Szociális támogatás, ', '') AS socAdat,
    tt.C_NEV as kepzes,
    STUFF((
    SELECT  char(13) + char(10) + gv.C_NEV
      FROM T_GONDVISELO_OSSZES gv
      WHERE  gv.C_TANULOID = s.ID
        AND gv.TOROLT = 'F'
      FOR XML PATH(''), TYPE).value('.', 'nvarchar(4000)'),1,2,'') AS gondviselok,
    f.C_NYOMTATASINEV as tanuloNeve,
	d.C_NAME allampolgarsaga,
	t.C_DIAKIGAZOLVANYSZAM diakIgazolvanySzam,
	cs.C_KILEPESDATUM kilepesDatum
  FROM T_TANULO_OSSZES t
    INNER JOIN @students s ON s.ID = t.ID
	INNER JOIN @NaploSorszam naploSorszam on naploSorszam.TanuloId=s.ID
    INNER JOIN T_TANTERV_OSSZES tt ON tt.ID = t.C_TANTERVID
    INNER JOIN T_FELHASZNALO_OSSZES f ON f.ID = t.ID
    INNER JOIN T_TANULOCSOPORT_OSSZES cs ON s.ID = cs.C_TANULOID AND cs.C_OSZTALYCSOPORTID = @osztalyId
	INNER JOIN T_DICTIONARYITEMBASE_OSSZES d on d.id=f.C_ALLAMPOLGARSAGA AND d.C_TANEVID = f.C_TANEVID AND d.C_INTEZMENYID = f.C_INTEZMENYID
	WHERE t.TOROLT='F' 
  ) tbl
  ORDER BY tanuloNeve

  /*TANULÓ elérhetőségei */
	 SELECT DISTINCT 
		tanulo.Id tanuloID
		, cimTipus
		, cim.OsszetettCim cim
		, telefon.Telefonszam
		, email.Email
		, cim.ct 
	FROM @students Tanulo
	LEFT JOIN (SELECT 
					c.C_FELHASZNALOID Tanulo
					, c.C_IRANYITOSZAM+', '+c.C_VAROS+', '+C_KOZTERULET+' '+kozteruletJellege.C_NAME+' '+C_HAZSZAM OsszetettCim
					, cimTipus.C_NAME cimTipus
					, cimTipus.Id ct 
				FROM T_CIM_OSSZES c
					INNER JOIN (SELECT DISTINCT ID, C_NAME FROM T_DICTIONARYITEMBASE_OSSZES d) kozteruletJellege ON kozteruletJellege.Id=c.c_kozteruletjellege
					INNER JOIN (SELECT DISTINCT ID, C_NAME FROM T_DICTIONARYITEMBASE_OSSZES d) cimTipus ON cimTipus.Id=c.C_CIMTIPUSA
				WHERE c.TOROLT='F' AND c.C_GONDVISELOID IS NULL) cim ON cim.Tanulo=Tanulo.Id
	LEFT JOIN (SELECT 
					C_FELHASZNALOID Tanulo
					, C_TELEFONSZAM Telefonszam 
				FROM T_TELEFON_OSSZES 
				WHERE TOROLT='F' 
				AND C_ALAPERTELMEZETT='T') telefon on telefon.Tanulo=Tanulo.Id
	LEFT JOIN (SELECT C_FELHASZNALOID Tanulo
						, C_EMAILCIM Email 
				FROM T_EMAIL_OSSZES 
				WHERE Torolt='F' 
				AND C_ALAPERTELMEZETT='T') email ON email.Tanulo=Tanulo.Id


  /* TANULÓ mentesség */
	SELECT s.ID tanuloId 
			,ROW_NUMBER() OVER(PARTITION BY s.ID ORDER BY s.ID) sorszam
			, mentesseg.tantargyNev
			, mentesseg.mentessegOka
			, ISNULL(IIF(mentesseg = '', ''
			, LEFT(mentesseg, LEN(mentesseg)- 1)),' ') mentesseg 
	FROM @students s
	LEFT JOIN  (SELECT DISTINCT 
								mentesseg.C_TANULOID tanuloId
								, ISNULL(t.C_NEVNYOMTATVANYBAN, t.C_NEV) tantargyNev
								, mentesseg.C_MENTESSEGOKA mentessegOka
								, IIF(mentesseg.C_ERTEKELESMENTESITES = 'T', 'Értékelésmentesség, ', '') + IIF(mentesseg.C_ORAMENTESITES = 'T', 'Óramentesség, ', '') as mentesseg 
				FROM T_TANULOMENTESSEG_OSSZES mentesseg
					INNER JOIN T_TANTARGY_OSSZES t on t.ID=mentesseg.C_TANTARGYID
				  WHERE C_TANULOID IN (SELECT ID FROM @students) 
						AND mentesseg.TOROLT='F' 
						AND mentesseg.C_TANEVID=@tanevId
					) mentesseg ON s.ID=mentesseg.TANULOID

  /* TANULÓ feljegyzései */  
    SELECT s.ID as tanuloID, ROW_NUMBER() OVER(PARTITION BY s.ID ORDER BY s.ID) AS sorszam,
    FORMAT(te.C_KEZDETE, 'd', 'hu-hu') as datum, d.C_NAME as tipus, te.C_TARTALOM as tartalom, f.c_nyomtatasinev as tanar 
  FROM @students s 
    LEFT JOIN T_TANULOESEMENY_OSSZES te on s.id = te.C_TANULOID and te.torolt='F' and te.c_tanevId=@tanevId
    LEFT JOIN (select distinct id, c_name from T_DICTIONARYITEMBASE_OSSZES) d ON d.ID = te.C_TIPUS 
    LEFT JOIN T_FELHASZNALO_OSSZES f ON f.id = te.C_FELJEGYZOID
  WHERE te.C_TIPUS IN (1543, 1544) OR te.C_TIPUS IS NULL

  /* TANULÓ Határozatok */
    SELECT s.ID as tanuloID, ROW_NUMBER() OVER(PARTITION BY s.ID ORDER BY s.ID) AS sorszam, 
    FORMAT(te.C_KEZDETE, 'd', 'hu-hu') as datum, d.C_NAME as tipus, te.C_TARTALOM as tartalom, f.c_nyomtatasinev as tanar 
  FROM @students s 
    LEFT JOIN T_TANULOESEMENY_OSSZES te ON s.id = te.C_TANULOID and te.torolt='F' and te.c_tanevId=@tanevId
    LEFT JOIN (select distinct id, c_name from T_DICTIONARYITEMBASE_OSSZES) d ON d.ID = te.C_TIPUS 
    LEFT JOIN T_FELHASZNALO_OSSZES f ON f.id = te.C_FELJEGYZOID
  WHERE te.C_TIPUS <> 1534 

  /* TANULO mulasztása */
declare @Mulasztasok table ( IgazoltE nvarchar(1), Tanulo int, Tipus int)

--Félév kezdete
DECLARE @FelevKezdete DATE
DECLARE @FelevVege DATE
set @FelevKezdete= (select top 1 c_datum from t_tanevrendje_osszes tr where c_naptipusa=1394 and c_tanevid=@tanevId and c_intezmenyid=@intezmenyId and torolt='F')
set @FelevVege=		(select top 1 tr.C_DATUM from t_tanevrendje_osszes tr  where tr.c_naptipusa=1400 and c_tanevid=@tanevId and Torolt='F')

--hiányzás	

--igazolt
insert into @Mulasztasok
select 'T',  * from @students
		cross join (select distinct id from t_dictionaryitembase_osszes where c_type like 'igazolastipus') Tipus (Tipus)

select Mulasztas.tanuloid, Mulasztas.tipus, Mulasztas.[09.], Mulasztas.[10.], Mulasztas.[11.], Mulasztas.[12.],
		Mulasztas.[01.], Mulasztas.[02.], Mulasztas.[03.], Mulasztas.[04.], Mulasztas.[05.], Mulasztas.[06.],
		mulasztas.felev felev, isnull(Mulasztas.osszesen,0) Osszesen, mulasztas.Rendez from 
(
	select m.Tanulo tanuloid, '-'+d.c_name tipus, 		 
			isnull(p.[9],0) '09.', isnull(p.[10],0) '10.', isnull(p.[11],0) '11.', isnull(p.[12],0) '12.', 
			isnull(p.[1],0) '01.', isnull(p.[2],0) '02.', isnull(p.[3],0) '03.', isnull(p.[4],0) '04.', isnull(p.[5],0) '05.', isnull(p.[6],0) '06.',
			isnull(Felev,0) 'felev', [9]+[10]+[11]+[12]+[1]+[2]+[3]+[4]+[5]+[6] 'osszesen', d.id Rendez
	from @Mulasztasok m
	left join  	(select * from (select tm.id id, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, tm.c_igazolastipusa Tipus, datepart(month,tao.c_datum) Honap from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
				where tm.c_tanevId=@tanevId and tm.c_igazolt='T' and tm.c_tipus=1500 and tm.torolt='F')a
				pivot (count(id) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv
				)p on p.tanulo=m.Tanulo and p.igazoltE=m.IgazoltE and p.Tipus=m.Tipus
	left join (select distinct id, c_name from t_dictionaryitembase_osszes)d on d.id=m.Tipus
	left join (select count(tm.id) Felev, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, tm.c_igazolastipusa Tipus from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_igazolt='T' and tm.c_tipus=1500 and tm.torolt='F'
				group by tm.c_igazolt, tm.c_oratanuloiid, tm.c_igazolastipusa
				)felev on felev.tanulo=m.Tanulo and felev.igazoltE=m.IgazoltE and felev.Tipus=m.Tipus

	union

	select s.id, 'igazolt',  
			isnull(ni.[9],0) '09.', isnull(ni.[10],0) '10.', isnull(ni.[11],0) '11.', isnull(ni.[12],0) '12.', 
			isnull(ni.[1],0) '01.', isnull(ni.[2],0) '02.', isnull(ni.[3],0) '03.', isnull(ni.[4],0) '04.', isnull(ni.[5],0) '05.', isnull(ni.[6],0) '06.',
			isnull(Felev,0) 'felev', [9]+[10]+[11]+[12]+[1]+[2]+[3]+[4]+[5]+[6] 'osszesen', 2 Rendez
	from @students s
		left join (	select * from (select  tm.id id, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, 'igazolatlan' tipus, datepart(month,tao.c_datum) Honap  from t_tanulomulasztas_osszes tm 
						inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
					where tm.c_tanevId=@tanevId and tm.c_igazolt='T' and tm.c_tipus=1500 and tm.torolt='F')a
					pivot (count(id) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv )ni on ni.Tanulo=s.Id
		left join (select count(tm.id) Felev, tm.c_oratanuloiid Tanulo from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_igazolt='T' and tm.c_tipus=1500 and tm.torolt='F'
				group by tm.c_oratanuloiid
				)felev on felev.tanulo=s.id

	union

	--igazolatlan
	select s.id, 'igazolatlan',  
			isnull(ni.[9],0) '09.', isnull(ni.[10],0) '10.', isnull(ni.[11],0) '11.', isnull(ni.[12],0) '12.', 
			isnull(ni.[1],0) '01.', isnull(ni.[2],0) '02.', isnull(ni.[3],0) '03.', isnull(ni.[4],0) '04.', isnull(ni.[5],0) '05.', isnull(ni.[6],0) '06.',
			isnull(Felev,0) 'felev', [9]+[10]+[11]+[12]+[1]+[2]+[3]+[4]+[5]+[6] 'osszesen', 4999 Rendez
	from @students s
		left join (	select * from (select  tm.id id, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, 'igazolatlan' tipus, datepart(month,tao.c_datum) Honap  from t_tanulomulasztas_osszes tm 
						inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
					where tm.c_tanevId=@tanevId and tm.c_igazolt='F' and tm.c_tipus=1500 and tm.torolt='F')a
					pivot (count(id) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv )ni on ni.Tanulo=s.Id
		left join (select count(tm.id) Felev, tm.c_oratanuloiid Tanulo from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_igazolt='F' and tm.c_tipus=1500 and tm.torolt='F'
				group by tm.c_oratanuloiid
				)felev on felev.tanulo=s.id
	
	union 

	--Összes
	select s.id, 'mulasztás',  
			isnull(ni.[9],0) '09.', isnull(ni.[10],0) '10.', isnull(ni.[11],0) '11.', isnull(ni.[12],0) '12.', 
			isnull(ni.[1],0) '01.', isnull(ni.[2],0) '02.', isnull(ni.[3],0) '03.', isnull(ni.[4],0) '04.', isnull(ni.[5],0) '05.', isnull(ni.[6],0) '06.',
			isnull(Felev,0) 'felev', [9]+[10]+[11]+[12]+[1]+[2]+[3]+[4]+[5]+[6] 'osszesen', 1 Rendez
	from @students s
		left join (	select * from (select  tm.id id, tm.c_oratanuloiid Tanulo, 'Összes' tipus, datepart(month,tao.c_datum) Honap  from t_tanulomulasztas_osszes tm 
						inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
					where tm.c_tanevId=@tanevId and tm.c_tipus=1500 and tm.torolt='F')a
					pivot (count(id) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv )ni on ni.Tanulo=s.Id
		left join (select count(tm.id) Felev, tm.c_oratanuloiid Tanulo from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_tipus=1500 and tm.torolt='F'
				group by tm.c_oratanuloiid
				)felev on felev.tanulo=s.id

--késés
	union

	select s.id, 'késés (p)',  
			isnull(ni.[9],0) '09.', isnull(ni.[10],0) '10.', isnull(ni.[11],0) '11.', isnull(ni.[12],0) '12.', 
			isnull(ni.[1],0) '01.', isnull(ni.[2],0) '02.', isnull(ni.[3],0) '03.', isnull(ni.[4],0) '04.', isnull(ni.[5],0) '05.', isnull(ni.[6],0) '06.',
			isnull(Felev,0) 'felev', 			
			isnull(ni.[9],0)+isnull(ni.[10],0)+isnull(ni.[11],0)+isnull(ni.[12],0)+ isnull(ni.[1],0)+
			isnull(ni.[2],0)+isnull(ni.[3],0)+isnull(ni.[4],0)+isnull(ni.[5],0)+isnull(ni.[6],0)			
			'osszesen', 5000 Rendez
	from @students s
		left join (	select * from (select  tm.c_kesespercben perc, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, 'késés' tipus, datepart(month,tao.c_datum) Honap  from t_tanulomulasztas_osszes tm 
						inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
					where tm.c_tanevId=@tanevId and tm.c_tipus=1499 and tm.torolt='F')a
					pivot (sum(perc) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv )ni on ni.Tanulo=s.Id
		left join (select sum(tm.c_kesespercben) Felev, tm.c_oratanuloiid Tanulo from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_tipus=1499 and tm.torolt='F'
				group by tm.c_oratanuloiid
				)felev on felev.tanulo=s.id

	union 

	--igazolt
	select s.id, '* igazolt (p)',  
			isnull(ni.[9],0) '09.', isnull(ni.[10],0) '10.', isnull(ni.[11],0) '11.', isnull(ni.[12],0) '12.', 
			isnull(ni.[1],0) '01.', isnull(ni.[2],0) '02.', isnull(ni.[3],0) '03.', isnull(ni.[4],0) '04.', isnull(ni.[5],0) '05.', isnull(ni.[6],0) '06.',
			isnull(Felev,0) 'felev', 
			isnull(ni.[9],0)+isnull(ni.[10],0)+isnull(ni.[11],0)+isnull(ni.[12],0)+ isnull(ni.[1],0)+
			isnull(ni.[2],0)+isnull(ni.[3],0)+isnull(ni.[4],0)+isnull(ni.[5],0)+isnull(ni.[6],0)'osszesen', 5001 Rendez
	from @students s
		left join (	select * from (select  tm.c_kesespercben perc, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, 'késés' tipus, datepart(month,tao.c_datum) Honap  from t_tanulomulasztas_osszes tm 
						inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
					where tm.c_tanevId=@tanevId and tm.c_tipus=1499 and tm.c_igazolt='T' and tm.torolt='F')a
					pivot (sum(perc) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv )ni on ni.Tanulo=s.Id
		left join (select sum(tm.c_kesespercben) Felev, tm.c_oratanuloiid Tanulo from t_tanulomulasztas_osszes tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_tipus=1499 and tm.c_igazolt='T' and tm.torolt='F'
				group by tm.c_oratanuloiid
				)felev on felev.tanulo=s.id

	union 

	--igazolatlan
	select s.id, '* igazolatlan (p)',  
			isnull(ni.[9],0) '09.', isnull(ni.[10],0) '10.', isnull(ni.[11],0) '11.', isnull(ni.[12],0) '12.', 
			isnull(ni.[1],0) '01.', isnull(ni.[2],0) '02.', isnull(ni.[3],0) '03.', isnull(ni.[4],0) '04.', isnull(ni.[5],0) '05.', isnull(ni.[6],0) '06.',
			isnull(Felev,0) 'felev', 
			isnull(ni.[9],0)+isnull(ni.[10],0)+isnull(ni.[11],0)+isnull(ni.[12],0)+ isnull(ni.[1],0)+
			isnull(ni.[2],0)+isnull(ni.[3],0)+isnull(ni.[4],0)+isnull(ni.[5],0)+isnull(ni.[6],0) 'osszesen', 5002 Rendez
	from @students s
		left join (	select * from (select  tm.c_kesespercben perc, tm.c_igazolt IgazoltE, tm.c_oratanuloiid Tanulo, 'késés' tipus, datepart(month,tao.c_datum) Honap  from t_tanulomulasztas_osszes tm 
						inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok)
					where tm.c_tanevId=@tanevId and tm.c_tipus=1499 and tm.c_igazolt='F' and tm.torolt='F')a
					pivot (sum(perc) for Honap in ([9], [10], [11], [12], [1], [2], [3], [4], [5], [6]))piv )ni on ni.Tanulo=s.Id
		left join (select sum(tm.c_kesespercben) Felev, tm.c_oratanuloiid Tanulo from t_tanulomulasztas tm
					inner join t_tanitasiora_osszes tao on tm.c_tanitasiorakid=tao.id and tao.c_osztalycsoportid in (select * from @osztalycsoportok) and tao.c_datum>=@FelevKezdete and tao.c_datum<=@FelevVege
				where tm.c_tanevId=@tanevId and tm.c_tipus=1499 and tm.c_igazolt='F' and tm.torolt='F'
				group by tm.c_oratanuloiid
				)felev on felev.tanulo=s.id
)Mulasztas
order by Rendez


declare @gondviselok table (Id int)
insert into @gondviselok
select g.ID from @students s
	left join T_GONDVISELO_OSSZES g on g.C_TANULOID=s.id

  /*gondviselő elérhetőségei */
SELECT 
	s.Id Id
	, g.c_nev C_NEV
	, cim.cimTipus C_CIMTIPUSA
	, cim.OsszetettCim+' ('+cim.cimTipus+')' C_OSSZETETTCIM
	, telefon.Telefonszam C_TELEFONSZAM
	, email.Email C_EMAILCIM
FROM @students s
	LEFT JOIN T_GONDVISELO_OSSZES g on g.c_tanuloid=s.id 
	LEFT JOIN (SELECT 
					c.c_gondviseloid Gondviselo
					, c.C_IRANYITOSZAM+', '+c.C_VAROS+', '+c_kozterulet+' '+kozteruletJellege.c_name+' '+c_hazszam OsszetettCim
					, cimTipus.c_name cimTipus 
				FROM T_CIM_OSSZES c
					INNER JOIN (SELECT DISTINCT ID, C_NAME FROM T_DICTIONARYITEMBASE_OSSZES d) kozteruletJellege ON kozteruletJellege.Id=c.C_KOZTERULETJELLEGE
					INNER JOIN (SELECT DISTINCT ID, C_NAME FROM T_DICTIONARYITEMBASE_OSSZES d) cimTipus ON cimTipus.Id=c.c_cimtipusa
				WHERE  c.TOROLT='F' and c.C_GONDVISELOID IN (SELECT ID FROM @gondviselok)) cim ON cim.Gondviselo=g.Id
	LEFT JOIN (SELECT C_GONDVISELOID Gondviselo, C_TELEFONSZAM Telefonszam FROM T_TELEFON_OSSZES WHERE TOROLT='F' ) telefon ON telefon.Gondviselo=g.Id
	LEFT JOIN (SELECT C_GONDVISELOID Gondviselo, C_EMAILCIM Email from T_EMAIL_OSSZES where TOROLT='F') email ON email.Gondviselo=g.Id


  /*TANULÓ osztályzatai*/
  SET @pivotList = null;
  SET @selectList = null;
  SET @sql = null;
  DECLARE @columnList nvarchar(max);

  SELECT 
    @pivotList  = ISNULL(@pivotList  + ', ', '') + '[' + CAST(t.Targyid AS varchar(6)) + ']',
    @selectList = ISNULL(@selectList + ', ', '') + '[' + CAST(t.Targyid AS varchar(6)) + '] AS [' + t.Targy + ']',
    @columnList = ISNULL(@columnList + ', ', '') + '[' + CAST(t.Targyid AS varchar(6)) + '] nvarchar(250) '
  FROM (
    SELECT DISTINCT Targyid, Targy FROM @TenylegesOrak) t

  SET @sql = 'DECLARE @students TABLE (id int primary key)

  INSERT INTO @students
  SELECT 
	C_TANULOID 
  FROM T_TANULOCSOPORT_OSSZES
  WHERE 
	C_OSZTALYCSOPORTID = @osztaly 
	AND TOROLT = ''F''

  DECLARE @masodikFelev datetime  
  SELECT TOP 1 @masodikFelev = DATEADD(d, 1, C_DATUM) 
  FROM T_TANEVRENDJE_OSSZES 
  WHERE T_TANEVRENDJE_OSSZES.TOROLT=''F'' AND C_NAPTIPUSA= 1400 --Első félév vége
  and torolt=''F'' and c_intezmenyId=@intezmenyId 

  DECLARE @idoszak TABLE (
    id int primary key, 
    period varchar(10), 
    startdate datetime, 
    enddate datetime
  )

  INSERT INTO @idoszak (
     id
    ,period
    ,startdate
    ,enddate
  ) SELECT 
    ROW_NUMBER() OVER(ORDER BY (SELECT 1))  AS id
    ,IIF(MONTH(n.C_NAPDATUMA) <> 1, CAST(MONTH(n.C_NAPDATUMA) AS varchar(3)), ''1/I'') AS period
    ,DATEFROMPARTS ( YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA), 1 ) AS startdate
    ,IIF(MONTH(n.C_NAPDATUMA) = 1,
      @masodikFelev,
      DATEADD(m, 1, DATEFROMPARTS ( YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA), 1 ))
    ) AS enddate
  FROM T_NAPTARINAP_OSSZES n
    INNER JOIN T_TANEV_OSSZES te ON te.ID = n.C_TANEVID
  WHERE te.C_AKTIV = ''T''
    AND MONTH(n.C_NAPDATUMA) IN (1, 9, 10, 11, 12)
  GROUP BY YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA)
  ORDER BY YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA)

  INSERT INTO @idoszak (
     id
    ,period
    ,startdate
    ,enddate
  ) SELECT 
    6 + ROW_NUMBER() OVER(ORDER BY (SELECT 1))  AS id
    ,IIF(MONTH(n.C_NAPDATUMA) <> 1, CAST(MONTH(n.C_NAPDATUMA) AS varchar(3)), ''1/II'') AS period
    ,IIF(MONTH(n.C_NAPDATUMA) =  1, @masodikFelev, DATEFROMPARTS ( YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA), 1 )) AS startdate
    ,DATEADD(m, 1, DATEFROMPARTS ( YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA), 1 )) AS enddate
  FROM T_NAPTARINAP_OSSZES n
    INNER JOIN T_TANEV_OSSZES te ON te.ID = n.C_TANEVID
  WHERE te.C_AKTIV = ''T''
    AND MONTH(n.C_NAPDATUMA) BETWEEN 1 AND 6
  GROUP BY YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA)
  ORDER BY YEAR(n.C_NAPDATUMA), MONTH(n.C_NAPDATUMA)

  INSERT INTO @idoszak (id, period) VALUES
    (6, ''Félév''), (13, ''Év vége'')  

  DECLARE @jegyek TABLE (
  	periodId int,
  	tanuloId int
    ' + ISNULL(',' + @columnList, '') + '
  )

  INSERT INTO @jegyek
  SELECT id, tanuloID, ' + @pivotList + '
  FROM (
      SELECT i.id, e.C_TANULOID AS tanuloID, e.C_TANTARGYID as tantargyID,
      STUFF((
            SELECT '', '' + ISNULL(CAST (C_SZAZALEK AS varchar(5)) + ''%'', CAST(sd.C_VALUE  AS varchar(5)))
            FROM @idoszak si 
              LEFT JOIN T_TANULOERTEKELES_OSSZES se ON se.C_ERTEKELESDATUM >= si.startdate AND se.C_ERTEKELESDATUM < si.enddate and se.torolt=''F'' and se.c_tanevId=@tanevId
    			    AND se.C_TANTARGYID = e.C_TANTARGYID
    				AND se.C_ERTEKELESTIPUSA = e.C_ERTEKELESTIPUSA
    				AND se.C_TANULOID = e.C_TANULOID 
              LEFT JOIN T_DICTIONARYITEMBASE_OSSZES sd ON sd.ID = se.C_OSZTALYZAT AND sd.C_TANEVID=se.C_TANEVID AND sd.C_INTEZMENYID=se.C_INTEZMENYID
			  LEFT JOIN T_OSZTALYZATERTEKELES_OSSZES oe ON oe.ID=SE.ID AND C_SZAZALEK IS NOT NULL
            WHERE i.ID = si.ID
			FOR XML PATH(''''), TYPE).value(''.'', ''varchar(max)''), 1, 2, '''') AS Osztalyzat
      FROM T_TANULOERTEKELES_OSSZES e
        INNER JOIN @students s ON s.id = e.C_TANULOID
        INNER JOIN @idoszak i ON e.C_ERTEKELESDATUM >= i.startdate AND e.C_ERTEKELESDATUM < i.enddate
      WHERE e.C_ERTEKELESTIPUSA = 1518 /* Évközi jegy/értékelés */ and e.c_tanevId=@tanevId
        AND e.TOROLT = ''F''
      GROUP BY e.C_TANULOID, e.C_TANTARGYID, e.C_ERTEKELESTIPUSA, i.id 

      UNION ALL

		SELECT 
			IIF(e.C_ERTEKELESTIPUSA = 1519, 6, 13)
			,e.C_TANULOID
			,e.C_TANTARGYID
			,CAST(MIN(d.C_VALUE) AS varchar(1))
		FROM @students s
			INNER JOIN T_TANULOERTEKELES_OSSZES e ON e.C_TANULOID = s.id AND e.C_ERTEKELESTIPUSA IN (1519, 1520)
			INNER JOIN (select distinct id, c_tanevid, c_value from T_DICTIONARYITEMBASE_OSSZES) d ON d.id = e.C_OSZTALYZAT AND d.C_TANEVID = e.C_TANEVID
		WHERE e.TOROLT=''F''
		GROUP BY e.C_TANULOID, e.C_TANTARGYID, e.C_ERTEKELESTIPUSA	 
    ) asd 
    PIVOT (
  	MAX(Osztalyzat)
  	FOR tantargyID IN (' + @pivotList + ')
    ) AS pvt

     SELECT p.id AS periodusId, p.period AS periodusNev, s.id tanuloID, msz.mag Magatartás,  msz.szorg Szorgalom, ' + @selectList + '
    FROM @idoszak p
    CROSS JOIN @students s
  LEFT JOIN (
  	SELECT i.id as periodusId, s.id tanuloID, m.C_NAME mag, sz.C_NAME szorg
  	FROM T_TANULOERTEKELES_OSSZES e
  		INNER JOIN T_OSZTALYFONOKIERTEKELES_OSSZES oe on oe.ID = e.id and oe.torolt=''F'' --and oe.c_alintezmenyId=@intezmenyId and oe.c_altanevId=@tanevId
  		INNER JOIN T_DICTIONARYITEMBASE_OSSZES m ON m.ID = oe.C_MAGATARTAS  AND m.C_TANEVID = oe.C_ALTANEVID
  		INNER JOIN T_DICTIONARYITEMBASE_OSSZES sz ON sz.id = oe.C_SZORGALOM AND sz.C_TANEVID = oe.C_ALTANEVID
  		INNER JOIN @idoszak i ON e.C_ERTEKELESDATUM >= i.startdate AND e.C_ERTEKELESDATUM < i.enddate
  		INNER JOIN @students s ON s.id = e.C_TANULOID
  	WHERE e.C_ERTEKELESTIPUSA = 1518 and e.torolt=''F'' and e.c_intezmenyId=@intezmenyId and e.c_tanevId=@tanevId
  	GROUP BY i.id, s.id, m.C_NAME, sz.C_NAME

  	UNION ALL

  	SELECT IIF(e.C_ERTEKELESTIPUSA = 1519, 6, 13), e.C_TANULOID,  ISNULL(m.C_NAME, ISNULL(e.C_ERTEKELESSZOVEG, mJEGY.C_NAME)) mag, ISNULL(sz.C_NAME, ISNULL(e.C_ERTEKELESSZOVEG, szJEGY.C_NAME)) szorg
  	FROM T_TANULOERTEKELES_OSSZES e 
  		INNER JOIN @students s ON e.C_TANULOID = s.id AND e.C_ERTEKELESTIPUSA IN (1519, 1520)
  		INNER JOIN T_OSZTALYFONOKIERTEKELES_OSSZES oe on oe.ID = e.id and oe.torolt=''F'' and oe.c_alintezmenyId=@intezmenyId and oe.c_altanevId=@tanevId
  		LEFT JOIN T_DICTIONARYITEMBASE_OSSZES m ON m.ID = oe.C_MAGATARTAS  AND m.C_TANEVID = oe.C_ALTANEVID
  		LEFT JOIN T_DICTIONARYITEMBASE_OSSZES sz ON sz.id = oe.C_SZORGALOM AND sz.C_TANEVID = oe.C_ALTANEVID
		LEFT JOIN T_DICTIONARYITEMBASE_OSSZES mJEGY ON mJEGY.ID=e.C_OSZTALYZAT AND mJEGY.C_TANEVID = @tanevId
		LEFT JOIN T_DICTIONARYITEMBASE_OSSZES szJEGY ON szJEGY.ID=e.C_OSZTALYZAT AND szJEGY.C_TANEVID = @tanevId
  	WHERE e.C_ERTEKELESTIPUSA IN (1519, 1520) AND e.TOROLT=''F''
  	GROUP BY e.C_ERTEKELESTIPUSA, e.C_TANULOID, m.C_NAME, e.C_ERTEKELESSZOVEG, mJEGY.C_NAME, sz.C_NAME, szJEGY.C_NAME
  ) msz ON msz.periodusId = p.id AND msz.tanuloID = s.id
    LEFT JOIN @jegyek tbl ON tbl.periodId = p.ID AND tbl.tanuloID = s.id
  ORDER BY s.id, p.id'
  EXEC sp_executesql @sql, N'@osztaly int, @intezmenyId int, @tanevId int', @osztalyId, @intezmenyId, @tanevId


  /* TANULÓ záradékai */
	SELECT
		students.ID tanuloId
		,tanuloCsoport.C_ZARADEK zaradek
	FROM @students students
		INNER JOIN T_TANULOCSOPORT_OSSZES tanuloCsoport on students.ID = tanuloCsoport.C_TANULOID
	WHERE 
		tanuloCsoport.C_OSZTALYCSOPORTID = @osztalyId
		AND TOROLT = 'F'
  
  /*Szöveges minősítések*/
	SELECT 
		s.id tanuloId
		, szoveges.Honap
		, szoveges.Tantargy
		, szoveges.Ertekeles 
	FROM @students s
	LEFT JOIN (SELECT 
					C_TANULOID tanuloId
					, '['+CONVERT(NVARCHAR(MAX),DATEPART(MONTH, C_ERTEKELESDATUM))+'. hónap]' Honap
					, ISNULL(t.C_NEVNYOMTATVANYBAN, t.C_NEV) Tantargy
					, C_ERTEKELESSZOVEG Ertekeles 
				FROM T_TANULOERTEKELES_OSSZES te 
					INNER JOIN T_TANTARGY_OSSZES t on t.ID=te.C_TANTARGYID
				WHERE 
					C_TANULOID IN (SELECT ID FROM @students) 
					AND C_ERTEKELESSZOVEG IS NOT NULL 
					AND te.C_TANEVID=@tanevId 
					AND te.TOROLT='F'
			) szoveges on szoveges.TANULOID=s.Id
	ORDER BY Honap, Tantargy

END

GO