mirror of
https://github.com/FH-Complete/FHC-Core.git
synced 2026-07-20 08:22:17 +00:00
This commit is contained in:
Andreas Österreicher
@@ -0,0 +1,346 @@
|
||||
<?php
|
||||
/* Copyright (C) 2008 Technikum-Wien
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as
|
||||
* published by the Free Software Foundation; either version 2 of the
|
||||
* License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
|
||||
*
|
||||
* Authors: Christian Paminger <christian.paminger@technikum-wien.at>,
|
||||
* Andreas Oesterreicher <andreas.oesterreicher@technikum-wien.at> and
|
||||
* Rudolf Hangl <rudolf.hangl@technikum-wien.at>.
|
||||
*/
|
||||
|
||||
//PDF fuer die Anwesenheitsliste auf CIS
|
||||
|
||||
//PDF erzeugen
|
||||
$pdf = new PDF('P','pt');
|
||||
$pdf->Open();
|
||||
$pdf->AddPage();
|
||||
$pdf->AliasNbPages();
|
||||
|
||||
$pdf->SetFillColor(111,111,111);
|
||||
$pdf->SetXY(30,40);
|
||||
$stgobj=new studiengang($conn);
|
||||
$stgobj->load($stg);
|
||||
//Logo
|
||||
$pdf->Image("../../../skin/images/tw_logo_02.jpg","430","55","120","35","jpg","");
|
||||
//$pdf->Image("../../../skin/images/tw_logo_02.jpg","400","30","116","43","jpg","");
|
||||
|
||||
$lvobj = new lehrveranstaltung($conn, $lvid);
|
||||
|
||||
$pdf->SetFont('Arial','',16);
|
||||
$pdf->MultiCell(0,20,'Anwesenheitsliste '.$lvobj->bezeichnung,0,'L',0);
|
||||
|
||||
$pdf->SetFont('Arial','',10);
|
||||
$pdf->SetFillColor(190,190,190);
|
||||
//Bei langen Namen muss der Gruppenname etwas weiter unten angezeigt werden da er
|
||||
//sonst von der zweiten Zeile des Titels ueberschrieben wird.
|
||||
if(strlen($lvobj->bezeichnung)>50)
|
||||
$pdf->SetXY(30,75);
|
||||
else
|
||||
$pdf->SetXY(30,60);
|
||||
|
||||
//$stsem_obj = new studiensemester($conn);
|
||||
//$stsem = $stsem_obj->getaktorNext();
|
||||
|
||||
$qry = "SELECT distinct on(kuerzel, semester, verband, gruppe, gruppe_kurzbz) UPPER(stg_typ::varchar(1) || stg_kurzbz) as kuerzel, semester, verband, gruppe, gruppe_kurzbz from campus.vw_lehreinheit WHERE lehrveranstaltung_id='".addslashes($lvid)."' AND studiensemester_kurzbz='".addslashes($stsem)."'";
|
||||
if($lehreinheit_id!='')
|
||||
$qry.=" AND lehreinheit_id='".addslashes($lehreinheit_id)."'";
|
||||
|
||||
$gruppen='';
|
||||
if($result = pg_query($conn, $qry))
|
||||
{
|
||||
while($row = pg_fetch_object($result))
|
||||
{
|
||||
if($gruppen!='')
|
||||
$gruppen.=', ';
|
||||
if($row->gruppe_kurzbz=='')
|
||||
$gruppen.=trim($row->kuerzel.'-'.$row->semester.$row->verband.$row->gruppe);
|
||||
else
|
||||
$gruppen.=$row->gruppe_kurzbz;
|
||||
}
|
||||
}
|
||||
$pdf->MultiCell(0,20,'Gruppe: '.$gruppen.' Studiensemester: '.$stsem);
|
||||
|
||||
$maxY=$pdf->GetY();
|
||||
$maxY=getmax($maxY,$pdf->GetY());
|
||||
|
||||
|
||||
$pdf->SetFont('Arial','B',12);
|
||||
|
||||
$pdf->SetXY(30,90);
|
||||
$pdf->MultiCell(0,20,'Monat _________');
|
||||
|
||||
//Anfang Tabelle
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$lineheight=12;
|
||||
//Datum
|
||||
$maxY=$pdf->GetY()+10;
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(280,$lineheight,'Datum',1,'L',0);
|
||||
$maxX +=280;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
|
||||
//Anzahl der abgehaltenen Stunden
|
||||
$maxY=$pdf->GetY();
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(280,$lineheight,'Anzahl der abgehaltenen Stunden',1,'L',0);
|
||||
$maxX +=280;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
|
||||
//Lektoren
|
||||
$pdf->SetFont('Arial','B',10);
|
||||
$maxY=$pdf->GetY();
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(520,$lineheight+2,'Lektoren',1,'L',1);
|
||||
|
||||
//Schleife aller lektoren
|
||||
|
||||
$qry = "SELECT
|
||||
distinct vorname, nachname
|
||||
FROM campus.vw_benutzer, lehre.tbl_lehreinheit, lehre.tbl_lehreinheitmitarbeiter
|
||||
WHERE
|
||||
uid=mitarbeiter_uid AND
|
||||
tbl_lehreinheit.lehreinheit_id=tbl_lehreinheitmitarbeiter.lehreinheit_id AND
|
||||
lehrveranstaltung_id='".addslashes($lvid)."' AND
|
||||
studiensemester_kurzbz='$stsem' ";
|
||||
if($lehreinheit_id!='')
|
||||
$qry.=" AND tbl_lehreinheit.lehreinheit_id='".addslashes($lehreinheit_id)."'";
|
||||
$qry.=" ORDER BY nachname, vorname;";
|
||||
|
||||
if($result = pg_query($conn,$qry))
|
||||
{
|
||||
while($row=pg_fetch_object($result))
|
||||
{
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$maxY=$pdf->GetY();
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(280,$lineheight,"$row->vorname $row->nachname",1,'L',0);
|
||||
$maxX +=280;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
}
|
||||
}
|
||||
//Studenten
|
||||
$pdf->SetFont('Arial','B',10);
|
||||
$maxY=$pdf->GetY();
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(520,$lineheight+2,'Studenten',1,'L',1);
|
||||
|
||||
$maxY=$pdf->GetY();
|
||||
$pdf->tablewidths = array(20,140,60,60,40,40,40,40,40,40); //Spaltenbreiten setzen
|
||||
$pdf->SetLeftMargin(30);
|
||||
$pdf->SetTopMargin(100); // Auch in der Funktion Header umstellen!!!
|
||||
|
||||
$aligns = array('R','L','C','C','L','L','L','L','L','L'); //Ausrichtung der Tabellen festlegen
|
||||
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$pdf->SetXY(30,$maxY);
|
||||
$inhalt[]=array(' ','Hörer/Name','Kennzeichen','Gruppe','','','','','',''); //Spaltenueberschriften
|
||||
|
||||
//Studenten holen
|
||||
|
||||
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$maxY=$pdf->GetY();
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(20,$lineheight,'',1,'R',0);
|
||||
$maxX +=20;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->SetFont('Arial','B',8);
|
||||
$pdf->MultiCell(130,$lineheight,'Hörer/Name',1,'L',0);
|
||||
$maxX +=130;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(65,$lineheight,'Kennzeichen',1,'C',0);
|
||||
$maxX +=65;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(65,$lineheight,'Gruppe',1,'C',0);
|
||||
$maxX +=65;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',0);
|
||||
|
||||
$qry = "SELECT
|
||||
distinct vorname, nachname, matrikelnr,
|
||||
tbl_studentlehrverband.semester, tbl_studentlehrverband.verband, tbl_studentlehrverband.gruppe,
|
||||
(SELECT rolle_kurzbz FROM public.tbl_prestudentrolle WHERE prestudent_id=tbl_student.prestudent_id ORDER BY datum DESC, insertamum DESC, ext_id DESC LIMIT 1) as status
|
||||
FROM
|
||||
campus.vw_student_lehrveranstaltung JOIN public.tbl_benutzer USING(uid)
|
||||
JOIN public.tbl_person USING(person_id) JOIN public.tbl_student ON(uid=student_uid)
|
||||
LEFT JOIN public.tbl_studentlehrverband USING(student_uid)
|
||||
WHERE
|
||||
lehrveranstaltung_id='".addslashes($lvid)."' AND
|
||||
vw_student_lehrveranstaltung.studiensemester_kurzbz='".addslashes($stsem)."' AND
|
||||
tbl_studentlehrverband.studiensemester_kurzbz='".addslashes($stsem)."'";
|
||||
|
||||
if($lehreinheit_id!='')
|
||||
$qry.=" AND lehreinheit_id='".addslashes($lehreinheit_id)."'";
|
||||
|
||||
$qry.=' ORDER BY nachname, vorname';
|
||||
|
||||
if($result = pg_query($conn, $qry))
|
||||
{
|
||||
$i=0;
|
||||
while($elem = pg_fetch_object($result))
|
||||
{
|
||||
//Abbrecher und Unterbrecher nicht anzeigen
|
||||
if($elem->status!='Abbrecher' && $elem->status!='Unterbrecher')
|
||||
{
|
||||
$i++;
|
||||
if($i%2)
|
||||
$pdf->SetFillColor(190,190,190);
|
||||
else
|
||||
$pdf->SetFillColor(255,255,255);
|
||||
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$maxY=$pdf->GetY();
|
||||
if($maxY>770)
|
||||
{
|
||||
$pdf->AddPage();
|
||||
$maxY=$pdf->GetY();
|
||||
}
|
||||
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(20,$lineheight,$i,1,'R',1);
|
||||
$maxX +=20;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->SetFont('Courier','B',8);
|
||||
$pdf->MultiCell(130,$lineheight,$elem->nachname,1,'L',1);
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$pdf->SetXY($maxX+strlen($elem->nachname)*5+1,$maxY);
|
||||
if($elem->status=='Incoming')
|
||||
$inc=' (i)';
|
||||
else
|
||||
$inc='';
|
||||
$pdf->MultiCell(130,$lineheight,$elem->vorname.$inc,0,'L',0);
|
||||
$maxX +=130;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$pdf->MultiCell(65,$lineheight,trim($elem->matrikelnr),1,'C',1);
|
||||
$maxX +=65;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(65,$lineheight,$elem->semester.$elem->verband.$elem->gruppe,1,'C',1);
|
||||
$maxX +=65;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',1);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',1);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',1);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',1);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',1);
|
||||
$maxX +=40;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->MultiCell(40,$lineheight,'',1,'L',1);
|
||||
$inhalt[]=array($i,$elem->nachname.' '.$elem->vorname,trim($elem->matrikelnr),$elem->semester.$elem->verband.$elem->gruppe,'','','','','','');
|
||||
}
|
||||
}
|
||||
}
|
||||
//Fussnote
|
||||
$maxY=$pdf->GetY()+5;
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$pdf->MultiCell(520,$lineheight,'(i) ... Incoming',0,'L',0);
|
||||
|
||||
//FHStg
|
||||
$maxY=$pdf->GetY()+5;
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->SetFont('Arial','B',8);
|
||||
$pdf->MultiCell(520,$lineheight,'Fachhochschulstudiengang ('.strtoupper($stgobj->typ).') '.$stgobj->bezeichnung,0,'L',0);
|
||||
|
||||
//FHStg
|
||||
$maxY=$pdf->GetY();
|
||||
$maxX=30;
|
||||
$pdf->SetXY($maxX,$maxY);
|
||||
$pdf->SetFont('Arial','',8);
|
||||
$pdf->MultiCell(520,$lineheight,'Fehlt ein Student länger als 2 Wochen, bitte um einen deutlichen Vermerk auf der Anwesenheitsliste. Die Anwesenheitsliste bitte am Ende des Monats im Sekretariat abgeben! Bitte achten Sie darauf, dass Sie nur VOLLSTÄNDIG AUSGEFÜLLTE LISTEN abgeben!',0,'L',0);
|
||||
|
||||
|
||||
$pdf->Output('anwesenheitsliste.pdf','I');
|
||||
?>
|
||||
@@ -41,10 +41,10 @@
|
||||
<td class="tdwidth10" nowrap> </td>
|
||||
<td class="tdwrap"><a class="Item" target="_blank" href="http://www.technikum-wien.at/service/intern"><img src="../skin/images/menu_item.gif" width="7" height="9"> Newsletter</a></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<!-- <tr>
|
||||
<td class="tdwidth10" nowrap> </td>
|
||||
<td class="tdwrap"><a class="Item" target="content" href="private/lehre/pinboard.php?fachbereich_kurzbz=Senat"><img src="../skin/images/menu_item.gif" width="7" height="9"> Senatsbeschlüsse</a></td>
|
||||
</tr>
|
||||
</tr>-->
|
||||
<tr>
|
||||
<td class="tdwidth10" nowrap> </td>
|
||||
<td class="tdwrap"><a class="Item" target="_blank" href="http://www.technikum-wien.at/service/termine/"><img src="../skin/images/menu_item.gif" width="7" height="9"> Veranstaltungen</a></td>
|
||||
|
||||
Reference in New Issue
Block a user