author | Bettina Schwarzer |
Fri, 05 Feb 2016 14:03:40 +0100 | |
changeset 44 | d652bbba2d43 |
parent 39 | 4ce411ed28b6 |
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 05/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 |
* INSERT, UPDATE Keytype |
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 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
11 |
error_reporting(E_ALL ^ E_NOTICE); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
12 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
13 |
session_start(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
14 |
if (! isset($_SESSION["userid"])) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
15 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
16 |
include_once ("inc/func_lib.inc.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
17 |
login($_SERVER["PHP_SELF"]); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
18 |
exit; |
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 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
21 |
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
|
22 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
23 |
header("Location: start.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
24 |
exit; |
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 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
27 |
include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
28 |
if (!isset($dbc) || !$dbc) $dbc = new dbconnection(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
29 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
30 |
// userid: Depot 'FHI', 'edit' = 1 -> Keytyp bearbeitbar |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
31 |
$redit = 0; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
32 |
$uid = $_SESSION["userid"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
33 |
$sql = "SELECT edit FROM KeyDepot_userweb WHERE depot_ID = 'FHI' AND userid = '$uid'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
34 |
$redit = $dbc -> querySingleItem($sql); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
35 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
36 |
$sub = $_POST["eintragen"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
37 |
$del = $_POST["del"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
38 |
$ky = $_POST["ky"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
39 |
$okn = $ky["okn"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
40 |
$ok = $_POST["ok"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
41 |
if (!$okn) $ok=0; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
42 |
$kid = $_GET["i"]; // keytyp |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
43 |
$getp = "s=1&k=$kid" |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
44 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
45 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
46 |
<!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
|
47 |
<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
|
48 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
49 |
<head> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
50 |
<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
|
51 |
<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
|
52 |
<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
|
53 |
<title>Keytyp bearbeiten</title> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
54 |
</head> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
55 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
56 |
<body> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
57 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
58 |
<?php |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
59 |
echo " "; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
60 |
echo "<div class=\"float-br smaller\" valign='top'>"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
61 |
echo " user: " . $_SESSION["userid"]; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
62 |
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
|
63 |
echo "<div class=\"float-r\"><img src=\"img/key.png\" border=\"0\" alt=\"Keytyp bearbeiten\" title=\"Schlüsseltyp bearbeiten\"/></div>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
64 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
65 |
if ($redit) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
66 |
if ($kid) $text = "editieren"; else $text = "erfassen"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
67 |
else $text = "Ansicht"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
68 |
echo "<div align=\"center\">"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
69 |
echo "<h3>Schlüsseltyp $text</h3>"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
70 |
echo "</div>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
71 |
if ((!$sub && !$del) || !isset($ky) || !$ok) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
72 |
{ |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
73 |
if ($kid && (!$sub || !$del) && !isset($ky)) |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
74 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
75 |
$sql = "SELECT keytyp_ID,key_level,key_parent,key_hiertyp_ID,keytyp_bez,key_anl_ID FROM Keytyp WHERE keytyp_ID='$kid'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
76 |
if ($result = $dbc -> queryObjectArray($sql)) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
77 |
foreach ($result as $row) |
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 |
$ky['typ'] = $row->keytyp_ID; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
80 |
$ky['level'] = $row->key_level; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
81 |
$ky['parent'] = $row->key_parent; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
82 |
$ky['hier'] = $row->key_hiertyp_ID; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
83 |
$ky['bez'] = $row->keytyp_bez; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
84 |
$ky['anl'] = $row->key_anl_ID; |
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 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
87 |
include ($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/form/keytyp_form.inc.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
88 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
89 |
if ($sub || $del) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
90 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
91 |
if ($sub) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
92 |
$frage = "Alle Angaben ok?"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
93 |
elseif ($del) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
94 |
$frage = "Schlüsseltyp wirklich löschen?"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
95 |
echo "<tr> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
96 |
<td class=\"red\" valign=\"top\" align=\"left\">$frage</td> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
97 |
<td><input type=\"checkbox\" name=\"ok\" value=\"1\""; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
98 |
if ($ok) echo "checked=\"checked\""; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
99 |
echo " /></td>\n</tr>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
100 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
101 |
if (!is_null($_SESSION["recht"]) && in_array("ke",$_SESSION["recht"]) && $redit) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
102 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
103 |
echo " |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
104 |
<tr><td> </td>\n |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
105 |
<td><input class=\"button\" type=\"submit\" name=\"eintragen\" value=\" eintragen \" />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
106 |
if ($kid) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
107 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
108 |
echo " <input class=\"buttonr\" type=\"submit\" value=\"löschen\" name=\"del\" title=\"delete\" />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
109 |
// echo " <input class=\"button\" type=\"submit\" value=\"duplizieren\" name=\"dup\" title=\"delete\" />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
110 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
111 |
echo "</td></tr>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
112 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
113 |
echo "</table>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
114 |
echo "</div>\n"; |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
115 |
echo "<p class='sc'> <a href=\"keytyp_search.php?$getp\" target=\"_self\" title=\"Schlüsseltyp-Hierarchie\">« zur Schlüsseltyp-Hierarchie</a></p>\n"; |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
116 |
echo "</form>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
117 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
118 |
else |
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 |
echo "<div align='center'>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
121 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
122 |
if ($del) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
123 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
124 |
$sql = "DELETE FROM Keytyp WHERE keytyp_ID='$kid'"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
125 |
if ($dbc -> execute($sql)) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
126 |
echo "<p class='green'><b>DELETE: Daten zu '$kid' wurden erfolgreich gelöscht.</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
127 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
128 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
129 |
echo "<p class='red'><b>DELETE: Daten zu '$kid' konnten nicht gelöscht werden!</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
130 |
echo "sql = $sql<br />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
131 |
echo "error DELETE: " . $dbc->error . "<br />"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
132 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
133 |
include ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/keytyp_dat_show.inc.php"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
134 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
135 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
136 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
137 |
if ($ky['hier'] == -1) $ky['hier'] = null; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
138 |
if ($ky['anl'] == -1) $ky['anl'] = null; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
139 |
foreach ($ky as &$elem) if (!$elem) $elem = null; // NULL-Eintrag in Leerfelder |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
140 |
if (is_null($ky['level'])) $ky['level'] = ''; |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
141 |
$stmt = $dbc -> stmtinit(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
142 |
if (is_object($stmt)) |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
143 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
144 |
if ($kid) // UPDATE |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
145 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
146 |
$stmt -> prepare("UPDATE Keytyp SET |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
147 |
key_level = ?, |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
148 |
key_parent = ?, |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
149 |
key_hiertyp_ID = ?, |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
150 |
keytyp_bez = ?, |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
151 |
key_anl_ID = ? |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
152 |
WHERE keytyp_ID = '$kid'"); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
153 |
$stmt -> bind_param('sssss',$ky['level'],$ky['parent'],$ky['hier'],$ky['bez'],$ky['anl']); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
154 |
// echo "UPDATE: ". var_dump($stmt); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
155 |
$result = $stmt -> execute(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
156 |
if ($stmt->error) echo "error UPDATE Keytyp: " . $stmt->error . "<br><br>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
157 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
158 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
159 |
{ |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
160 |
$stmt -> prepare("INSERT INTO Keytyp (keytyp_ID,key_level,key_parent,key_hiertyp_ID,keytyp_bez,key_anl_ID) VALUES(?,?,?,?,?,?)"); |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
161 |
$stmt -> bind_param('ssssss',$ky['typ'],$ky['level'],$ky['parent'],$ky['hier'],$ky['bez'],$ky['anl']); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
162 |
$result = $stmt -> execute(); |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
163 |
if ($stmt->error) echo "error INSERT Keytyp: " . $stmt->error . "<br><br>\n"; |
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 |
if ($result) // INSERT/UPDATE Keytyp |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
166 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
167 |
//Eingabe Daten erfolgreich |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
168 |
echo "<p class='green'><b>Keytypdaten zu '" . $ky['typ']. "', Level = '". $ky['level'] . "' wurden erfolgreich gespeichert.</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
169 |
echo "<br /><br />\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
170 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
171 |
else |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
172 |
{ |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
173 |
echo "<p class='red'><b>Keytypdaten zu '" . $ky['typ']. "', Level = '". $ky['level'] . "' konnten nicht gespeichert werden.</b></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
174 |
echo "<br /><br />\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
175 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
176 |
include ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/keytyp_dat_show.inc.php"); |
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 |
|
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
179 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
180 |
echo "</div>"; |
39
4ce411ed28b6
+ Keytyp: delDepot, userVW; Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
38
diff
changeset
|
181 |
echo "<p class='sc'> <a href=\"keytyp_search.php?$getp\" target=\"_self\" title=\"Schlüsseltyp-Hierarchie\">« zur Schlüsseltyp-Hierarchie</a></p>\n"; |
38
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
182 |
echo "<p class='sc'> <a href=\"".$_SERVER["PHP_SELF"]."\" target=\"_self\" title=\"Schlüsseltyp erfassen\">Neuen Schlüsseltyp erfassen</a></p>\n"; |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
183 |
} |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
184 |
?> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
185 |
</body> |
45c139f74ea4
+ Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff
changeset
|
186 |
</html> |