Blame | Last modification | View Log | RSS feed
<?
require_once('version.inc');
require_once('dbaccess.inc');
require_once('language.inc');
require_once('header.inc');
require_once('helper.inc');
require_once('crypt.inc');
require_once('settings.inc');
$knopf = 0;
$func = $_REQUEST['func'];
# Auswertungsmenue
if (isset($_REQUEST['ressource'])) { $knopf = 26; $headline = 30; }
$drm = array(true, false, false, false, false, true, false);
require_once('menu.inc');
require_once('knumber.inc');
# Folgende Funktion erlaubt die Auswahl einer Periode fuer die der Statusbericht
# erzeugt werden soll.
#
function Preselect() {
global $periode;
global $unum;
global $menu;
global $rstufe;
$db = OpenDB();
?>
<form action="prtressource.php" method="post">
<input type="hidden" name="menu" value="<? echo "$menu"; ?>">
<input type="hidden" name="headline" value="30">
<input type="hidden" name="func" value="prplan">
<table border=0>
<?php
# Auswahl eines Projekts
echo "<tr><td>Projektauswahl:</td>\n";
echo "<td>";
$query = "select pl_num, pl_prnum, pl_lfd, pr_name from plan, project ";
$query .= "where pr_num = pl_prnum and pl_status in (2,3,4) ";
$query .= "order by pl_prnum, pl_lfd desc";
$result = QueryDB($db, $query);
if (!$result) {
closeDB($db);
return;
}
echo "<select name=\"pl_num\">\n";
$numrows = numrowsDB($result);
$rows = 0;
while ($rows < $numrows) {
$data = fetchDB($result, $rows);
$pl_num = $data[0];
$pl_prnum = $data[1];
$pl_lfd = $data[2];
$pr_name = $data[3];
echo "<option value=\"$pl_num\">$pl_lfd: $pl_prnum $pr_name</option>\n";
$rows++;
}
echo "</select>";
echo "</td></tr>\n";
echo "</table>\n";
echo "<br><input type=\"submit\" name=\"submit\" value=\"Senden\"> <input type=\"reset\">\n";
echo "</form>\n";
closeDB($db);
}
function CreateTempPlan($db, $pl_num, $prnum) {
global $leneinheit;
# Als erstes erzeugen wir eine temporaere Tabelle in die wir die
# einzelnen Daten unseres Plans zusammentragen und korrekt zuordnen.
#
$query = "create local temporary table TempPlan (";
$query .= "tmp_lfd integer not null unique, tmp_miname integer,";
$query .= "tmp_phase integer, tmp_periode integer, tmp_plan double precision,";
$query .= "tmp_ist double precision, tmp_taname varchar(50), tmp_notiz varchar(8192),";
$query .= "constraint \"tempplan_pkey\" primary key (\"tmp_lfd\"))";
$result = QueryDB($db, $query);
if (!$result)
return false;
# Nun erzeugen wir einen Plan, ausgehend von den Tasks. Das ist der
# erste von insgesamt zwei Schritten!
#
$query = "select al_hours, al_pstart, al_phase, ta_name, ta_notiz,";
$query .= "al_ressource from allocation, task where ";
$query .= "ta_num = al_task and ta_plnum = $pl_num ";
$query .= "and ta_meeting = 0";
$result = QueryDB($db, $query);
if (!$result)
return false;
$numrows = numrowsDB($result);
if ($numrows <= 0) {
Error("Der von Ihnen gewählte Plan $pl_num enthält keine Tasks!");
return false;
}
$rows = 0;
$zaehler = 1;
while ($rows < $numrows) {
$data = fetchDB($result, $rows);
$al_hours = $data[0];
$al_pstart = $data[1];
$al_phase = $data[2];
$ta_name = $data[3];
$ta_notiz = $data[4];
$al_ressource = $data[5];
$mon = gmdate("n", $al_pstart);
$year = gmdate("Y", $al_pstart);
$al_pstart = gmmktime(0, 0, 0, $mon, 1, $year);
$query = "insert into TempPlan (tmp_lfd, tmp_miname, tmp_phase,";
$query .= "tmp_periode, tmp_plan, tmp_ist, tmp_taname, tmp_notiz) ";
$query .= "values ($zaehler, $al_ressource, $al_phase, $al_pstart,";
$query .= "$al_hours, 0, '$ta_name', '$ta_notiz')";
if (!QueryDB($db, $query))
return false;
$rows++;
$zaehler++;
}
# Nun suchen wir alle IST-Meldungen und ergaenzen die Daten, sofern
# sie bereits vorhanden sind, oder fuegen einen neuen Datensatz ein.
#
$query = "select wd_minum, wd_datum, wd_hours / $leneinheit, wd_phase, ";
$query .= "ta_name from wdone, task where ";
$query .= "wd_prnum = $prnum and ta_num = wd_task";
$result = QueryDB($db, $query);
if (!$result)
return false;
$numrows = numrowsDB($result);
if ($numrows <= 0) {
Error("Der von Ihnen gewählte Plan $pl_num enthält keine IST-Buchungen!");
return true;
}
$rows = 0;
while ($rows < $numrows) {
$data = fetchDB($result, $rows);
$wd_minum = $data[0];
$wd_datum = $data[1];
$wd_ist = $data[2];
$wd_phase = $data[3];
$ta_name = $data[4];
$mon = gmdate("n", $wd_datum);
$year = gmdate("Y", $wd_datum);
$per = gmmktime(0, 0, 0, $mon, 1, $year);
$query = "select tmp_lfd, tmp_ist from TempPlan where ";
$query .= "tmp_miname = $wd_minum and tmp_periode =$per ";
$query .= "and tmp_taname = '$ta_name'";
$result2 = QueryDB($db, $query);
if (!$result2)
return false;
$nr = numrowsDB($result2);
if ($nr > 0) {
$data = fetchDB($result2, 0);
$tmp_lfd = $data[0];
$tmp_ist = $data[1];
$wd_ist += $tmp_ist;
$query = "update TempPlan set tmp_ist = $wd_ist ";
$query .= "where tmp_lfd = $tmp_lfd";
if (!QueryDB($db, $query))
return false;
} else {
$mon = gmdate("n", $wd_datum);
$year = gmdate("Y", $wd_datum);
$wd_datum = gmmktime(0, 0, 0, $mon, 1, $year);
$query = "insert into TempPlan (tmp_lfd, tmp_miname, tmp_phase,";
$query .= "tmp_periode, tmp_plan, tmp_ist, tmp_taname) ";
$query .= "values ($zaehler, $wd_minum, $wd_phase, $wd_datum,";
$query .= "0, $wd_ist, '$ta_name')";
if (!QueryDB($db, $query))
return false;
$zaehler++;
}
$rows++;
}
return true;
}
function PrintRessource($pl_num) {
global $phase;
$db = OpenDB();
# Ermitteln der Projektnummer
$query = "select pl_prnum from plan where pl_num = $pl_num";
$result = QueryDB($db, $query);
if (!$result) {
closeDB($db);
return;
}
$data = fetchDB($result, 0);
$prnum = $data[0];
# Folgende Funktion erzeugt uns einen Plan mit zugehoerigen IST-Werten,
# wobei diese bereits innerhalb einer Periode aufsummiert wurden.
#
if (CreateTempPlan($db, $pl_num, $prnum) == false) {
closeDB($db);
return;
}
# Wieviele Perioden gibt es insgesamt?
$query = "select count(distinct tmp_periode) from TempPlan";
$result = QueryDB($db, $query);
if (!$result) {
closeDB($db);
return;
}
$data = fetchDB($result, 0);
$numper = $data[0];
$np = $numper * 2;
# Zeichnen des Tabellenkopfs
?>
<table border=1>
<tr>
<td colspan=2> </td>
<td colspan=<? echo "$np"; ?> class="stbb">Periode</td>
<td colspan=2 class="stbb">Summe</td>
<td colspan=2 class="stbb">Total</td>
</tr>
<tr>
<td rowspan=2 valign="top" class="stbb">Ressource</td>
<?php
if ($phase)
echo "<td rowspan=2 valign=\"top\" class=\"stbb\">Phase / Task</td>\n";
else
echo "<td rowspan=2 valign=\"top\" class=\"stbb\">Task</td>\n";
$query = "select distinct tmp_periode from TempPlan order by tmp_periode";
$result = QueryDB($db, $query);
if (!$result) {
echo "</tr></table>";
closeDB($db);
return;
}
$numrows = numrowsDB($result);
$r = 0;
while ($r < $numrows) {
$data = fetchDB($result, $r);
$tmp_periode = $data[0];
$mon = gmdate("n", $tmp_periode);
$year = gmdate("Y", $tmp_periode);
if ($r == 0) {
$fmon = $mon;
$fyear = $year;
}
echo " <td colspan=2 class=\"stbb\">$mon/$year</td>\n";
$sumperp[$r] = 0.0;
$sumperi[$r] = 0.0;
$r++;
}
$lmon = $mon;
$lyear = $year;
echo " <td colspan=2> </td>\n";
echo " <td colspan=2> </td>\n";
echo " </tr>\n <tr>\n";
$r = 0;
while ($r < $numrows) {
echo " <td class=\"stbb\">Plan</td>\n";
echo " <td class=\"stbb\">IST</td>\n";
$r++;
}
echo " <td class=\"stbb\">Plan</td>\n";
echo " <td class=\"stbb\">IST</td>\n";
echo " <td class=\"stbb\">Plan</td>\n";
echo " <td class=\"stbb\">IST</td>\n </tr>\n";
# Nun fuellen wir die Tabelle mit Daten...
#
$query = "select tmp_miname, tmp_phase, tmp_periode, tmp_plan, tmp_ist, ";
$query .= "tmp_taname, mi_nname, mi_vname from TempPlan, mitarbeiter ";
$query .= "where mi_num = tmp_miname order by mi_nname, mi_vname, ";
$query .= "tmp_phase, tmp_taname, tmp_periode";
$result = QueryDB($db, $query);
if (!$result) {
closeDB($db);
return;
}
$numrows = numrowsDB($result);
$r = 0;
$pz = 0;
$first = true;
$last = false;
$sump = 0.0;
$totp = 0.0;
$sumptotal = 0.0;
$sumi = 0.0;
$toti = 0.0;
$sumitotal = 0.0;
$oldname = 0;
$oldtaname = "";
$oldphase = -1;
$class = "nw";
$ldate = gmmktime(0, 0, 0, $lmon, 1, $lyear);
$adate = gmmktime(0, 0, 0, $fmon, 1, $fyear);
$flag = 0;
while ($r < $numrows) {
$data = fetchDB($result, $r);
$tmp_miname = $data[0];
$tmp_phase = $data[1];
$tmp_periode = $data[2];
$tmp_plan = $data[3];
$tmp_ist = $data[4];
$tmp_taname = $data[5];
$mi_nname = $data[6];
$mi_vname = $data[7];
$mon = gmdate("n", $tmp_periode);
$year = gmdate("Y", $tmp_periode);
if ($r == 0) {
$oldname = $tmp_miname;
$oldphase = $tmp_phase;
$oldtaname = $tmp_taname;
}
if ($oldphase != $tmp_phase || $oldname != $tmp_miname || $oldtaname != $tmp_taname) {
while ($adate <= $ldate) {
echo "<td class=\"$class\" align=\"right\"> </td><td class=\"$class\" align=\"right\"> </td>\n";
$aktmon++;
if ($aktmon > 12) {
$aktyear++;
$aktmon = 1;
}
$adate = gmmktime(0, 0, 0, $aktmon, 1, $aktyear);
if ($class == "nw")
$class = "nw1";
else
$class = "nw";
}
printf ("<td class=\"sum\" align=\"right\">%s</td>", FormatNum($sump, 3));
printf ("<td class=\"sum\" align=\"right\">%s</td>\n", FormatNum($sumi, 3));
echo "<td colspan=2> </td></tr>\n";
if ($oldname != $tmp_miname) {
echo "<tr><td colspan=2> </td>";
$pz = 0;
while ($pz < $numper) {
printf ("<td class=\"lsum\" align=\"right\">%s</td>", FormatNum($sumperp[$pz], 3));
printf ("<td class=\"lsum\" align=\"right\">%s</td>", FormatNum($sumperi[$pz], 3));
$sumperp[$pz] = 0.0;
$sumperi[$pz] = 0.0;
$pz++;
}
echo "<td colspan=2> </td>";
printf("<td class=\"lsum\" align=\"right\">%s</td>", FormatNum($totp, 3));
printf("<td class=\"lsum\" align=\"right\">%s</td></tr>\n", FormatNum($toti, 3));
$oldname = $tmp_miname;
$totp = 0.0;
$toti = 0.0;
}
$oldphase = $tmp_phase;
$oldtaname = $tmp_taname;
$sump = 0.0;
$sumi = 0.0;
$pz = 0;
$first = true;
$last = true;
$class = "nw";
}
if ($first) {
echo "<tr><td class=\"nw\">$mi_nname $mi_vname</td>\n";
if ($phase)
echo "<td class=\"nw\">$tmp_phase: $tmp_taname</td>\n";
else
echo "<td class=\"nw\">$tmp_taname</td>\n";
$aktmon = $fmon;
$aktyear = $fyear;
$adate = gmmktime(0, 0, 0, $aktmon, 1, $aktyear);
$first = false;
$class = "nw";
$pz = 0;
}
if ($mon != $aktmon || $year != $aktyear) {
while ($adate < $ldate && $adate != $tmp_periode) {
echo "<td class=\"$class\" align=\"right\"> </td><td class=\"$class\" align=\"right\"> </td>\n";
$aktmon++;
$pz++;
if ($aktmon > 12) {
$aktyear++;
$aktmon = 1;
}
$adate = gmmktime(0, 0, 0, $aktmon, 1, $aktyear);
if ($class == "nw")
$class = "nw1";
else
$class = "nw";
}
}
printf ("<td class=\"$class\" align=\"right\">%s</td>", FormatNum($tmp_plan, 3));
if (($tmp_plan - $tmp_ist) < 0) {
$class = "five";
if ($class == "nw")
$flag = 1;
}
printf ("<td class=\"$class\" align=\"right\">%s</td>\n", FormatNum($tmp_ist, 3));
$aktmon++;
if ($aktmon > 12) {
$aktmon = 1;
$aktyear++;
}
$adate = gmmktime(0, 0, 0, $aktmon, 1, $aktyear);
if ($flag)
$class = "nw";
if ($class == "nw")
$class = "nw1";
else
$class = "nw";
$sump += $tmp_plan;
$sumi += $tmp_ist;
$totp += $tmp_plan;
$toti += $tmp_ist;
$sumptotal += $tmp_plan;
$sumitotal += $tmp_ist;
$sumperp[$pz] += $tmp_plan;
$sumperi[$pz] += $tmp_ist;
$pz++;
$last = false;
$r++;
}
while ($adate <= $ldate) {
echo "<td class=\"$class\" align=\"right\"> </td><td class=\"$class\" align=\"right\"> </td>\n";
$aktmon++;
if ($aktmon > 12) {
$aktyear++;
$aktmon = 1;
}
$adate = gmmktime(0, 0, 0, $aktmon, 1, $aktyear);
if ($class == "nw")
$class = "nw1";
else
$class = "nw";
}
printf ("<td class=\"sum\" align=\"right\">%s</td>", FormatNum($sump, 3));
printf ("<td class=\"sum\" align=\"right\">%s</td>\n", FormatNum($sumi, 3));
echo "<td colspan=2> </td></tr>\n";
echo "<tr><td colspan=2> </td>";
$pz = 0;
while ($pz < $numper) {
printf ("<td class=\"lsum\" align=\"right\">%s</td>", FormatNum($sumperp[$pz], 3));
printf ("<td class=\"lsum\" align=\"right\">%s</td>", FormatNum($sumperi[$pz], 3));
$pz++;
}
printf ("<td colspan=2> </td><td class=\"lsum\" align=\"right\">%s</td>", FormatNum($totp, 3));
printf ("<td class=\"lsum\" align=\"right\">%s</td></tr>\n", FormatNum($toti, 3));
$cs = 2 + $np + 2;
printf ("<tr><td colspan=$cs> </td><td class=\"two\" align=\"right\">%s</td>", FormatNum($sumptotal, 3));
printf ("<td class=\"two\" align=\"right\">%s</td></tr>\n", FormatNum($sumitotal, 3));
echo "</table>\n";
closeDB($db);
}
# Auswertung des Menues:
#
if ($knopf == 26) // Ressourcenauslastung
Preselect();
# Auswertung der Funktionen
if ($func == "prplan") {
$pl_num = $_REQUEST['pl_num'];
# Ermitteln des Projektnamens und Anzeigen des selben.
$db = OpenDB();
$query = "select pl_prnum, pr_name from plan, project ";
$query .= "where pr_num = pl_prnum and pl_num = $pl_num";
$result = QueryDB($db, $query);
$data = fetchDB($result, 0);
$selpro = $data[0];
$pr_name = $data[1];
echo "<p class=\"cry\">Projekt: $selpro $pr_name<br>\n";
echo "Ressourcenauslastung der Mitarbeiter in PT</p>";
echo "<br>\n";
closeDB($db);
echo "<a href=\"#\" onClick=\"javascript:open_mwindow('prtressource.php?pl_num=$pl_num&header=2&func=PrintPlan', 'Ressourcenauslastung: $selpro $pr_name', 750, 550)\">";
echo "<img src=\"image/print.png\" border=0 alt=\"Drucken\"></a>\n";
PrintRessource($pl_num);
}
if ($func == "PrintPlan") {
$pl_num = $_REQUEST['pl_num'];
# Ermitteln des Projektnamens und Anzeigen des selben.
$db = OpenDB();
$query = "select pl_prnum, pr_name from plan, project ";
$query .= "where pr_num = pl_prnum and pl_num = $pl_num";
$result = QueryDB($db, $query);
$data = fetchDB($result, 0);
$selpro = $data[0];
$pr_name = $data[1];
echo "<p class=\"cry\">Projekt: $selpro $pr_name<br>\n";
echo "Ressourcenauslastung der Mitarbeiter in PT</p>";
echo "<br>\n";
closeDB($db);
PrintRessource($pl_num);
}
require('footer.inc');
?>