author | Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> |
Wed, 31 Jul 2013 15:10:48 +0200 | |
changeset 39 | 4ce411ed28b6 |
parent 38 | 45c139f74ea4 |
permissions | -rw-r--r-- |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
1 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
2 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
3 |
/** |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
4 |
* @author Bettina Schwarzer, Fritz-Haber-Institut |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
5 |
* @copyright 06/2013 |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
6 |
* |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
7 |
* Keytyp Transaktion Depot - Depot |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
8 |
*/ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
9 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
10 |
error_reporting(E_ALL ^ E_NOTICE); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
11 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
12 |
session_start(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
13 |
if (! isset($_SESSION["userid"])) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
14 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
15 |
include_once ("inc/func_lib.inc.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
16 |
login($_SERVER["PHP_SELF"]); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
17 |
exit; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
18 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
19 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
20 |
if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("kr",$_SESSION["recht"]) && !in_array("ke",$_SESSION["recht"]))) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
21 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
22 |
header("Location: start.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
23 |
exit; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
24 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
25 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
26 |
include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
27 |
if (!isset($dbc) || !$dbc) $dbc = new dbconnection(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
28 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
29 |
// zulaessige Depots: nur FHI |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
30 |
$uid = $_SESSION["userid"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
31 |
$sql = "SELECT depot_ID,edit FROM KeyDepot_userweb WHERE userid = '$uid'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
32 |
$res = $dbc -> queryObjectArray($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
33 |
foreach ($res as $row) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
34 |
if ($row->edit) $adep[] = $row->depot_ID; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
35 |
// print_r($adep); echo "<br />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
36 |
$aaction = array("get" => "Rücknahme", "out" => "Ausgabe", "lost" => "Verlust"); //Bezeichnung Transfer |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
37 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
38 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
39 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
40 |
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
41 |
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
42 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
43 |
<head> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
44 |
<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" /> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
45 |
<link href="/fhiiqm/css/db.css" rel="STYLESHEET" type="TEXT/CSS" media="screen"/> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
46 |
<link href="/fhiiqm/css/db_print.css" rel="STYLESHEET" type="TEXT/CSS" media="print"/> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
47 |
<title>Keytyp Depot transferieren</title> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
48 |
</head> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
49 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
50 |
<body> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
51 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
52 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
53 |
echo " "; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
54 |
echo "<div class=\"float-br smaller\" valign='top'>"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
55 |
echo " user: " . $_SESSION["userid"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
56 |
echo " <a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
57 |
echo "<div class=\"float-r\"><img src=\"img/key.png\" border=\"0\" alt=\"Keytyp transferieren\" title=\"Depotverwaltung Schlüsseltyp\"/></div>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
58 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
59 |
echo "<div align=\"center\">"; |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
60 |
echo "<h3>Schlüssel-Transfer von/in Depots</h3>"; |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
61 |
echo "</div>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
62 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
63 |
if (!isset($adep)) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
64 |
echo "<p class='red'> Sie haben nicht das Recht, Transfers von Schlüsseln in Depots vorzunehmen. Bitte wenden Sie sich an Frau Kohl.</p>"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
65 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
66 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
67 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
68 |
$out = $_POST["out"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
69 |
$get = $_POST["get"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
70 |
// $lost = $_POST["lost"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
71 |
$ky = $_POST["ky"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
72 |
if (isset($ky) && $get) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
73 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
74 |
$sql = "SELECT IFNULL(SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END),0) - IFNULL(SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END),0) - IFNULL(SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END),0) AS bestand |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
75 |
FROM fhiiqm.Keytyp_Depot WHERE depot_ID='".$ky["dep"]."' AND keytyp_ID = '". $ky["kt"] ."'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
76 |
$anzdep = $dbc->querySingleItem($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
77 |
if (is_numeric($ky["anz"]) && $anzdep < $ky["anz"]) $err = "Rücknahme: Bestand '". $ky["kt"] ."' Depot '". $ky["dep"] . "': <b>$anzdep < ".$ky["anz"]."</b> (Transfer-Anzahl)!"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
78 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
79 |
if (isset($ky) && $out) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
80 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
81 |
$sql = "SELECT IFNULL(SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END),0) - IFNULL(SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END),0) - IFNULL(SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END),0) AS bestand |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
82 |
FROM fhiiqm.Keytyp_Depot WHERE depot_ID='FHI' AND keytyp_ID = '". $ky["kt"] ."'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
83 |
$anzdep = $dbc->querySingleItem($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
84 |
if (is_numeric($ky["anz"]) && $anzdep < $ky["anz"]) $err = "Ausgabe: Bestand '". $ky["kt"] ."' Depot 'FHI': <b>$anzdep < ".$ky["anz"]."</b> (Transfer-Anzahl)!"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
85 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
86 |
if (isset($ky["anz"]) && !is_numeric($ky["anz"]) && ($out || $get || $lost)) $err = "Anzahl ist ncht numerisch!"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
87 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
88 |
if (!isset($ky) || (!$out && !$get) || $err) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
89 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
90 |
/* form: 'accept-charset="utf-8"' wegen Umlauten in Formfeldern und Nichtnutzen mysqli, sondern sp für INSERTS */ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
91 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
92 |
<div align="center"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
93 |
<h5>* - Felder sind erforderlich!</h5> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
94 |
</div> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
95 |
<form action="<?php $_SERVER['PHP_SELF'] ?>" method="post" enctype="application/x-www-form-urlencoded" name="form_key" accept-charset="utf-8"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
96 |
<div align="center"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
97 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
98 |
if ($err) echo "<p class='red'>$err</p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
99 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
100 |
<table width="45%" border="0" cellspacing="3" cellpadding="3"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
101 |
<tr> |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
102 |
<td><b>Depot FHI</b> Schlüsseltyp *</td><td>Anzahl *</td><td>Depot *</td> |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
103 |
</tr> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
104 |
<tr> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
105 |
<td><select name="ky[kt]" onchange="this.form.submit();"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
106 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
107 |
$sql = "SELECT key_level,d.keytyp_ID,keytyp_bez, |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
108 |
SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END) AS bestand |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
109 |
FROM fhiiqm.Keytyp_Depot d INNER JOIN Keytyp k ON d.keytyp_ID=k.keytyp_ID |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
110 |
WHERE depot_ID='FHI' |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
111 |
GROUP BY key_level,keytyp_ID,keytyp_bez"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
112 |
if ($res = $dbc -> queryObjectArray($sql)) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
113 |
foreach ($res as $row) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
114 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
115 |
if (!$ky['kt'] && !$start) $ky['kt'] = $row->keytyp_ID; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
116 |
if ($row->keytyp_ID == $ky['kt']) $select = "selected='selected'"; else $select = ""; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
117 |
echo "<option $select value=\"$row->keytyp_ID\">$row->key_level - $row->keytyp_ID [$row->keytyp_bez] ($row->bestand)</option>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
118 |
$start=1; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
119 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
120 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
121 |
</select> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
122 |
</td> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
123 |
<td><input name="ky[anz]" type="text" size="5" maxlength="3" value="<?php echo $ky['anz']; ?>" /></td> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
124 |
<td><select name="ky[dep]" onchange="this.form.submit();"> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
125 |
<?php |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
126 |
function nicht_fhi($var) |
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
127 |
{return ($var!='FHI');} |
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
128 |
$ofdep = array_filter($adep,"nicht_fhi"); |
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
129 |
$strdep = "'". implode("','",$ofdep) ."'"; |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
130 |
$sql = "SELECT * FROM fhiiqm.KeyDepot WHERE depot_ID IN ($strdep)"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
131 |
if ($res = $dbc -> queryObjectArray($sql)) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
132 |
foreach ($res as $row) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
133 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
134 |
if (!$ky['dep'] && !$beg) $ky['dep'] = $row->depot_ID; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
135 |
if ($row->depot_ID == $ky['dep']) $select = "selected='selected'"; else $select = ""; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
136 |
echo "<option $select value=\"$row->depot_ID\">$row->depot_ID: $row->depot_bez</option>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
137 |
$beg=1; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
138 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
139 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
140 |
</select> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
141 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
142 |
$sql = "SELECT IFNULL(SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END),0) - IFNULL(SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END),0) - IFNULL(SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END),0) AS bestand |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
143 |
FROM fhiiqm.Keytyp_Depot WHERE depot_ID='".$ky["dep"]."' AND keytyp_ID = '". $ky["kt"] ."'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
144 |
// echo "nach submit: $sql<br />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
145 |
$anzdep = $dbc->querySingleItem($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
146 |
echo " ($anzdep)"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
147 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
148 |
</td> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
149 |
</tr> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
150 |
<tr><td>Bemerkung</td><td colspan="2"><textarea name="ky[bem]" cols="50" rows="2"><?php echo $ky['bem']; ?></textarea></td></tr> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
151 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
152 |
if (in_array("ke",$_SESSION["recht"])) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
153 |
{ |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
154 |
if (in_array("FHI",$adep)) |
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
155 |
echo "<tr><td></td><td><input class=\"button\" type=\"submit\" name=\"out\" value=\"-> Ausgabe \" title=\"Ausgabe\"/></td></tr>"; |
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
156 |
echo "<tr><td></td><td><input class=\"button\" type=\"submit\" name=\"get\" value=\"<- Rücknahme\" title=\"Rueckgabe\"/></td></tr>"; |
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
157 |
// echo "<tr><td></td><td><input class=\"button\" type=\"submit\" name=\"lost\" value=\"<- Verlust \" title=\"Verlust"/></td></tr>\"; |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
158 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
159 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
160 |
</table> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
161 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
162 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
163 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
164 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
165 |
echo "<div align=\"center\">"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
166 |
// print_r($ky); echo "$get,$out,$lost<br />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
167 |
$umls = array("Ä","Ö","Ü","ä","ö","ü","ß"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
168 |
$umlr = array("Ae","Oe","Ue","ae","oe","ue","ss"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
169 |
if ($get) $action = "get"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
170 |
elseif ($out) $action = "out"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
171 |
elseif ($lost) $action = "lost"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
172 |
if (isset($ky) && $ky) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
173 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
174 |
// $ky["bem"] = str_replace($umls,$umlr,str_replace("'","\"",substr($ky["bem"],0,100))); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
175 |
$ky["bem"] = str_replace("'","\"",substr($ky["bem"],0,100)); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
176 |
if (is_numeric($ky["anz"]) && $ky["anz"] != 0) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
177 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
178 |
$sql = "CALL keytyp_tract_dep('FHI','".$ky["dep"]."','".$ky["kt"]."',".$ky["anz"].",'$action','" .$ky["bem"]."',@suc)"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
179 |
$result = $dbc ->queryObjectArray($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
180 |
if ($dbc -> querySingleItem("SELECT @suc")) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
181 |
echo "<p class='green'><b>" . $aaction["$action"].": ".$ky["anz"]. " Schlüssel '". $ky['kt'] . |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
182 |
"' wurde(n) erfolgreich zwischen Depot 'FHI' und Depot '".$ky["dep"]. "' transferiert.</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
183 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
184 |
echo "<p class='red'><b>" . $aaction["$action"].": ".$ky["anz"]. " Schlüssel '". $ky['kt'] . |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
185 |
"' konnte(n) nicht zwischen Depot 'FHI' und Depot '".$ky["dep"]. "' transferiert werden.</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
186 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
187 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
188 |
echo "<p class='red'><b>" . $aaction["$action"].": '".$ky["anz"]. "' Schlüssel '". $ky['kt'] . |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
189 |
"' konnte(n) nicht zwischen Depot 'FHI' und Depot '".$ky["dep"]. "' transferiert werden.</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
190 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
191 |
$sql = "SELECT SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END) AS bestand |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
192 |
FROM fhiiqm.Keytyp_Depot WHERE depot_ID='FHI' AND keytyp_ID = '". $ky["kt"] ."'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
193 |
$anzfhi = $dbc->querySingleItem($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
194 |
$sql = "SELECT SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END) AS bestand |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
195 |
FROM fhiiqm.Keytyp_Depot WHERE depot_ID='".$ky["dep"]."' AND keytyp_ID = '". $ky["kt"] ."'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
196 |
$anzdep = $dbc->querySingleItem($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
197 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
198 |
echo "<p>Aktueller Bestand Schlüsseltyp '". $ky["kt"] ."'<br /> Depot FHI: $anzfhi<br /> Depot ". $ky["dep"] . ": $anzdep</p><br /><br />\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
199 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
200 |
echo "</div>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
201 |
echo "<p class='sc'> <a href=\"".$_SERVER["PHP_SELF"]."\" target=\"_self\" title=\"Transfer Depot\">Weiterer Depot-Transfer</a></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
202 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
203 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
204 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
205 |
</body> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
206 |
</html> |