| 0,0 → 1,495 |
|---|
| <? |
| function SelectTemp($db, $prnum) { |
| $query = "select tmp_lfd, tmp_miname, tmp_periode, tmp_plan, "; |
| $query .= "tmp_ist, tmp_taname, tmp_status, tmp_hash, tmp_plnum "; |
| $query .= "from TempPlan order by tmp_periode"; |
| |
| if (!($result = QueryDB($db, $query))) |
| return; |
| |
| $anz = numrowsDB($result); |
| $i = 0; |
| $dbstr = "\nLFD. Ma. Periode Plan IST PlNr. St. PrNr. Hashwert\n"; |
| // 1234567890123456789012345678901234567890123456789 |
| // xxxxx_xxxxx_xx.xx.xxxx_xx,xxx_xx,xxx_xxxxx_xx_xxxxxx |
| |
| while ($i < $anz) { |
| $data = fetchDB($result, $i); |
| $tmp_lfd = $data[0]; |
| $tmp_miname = $data[1]; |
| $tmp_periode = $data[2]; |
| $tmp_plan = $data[3]; |
| $tmp_ist = $data[4]; |
| $tmp_taname = $data[5]; |
| $tmp_status = $data[6]; |
| $tmp_hash = $data[7]; |
| $tmp_plnum = $data[8]; |
| |
| $ss = sprintf("%5d %5d %02d.%02d.%4d %6s %6s %5d %2d %6d %s\n", $tmp_lfd, |
| $tmp_miname, gmdate("j", $tmp_periode), gmdate("n", $tmp_periode), |
| gmdate("Y", $tmp_periode), FormatNum($tmp_plan, 3), FormatNum($tmp_ist, 3), |
| $tmp_plnum, $tmp_status, $prnum, $tmp_hash); |
| $dbstr .= $ss; |
| $i++; |
| } |
| |
| if ($anz > 0) |
| DEBUG($dbstr); |
| } |
| |
| function CreateTempPlan($db, $pl_num, $prnum, $dfrom, $dto, $quiet=false, $minum=0, $ta=false, $ph=false) { |
| global $leneinheit; |
| global $phase; |
| $mi_num = $_REQUEST['mi_num']; |
| $f_tasks = $_REQUEST['fields_0']; |
| $pjclosed = $_REQUEST['pjclosed']; |
| |
| if ($phase) |
| $f_phase = $_REQUEST['fields_6']; |
| |
| if ((!isset($mi_num) || $mi_num == 0) && $minum > 0) |
| $mi_num = $minum; |
| |
| if ($ta == true) |
| $f_tasks = $ta; |
| |
| if ($ph == true) |
| $f_phase = $pa; |
| |
| if (isset($pjclosed) && CheckTrue($pjclosed)) |
| $pjc = ",6"; |
| |
| # 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 .= "tmp_status smallint, tmp_hash char(34), tmp_plnum integer, "; |
| $query .= "tmp_start integer, tmp_duration smallint, "; |
| $query .= "constraint \"tempplan_pkey\" primary key (\"tmp_lfd\"))"; |
| $result = QueryDB($db, $query); |
| |
| if (!$result) |
| return false; |
| |
| # Ermitteln ob es sich um ein Projekt oder um ein Konto handelt. |
| $query = "select pr_status from project where pr_num = $prnum"; |
| |
| if (!($result = QueryDB($db, $query))) |
| return false; |
| |
| $data = fetchDB($result, 0); |
| $pr_status = $data[0]; |
| |
| # Nun erzeugen wir einen Plan, ausgehend von den Tasks. Das ist der |
| # erste von insgesamt zwei Schritten! |
| # Hier muessen wir zwischen einem Projekt und einem Konto |
| # unterscheiden. Konten haben keine Zuordnungen zu einem Task! |
| # |
| if ($pr_status == 0) { // 0 = Projekt! |
| $query = "select al_hours, al_pstart"; |
| |
| if ($phase && $f_phase) |
| $query .= ", al_phase "; |
| |
| if ($f_tasks) |
| $query .= ", ta_name "; |
| |
| $query .= ", ta_notiz, al_ressource, ta_hash, ta_plnum, pl_status, "; |
| $query .= "ta_start, ta_duration "; |
| $query .= "from allocation, task, plan where "; |
| // $query .= "pl_num = ta_plnum and pl_prnum = $prnum and "; |
| $query .= "pl_num = ta_plnum and pl_num = $pl_num and "; |
| // $query .= "ta_num = al_task and ta_plnum = $pl_num and "; |
| $query .= "ta_num = al_task and pl_status in (2,3,4,5 $pjc) and "; |
| $query .= "ta_meeting = 0 and al_pstart between $dfrom and $dto "; |
| |
| if (isset($mi_num) && $mi_num > 0) |
| $query .= "and al_ressource = $mi_num "; |
| } else { |
| $query = "select distinct on (wd_minum) ta_num, ta_name,wd_minum,"; |
| $query .= "ta_hash, ta_plnum, ta_start, ta_duration from wdone, task "; |
| $query .= "where ta_plnum = $pl_num and wd_task = ta_num "; |
| |
| if (isset($mi_num) && $mi_num > 0) |
| $query .= "and wd_minum = $mi_num "; |
| } |
| |
| if (!($result = QueryDB($db, $query))) |
| return false; |
| |
| $numrows = numrowsDB($result); |
| |
| if ($numrows <= 0) { |
| if (!$quiet) |
| Error("Das Projekt $prnum enthält für den Zeitraum vom " . gmdate("n.Y", $dfrom) . " bis " . gmdate("n.Y", $dto) . " einen Plan ohne Tasks ($mi_num)!"); |
| } |
| |
| $rows = 0; |
| $zaehler = 1; |
| |
| while ($rows < $numrows) { |
| $data = fetchDB($result, $rows); |
| |
| if ($pr_status == 0) { |
| $al_hours = $data[0]; |
| $al_pstart = $data[1]; |
| $x = 2; |
| |
| if ($phase && $f_phase) { |
| $al_phase = $data[$x]; |
| $x++; |
| } else |
| $al_phase = 0; |
| |
| if ($f_tasks) { |
| $ta_name = $data[$x]; |
| $x++; |
| } else |
| $ta_name = ""; |
| |
| $ta_notiz = $data[$x]; |
| $x++; |
| $al_ressource = $data[$x]; |
| $x++; |
| $ta_hash = $data[$x]; |
| $x++; |
| $ta_plnum = $data[$x]; |
| $x++; |
| $pl_status = $data[$x]; |
| $x++; |
| $ta_start = $data[$x]; |
| $x++; |
| $ta_duration = $data[$x]; |
| } else { |
| $al_hours = 0; |
| $al_pstart = $dfrom; |
| $ta_num = $data[0]; |
| $al_phase = 0; |
| |
| if ($f_tasks) |
| $ta_name = $data[1]; |
| else |
| $ta_name = ""; |
| |
| $al_ressource = $data[2]; |
| $ta_notiz = ""; |
| $ta_hash = $data[3]; |
| $ta_plnum = $data[4]; |
| $ta_start = $data[5]; |
| $ta_duration = $data[6]; |
| $pl_status = 0; |
| } |
| |
| $mon = gmdate("n", $al_pstart); |
| $year = gmdate("Y", $al_pstart); |
| $al_pstart = gmmktime(0, 0, 0, $mon, 1, $year); |
| $flag = false; |
| |
| $query = "select tmp_lfd, tmp_plan, tmp_plnum, tmp_hash, tmp_taname from TempPlan where "; |
| $query .= "tmp_periode = $al_pstart and tmp_phase = $al_phase "; |
| $query .= "and tmp_miname = $al_ressource "; |
| |
| if ($f_tasks) |
| $query .= "and tmp_hash = '$ta_hash' "; |
| // $query .= "and (tmp_hash = '$ta_hash' or tmp_taname = '$ta_name') "; |
| |
| if (!($res = QueryDB($db, $query))) |
| return false; |
| |
| if (numrowsDB($res) > 0) { |
| $data = fetchDB($res, 0); |
| $tmp_lfd = $data[0]; |
| $tmp_plan = $data[1]; |
| $tmp_plnum = $data[2]; |
| $tmp_hash = $data[3]; |
| $tmp_taname = $data[4]; |
| |
| if ($tmp_plnum < $ta_plnum && ($tmp_hash == $ta_hash || ($tmp_taname == $ta_name && $f_tasks))) { |
| $tmp_plan = $al_hours; |
| $tmp_plnum = $ta_plnum; |
| $tmp_hash = $ta_hash; |
| } else if (!$f_tasks) |
| $tmp_plan += $al_hours; |
| |
| $query = "update TempPlan set tmp_plan = $tmp_plan, tmp_plnum = $tmp_plnum, tmp_hash = '$tmp_hash' "; |
| $query .= "where tmp_lfd = $tmp_lfd"; |
| |
| if (!QueryDB($db, $query)) |
| return false; |
| } else |
| $flag = true; |
| |
| if ($flag) { |
| $ta_name = addslashes($ta_name); |
| $ta_notiz = addslashes($ta_notiz); |
| $query = "insert into TempPlan (tmp_lfd, tmp_miname, tmp_phase,"; |
| $query .= "tmp_periode, tmp_plan, tmp_ist,tmp_taname,tmp_notiz,"; |
| $query .= "tmp_status, tmp_hash, tmp_plnum, tmp_start, tmp_duration) "; |
| $query .= "values ($zaehler, $al_ressource, $al_phase, $al_pstart,"; |
| $query .= "$al_hours, 0, '$ta_name', '$ta_notiz', $pr_status,"; |
| $query .= "'$ta_hash', $ta_plnum, $ta_start, $ta_duration)"; |
| |
| if (!QueryDB($db, $query)) |
| return false; |
| |
| $zaehler++; |
| } |
| |
| $rows++; |
| } |
| |
| # 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,"; |
| $query .= "ta_hash, ta_plnum, ta_start, ta_duration, wd_task "; |
| |
| if ($phase && $f_phase) |
| $query .= ", wd_phase "; |
| |
| if ($f_tasks) |
| $query .= ", ta_name "; |
| |
| $query .= "from wdone, task where "; |
| $query .= "wd_prnum = $prnum and ta_num = wd_task and "; |
| $query .= "wd_datum between $dfrom and $dto "; |
| |
| if (isset($mi_num) && $mi_num > 0) |
| $query .= "and wd_minum = $mi_num "; |
| |
| if (!($result = QueryDB($db, $query))) |
| return false; |
| |
| $numrows = numrowsDB($result); |
| |
| if ($numrows <= 0) { |
| if (!$quiet) |
| Error("Zum Projekt $prnum gibt es für den Zeitraum vom " . gmdate("n.Y", $dfrom) . " bis " . gmdate("n.Y", $dto) . " keine IST-Buchungen ($mi_num)!"); |
| |
| return true; |
| } |
| |
| $rows = 0; |
| |
| while ($rows < $numrows) { |
| $data = fetchDB($result, $rows); |
| $wd_minum = $data[0]; |
| $wd_datum = $data[1]; |
| $wd_ist = $data[2]; |
| $ta_hash = $data[3]; |
| $ta_plnum = $data[4]; |
| $ta_start = $data[5]; |
| $ta_duration = $data[6]; |
| $wd_task = $data[7]; |
| $x = 8; |
| |
| if ($phase && $f_phase) { |
| $wd_phase = $data[$x]; |
| $x++; |
| } else |
| $wd_phase = 0; |
| |
| if ($f_tasks) { |
| $ta_name = $data[$x]; |
| $x++; |
| } else |
| $ta_name = ""; |
| |
| $mon = gmdate("n", $wd_datum); |
| $year = gmdate("Y", $wd_datum); |
| $per = gmmktime(0, 0, 0, $mon, 1, $year); |
| $slash_name = addslashes($ta_name); |
| $query = "select tmp_lfd, tmp_ist, tmp_plan, tmp_plnum, tmp_hash "; |
| $query .= "from TempPlan where "; |
| $query .= "tmp_miname = $wd_minum and tmp_periode =$per "; |
| |
| if ($f_tasks) |
| $query .= "and (tmp_hash = '$ta_hash' or tmp_taname = '$slash_name')"; |
| |
| if ($f_phase) |
| $query .= " and tmp_phase = $wd_phase"; |
| |
| $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]; |
| $tmp_plan = $data[2]; |
| $tmp_plnum = $data[3]; |
| $tmp_hash = $data[4]; |
| $ist_alt = $wd_ist; |
| $wd_ist += $tmp_ist; |
| $query = "update TempPlan set tmp_ist = $wd_ist "; |
| |
| # Handelt es sich um einen unterschiedlichen Plan und es |
| # wurden keine Tasks gewaehlt, dann muessen wir den Planwert |
| # suchen und ebenfalls aufaddieren. |
| |
| if ($ta_plnum < $pl_num && $ist_alt > 0 && $tmp_plan <= 0.0 && !$f_tasks && $ta_hash != $tmp_hash) { |
| $mon = gmdate("n", $wd_datum); |
| $year = gmdate("Y", $wd_datum); |
| $wd_datum = gmmktime(0, 0, 0, $mon, 1, $year); |
| $per_end = gmmktime(0, 0, 0, $mon, daysinmonth($mon, $year), $year); |
| $xquery = "select al_hours from allocation where "; |
| $xquery .= "al_task = $wd_task and al_ressource = $wd_minum and "; |
| $xquery .= "al_pstart between $wd_datum and $per_end"; |
| |
| if (!($resal = QueryDB($db, $xquery))) |
| return false; |
| |
| if (numrowsDB($resal) > 0) { |
| $data = fetchDB($resal, 0); |
| $al_hours = $data[0]; |
| $query .= ", tmp_plan = tmp_plan + $al_hours "; |
| } |
| } |
| |
| $query .= "where tmp_lfd = $tmp_lfd"; |
| |
| if (!QueryDB($db, $query)) |
| return false; |
| } else { |
| # Da es sich um einen neuen IST-Wert handelt, der moeglicherweise |
| # von einem aelteren Plan stammt, muessen wir den Planwert dazu |
| # ermitteln. |
| # Korrektur 12.07.2006: Planwerte von aelteren Plaenen duerfen |
| # nicht hinzaddiert werden! |
| $mon = gmdate("n", $wd_datum); |
| $year = gmdate("Y", $wd_datum); |
| $wd_datum = gmmktime(0, 0, 0, $mon, 1, $year); |
| $per_end = gmmktime(0, 0, 0, $mon, daysinmonth($mon, $year), $year); |
| // $query = "select al_hours from allocation where "; |
| // $query .= "al_task = $wd_task and al_ressource = $wd_minum and "; |
| // $query .= "al_pstart between $wd_datum and $per_end"; |
| |
| // if (!($resal = QueryDB($db, $query))) |
| // return false; |
| |
| // if (numrowsDB($resal) > 0) { |
| // $data = fetchDB($resal, 0); |
| // $al_hours = $data[0]; |
| // } else |
| $al_hours = 0.0; |
| |
| $ta_name = addslashes($ta_name); |
| $query = "insert into TempPlan (tmp_lfd, tmp_miname, tmp_phase,"; |
| $query .= "tmp_periode, tmp_plan,tmp_ist,tmp_taname,tmp_status,"; |
| $query .= "tmp_hash, tmp_plnum, tmp_start, tmp_duration) "; |
| $query .= "values ($zaehler, $wd_minum, $wd_phase, $wd_datum,"; |
| $query .= "$al_hours, $wd_ist, '$ta_name', $pr_status,"; |
| $query .= "'$ta_hash', $ta_plnum, $ta_start, $ta_duration)"; |
| |
| if (!QueryDB($db, $query)) |
| return false; |
| |
| $zaehler++; |
| } |
| |
| $rows++; |
| } |
| |
| return true; |
| } |
| |
| function ShowTempPlan($db=-1, $pr_num, $dfrom, $dto) { |
| global $datetime; |
| |
| if ($db == -1) |
| $db = OpenDB(); |
| |
| $query = "select tmp_lfd, mi_nname, mi_vname, tmp_periode, tmp_plan,"; |
| $query .= "tmp_ist, tmp_taname, tmp_notiz, tmp_status, tmp_hash, tmp_plnum "; |
| $query .= "from TempPlan, mitarbeiter where "; |
| $query .= "mi_num = tmp_miname order by tmp_hash"; |
| |
| if (!($result = QueryDB($db, $query))) |
| return false; |
| |
| $anz = numrowsDB($result); |
| |
| if ($anz <= 0) |
| return true; |
| |
| ?> |
| <table class="input"> |
| <tr> |
| <td><table border=0> |
| <tr> |
| <td>Projektnummer:</td> |
| <td><? echo "$pr_num"; ?></td> |
| </tr> |
| <tr> |
| <td>Datum von:</td> |
| <td><? echo gmdate($datetime, $dfrom); ?></td> |
| </tr> |
| <tr> |
| <td>Datum bis:</td> |
| <td><? echo gmdate($datetime, $dto); ?></td> |
| </tr> |
| </table> |
| </td> |
| </tr> |
| </table> |
| <table class="sel"> |
| <tr> |
| <th class="sel">Lfd.</th> |
| <th class="sel">Pl.Nr.</th> |
| <th class="sel">Mitarbeiter</th> |
| <th class="sel">Periode</th> |
| <th class="sel">Plan</th> |
| <th class="sel">IST</th> |
| <th class="sel">Taskname</th> |
| <th class="sel">Notiz</th> |
| <th class="sel">Status</th> |
| <th class="sel">Hash</th> |
| </tr> |
| <? |
| $i = 0; |
| |
| while ($i < $anz) { |
| $data = fetchDB($result, $i); |
| $tmp_lfd = $data[0]; |
| $mi_nname = $data[1]; |
| $mi_vname = $data[2]; |
| $tmp_periode = $data[3]; |
| $tmp_plan = $data[4]; |
| $tmp_ist = $data[5]; |
| $tmp_taname = $data[6]; |
| $tmp_notiz = $data[7]; |
| $tmp_status = $data[8]; |
| $tmp_hash = $data[9]; |
| $tmp_plnum = $data[10]; |
| |
| echo "<tr>\n<td class=\"selnum\">$tmp_lfd</td>\n"; |
| echo "<td class=\"sel\">$tmp_plnum</td>\n"; |
| echo "<td class=\"sel\">$mi_nname $mi_vname</td>\n"; |
| echo "<td class=\"sel\">" . gmdate($datetime, $tmp_periode) . "</td>\n"; |
| echo "<td class=\"selnum\">" . FormatNum($tmp_plan, 3) . "</td>\n"; |
| echo "<td class=\"selnum\">" . FormatNum($tmp_ist, 3) . "</td>\n"; |
| echo "<td class=\"sel\">$tmp_taname</td>\n"; |
| echo "<td class=\"sel\">$tmp_notiz</td>\n"; |
| echo "<td class=\"sel\">"; |
| |
| if ($tmp_status == 0) |
| echo "Projekt"; |
| else |
| echo "Konto"; |
| |
| echo "</td>\n"; |
| echo "<td class=\"sel\">$tmp_hash</td>\n</tr>\n"; |
| $i++; |
| } |
| |
| echo "</table>"; |
| return true; |
| } |
| ?> |