author | Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> |
Thu, 23 Aug 2012 10:17:50 +0200 | |
changeset 29 | 72f79dab938e |
parent 28 | 8d8bce56918f |
child 30 | d02d02efc55a |
permissions | -rw-r--r-- |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
1 |
<?php |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
2 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
3 |
/** |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
4 |
* @author Bettina Schwarzer, Fritz-Haber-Institut |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
5 |
* @copyright 06/2011 |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
6 |
* |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
7 |
* |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
8 |
*/ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
9 |
|
28
8d8bce56918f
+ Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
26
diff
changeset
|
10 |
function tab_column($colnum=2,$bez,$sort,$dir,$fcol=0,$fanr=0,$filtb="",$start="",$anzds="25",$id="",$g=0) |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
11 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
12 |
/** beliebige Tabellenspalte mit Sortier-/Filtersymbolen und Links generieren |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
13 |
* Parameter |
14
32203b8f40ee
Rechteverwaltung II, vertrag_flist-Spaltenreihenfolge
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
13
diff
changeset
|
14 |
* $colnum SpaltenNr. in SELECT-Statement |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
15 |
* $bez Spaltenbezeichnung |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
16 |
* $sort aktuelle SortspaltenNr. |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
17 |
* $dir Sortrichtung (ASC/DESC) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
18 |
* $fcol SpaltenNr. Filter (=0, wenn nicht gefiltert werden soll) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
19 |
* $fanr aktuelle FilterspaltenNr. |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
20 |
* $filtb Filterbegriff |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
21 |
* $start ab Datensatz $start+1 |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
22 |
* $anzds Anzahl angezeigter Datensaetze |
28
8d8bce56918f
+ Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
26
diff
changeset
|
23 |
* $id fuer spezielle ID als zusaetzl. Filter (Laser-Log) |
8d8bce56918f
+ Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
26
diff
changeset
|
24 |
* $g Gesamtansicht (rag-gefahr-massnahmen-vorsorge) |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
25 |
*/ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
26 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
27 |
if ($colnum == $sort) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
28 |
if ($dir == 'DESC') |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
29 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
30 |
$auf = "auf"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
31 |
$ab = "ab_activ"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
32 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
33 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
34 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
35 |
$auf = "auf_activ"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
36 |
$ab = "ab"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
37 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
38 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
39 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
40 |
$auf = "auf"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
41 |
$ab = "ab"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
42 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
43 |
|
29
72f79dab938e
+ Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
28
diff
changeset
|
44 |
if ($bez == "Haus") $tip = "Haus: A, B, BES, C, D, E, F, FAB, HAR, K, L, M, N, P, Q, R, S, T, U"; else $tip = "Filter"; |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
45 |
if ($fcol>0 && $fanr>0) // Filtern nach Spalte moeglich |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
46 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
47 |
if ($fcol == $fanr) $filt = "filter_activ"; else $filt = "filter"; |
28
8d8bce56918f
+ Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
26
diff
changeset
|
48 |
$filt = " <a href='".$_SERVER['PHP_SELF']."?f=$fcol&s=$sort&d=$dir&st=$start&z=$anzds&i=$id&g=$g'><img src='/fhiiqm/img/$filt.gif' border='0' width='14' hight='11' alt='$tip' title='$tip'></a>"; |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
49 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
50 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
51 |
$filt=""; |
28
8d8bce56918f
+ Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
26
diff
changeset
|
52 |
if ($filtb>'!') $where = "&f=$fanr&b=$filtb&i=$id&g=$g"; else $where="&i=$id&g=$g"; |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
53 |
echo "<th>$bez <a href='".$_SERVER['PHP_SELF']."?s=$colnum$where&st=$start&z=$anzds'><img src='/fhiiqm/img/$auf.gif' border='0' width='11' hight='11' alt='sort aufsteigend' title='sort aufsteigend'></a> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
54 |
<a href='".$_SERVER['PHP_SELF']."?s=$colnum&d=DESC$where&st=$start&z=$anzds'><img src='/fhiiqm/img/$ab.gif' border='0' width='11' hight='11' alt='sort absteigend' title='sort absteigend'></a>$filt</th>\n"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
55 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
56 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
57 |
function date_obj($jahr,$mon,$tag) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
58 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
59 |
/** prueft auf valides Datum und erstellt DateTime-Objekt, wenn o.k. |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
60 |
* Voraussetzung: Klasse 'DateTime_s' ist included |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
61 |
*/ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
62 |
include_once ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php"); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
63 |
if ($jahr && $mon && $tag) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
64 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
65 |
$dat = $jahr."-".$mon."-".$tag; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
66 |
// Datum valid? |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
67 |
if (!$dat = new DateTime_s($dat)) $dat = null; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
68 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
69 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
70 |
$dat = null; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
71 |
return $dat; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
72 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
73 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
74 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
75 |
function liste_links($start,$zeil,$anz,$liste) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
76 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
77 |
/** erstellt links zu Seiten einer Liste |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
78 |
* Parameter |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
79 |
* $start Beginn bei DS $start+1 (1.DS -> $start=0) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
80 |
* $zeil Anzahl Zeilen pro Seite |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
81 |
* $anz Anzahl DS gesamt |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
82 |
* $liste weitere Inhalte fuer $_GET-Array |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
83 |
*/ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
84 |
$page = 1; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
85 |
while (($page-1)*$zeil < $anz) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
86 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
87 |
$be = ($page-1)*$zeil+1; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
88 |
if (($page-1)*$zeil+$zeil < $anz) $en = ($page-1)*$zeil+$zeil; else $en = $anz; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
89 |
$st = ($page-1)*$zeil; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
90 |
if ($start == $be-1) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
91 |
echo "$be - $en"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
92 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
93 |
echo "<a href=\"" . $_SERVER['PHP_SELF'] . "?st=$st$liste\" class=\"sc\">$be - $en</a>"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
94 |
if (($page-1)*$zeil+$zeil < $anz) echo "<span class=\"sc\"> | </span>"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
95 |
$page++; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
96 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
97 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
98 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
99 |
|
13
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
100 |
function login($target, $headl="") |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
101 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
102 |
/** zeigt Login-Form, prueft userid und passwort, leitet zu gewuenschter Seite weiter |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
103 |
* Parameter |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
104 |
* $target Zieladresse |
21
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
105 |
* $headl Ueberschrift Loginform |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
106 |
*/ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
107 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
108 |
session_start(); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
109 |
if ($_SESSION["userid"]) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
110 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
111 |
header("Location: $target"); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
112 |
exit; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
113 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
114 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
115 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
116 |
|
19
33ee23fafd4d
+ Anlage Pruefung, Anlage Risiko, Menue anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
15
diff
changeset
|
117 |
$login = $_POST["login"]; |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
118 |
$log = $_POST["log"]; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
119 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
120 |
if ($login) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
121 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
122 |
include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php"); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
123 |
if (!isset($dbc) || !$dbc) $dbc = new dbconnection(); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
124 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
125 |
$stmt = $dbc -> stmtinit(); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
126 |
if (is_object($stmt)) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
127 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
128 |
$stmt -> prepare("SELECT userid, pwd FROM userweb WHERE userid = ?"); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
129 |
$stmt -> bind_param('s',$log["user"]); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
130 |
$result = $stmt -> execute(); |
13
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
131 |
// $stmt -> store_result(); // wegen weiterer query dies oder $stmt -> free_result(); |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
132 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
133 |
if ($result) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
134 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
135 |
$stmt->bind_result($userid, $pwdmd5); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
136 |
if ($stmt->fetch()) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
137 |
{ |
13
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
138 |
if ($pwdmd5 == md5($log["pass"]) || $log["pass"]==null) |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
139 |
{ |
13
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
140 |
$_SESSION = array(); |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
141 |
$_SESSION["userid"] = $userid; |
13
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
142 |
|
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
143 |
// Recht |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
144 |
$stmt -> free_result(); // wegen weiterer query |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
145 |
$sql = "SELECT recht_ID FROM user_recht WHERE userid = '$userid'"; |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
146 |
if ($res = $dbc -> queryObjectArray($sql)) |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
147 |
{ |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
148 |
$arecht = array(); |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
149 |
foreach ($res as $row) |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
150 |
{ $arecht[] = $row->recht_ID;} |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
151 |
if (count($arecht)>0) |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
152 |
$_SESSION["recht"] = $arecht; |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
153 |
else |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
154 |
$_SESSION["recht"] = null; |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
155 |
} |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
156 |
else |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
157 |
{ |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
158 |
$_SESSION["recht"] = null; |
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
159 |
// echo "error_recht: " . $dbc->error . "<br />"; |
15
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
160 |
} |
13
741b35e9ebbe
Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
12
diff
changeset
|
161 |
// print_r($arecht); |
15
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
162 |
|
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
163 |
// Recht Produkt-Gruppe |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
164 |
$sql = "SELECT prod_group_ID FROM user_prodgroup WHERE userid = '$userid'"; |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
165 |
if ($re = $dbc -> queryObjectArray($sql)) |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
166 |
{ |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
167 |
$pgrecht = array(); |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
168 |
foreach ($re as $row) |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
169 |
{ $pgrecht[] = $row->prod_group_ID;} |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
170 |
if (count($pgrecht)>0) |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
171 |
$_SESSION["prodg"] = $pgrecht; |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
172 |
else |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
173 |
$_SESSION["prodg"] = null; |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
174 |
} |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
175 |
else |
1ed6fbdf4237
+Rechte Produktgruppe
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
14
diff
changeset
|
176 |
$_SESSION["prodg"] = null; |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
177 |
header("Location: $target"); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
178 |
exit; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
179 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
180 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
181 |
$err2 = "<br /><span class=\"red\">Passwort ist nicht korrekt</span>\n"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
182 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
183 |
else |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
184 |
$err1 = "<br /><span class=\"red\">Username ist nicht korrekt</span>\n"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
185 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
186 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
187 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
188 |
if ($err1 || $err2 || !$log) |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
189 |
{ |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
190 |
?> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
191 |
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
192 |
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en"> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
193 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
194 |
<head> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
195 |
<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" /> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
196 |
<link href="/fhiiqm/css/db.css" rel="STYLESHEET" type="TEXT/CSS" /> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
197 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
198 |
<title>Login fhiiqm</title> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
199 |
</head> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
200 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
201 |
<body onload="document.flogin.user.focus();"> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
202 |
<!-- <div class="float-r"><img src="img/document_mark_as_final.png" border="0" alt="Verträge" title="Verträge"/></div> --> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
203 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
204 |
<?php |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
205 |
include ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/form/login_form.inc.php"); |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
206 |
echo "</body> |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
207 |
</html>\n"; |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
208 |
} |
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
209 |
} |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
210 |
|
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
211 |
function duplicate_record ($table, $key_name, $key_value, $auto=1) |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
212 |
{ |
21
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
213 |
/** dupliziert Datensatz in table |
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
214 |
* Parameter |
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
215 |
* $table Tabellenname |
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
216 |
* $key_name Name ID-Spalte |
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
217 |
* $key_value Wert ID des DSes, der dupliziert werden soll |
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
218 |
* $auto ID ist Auto-Wert |
21
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
219 |
*/ |
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
220 |
|
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
221 |
include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php"); |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
222 |
global $dbc; // Verbindung ist schon da? |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
223 |
if (!isset($dbc) || !$dbc) $dbc = new dbconnection(); |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
224 |
|
21
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
225 |
// erfragen Namen aller Felder in $table |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
226 |
$sql = 'SHOW COLUMNS FROM ' . $table . ';'; |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
227 |
$result = $dbc -> queryObjectArray($sql); |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
228 |
|
21
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
229 |
// Generieren der INSERT-Abfrage mit allen Feldern ausser ID-Feld |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
230 |
$query = 'INSERT INTO ' . $table . ' (SELECT '; |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
231 |
|
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
232 |
foreach ($result as $row) |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
233 |
{ |
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
234 |
if ($row->Field == $key_name && $auto) { |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
235 |
$query .= 'NULL, '; |
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
236 |
} |
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
237 |
elseif ($row->Field == $key_name && !$auto) |
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
238 |
{$query .= '"'. $key_value . '_COPY", ';} |
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
239 |
else { |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
240 |
$query .= $row->Field . ', '; |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
241 |
} // END IF |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
242 |
} |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
243 |
|
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
244 |
$query = substr($query, 0, strlen($query) - 2); |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
245 |
$query .= ' FROM ' . $table . ' WHERE ' . $key_name . ' = "' . $key_value . '")'; |
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
246 |
// echo "$query<br />"; |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
247 |
$ret = $dbc -> execute($query); |
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
248 |
if ($ret && $auto) |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
249 |
{ |
21
97dba0fe820c
+Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
20
diff
changeset
|
250 |
// Return new id |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
251 |
$new_id = $dbc -> insertId(); |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
252 |
return $new_id; |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
253 |
} |
22
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
254 |
elseif ($ret && !$auto) |
aae5b0ecc47b
+ Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
21
diff
changeset
|
255 |
return $key_value . "_COPY"; |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
256 |
else |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
257 |
return false; |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
258 |
/* |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
259 |
return $query; |
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
260 |
*/ |
23
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
261 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
262 |
|
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
263 |
function dbformat_wert($wert) |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
264 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
265 |
/** wandelt Dezimalzahl mit Komma und Tausender-Trennzeichen in Datenbankformat |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
266 |
* |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
267 |
* Parameter |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
268 |
* $wert - zu konvertierende Zahl |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
269 |
*/ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
270 |
|
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
271 |
if (isset($wert) && $wert<>0) |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
272 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
273 |
if (strpos($wert,',') >0) |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
274 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
275 |
$wert = str_replace(',','.',$wert); |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
276 |
$aw = explode('.',$wert); |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
277 |
if (count($aw) > 2) // mit Dezimalpunkt und Tausendertrennzeichen |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
278 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
279 |
for ($i=0; $i<count($aw)-1; $i++) |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
280 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
281 |
$dbw .= $aw[$i]; |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
282 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
283 |
$dbw .= "." .$aw[count($aw)-1]; |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
284 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
285 |
else // kein Dezimalpunkt,nur Kommastellen |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
286 |
$dbw = $wert; |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
287 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
288 |
else |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
289 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
290 |
$aw = explode('.',$wert); |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
291 |
if (strlen($aw[count($aw)-1]) == 2) |
25
482252ff12fd
+ Prozesse edit, Liste; Reports Info, GVP
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
23
diff
changeset
|
292 |
{ // Dezimalpunkt mit 2 Stellen danach (= .nn) |
23
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
293 |
for ($i=0; $i<count($aw)-1; $i++) |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
294 |
{ |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
295 |
$dbw .= $aw[$i]; |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
296 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
297 |
$dbw .= "." .$aw[count($aw)-1]; |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
298 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
299 |
else |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
300 |
$dbw = str_replace('.','',$wert); |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
301 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
302 |
return $dbw; |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
303 |
} |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
304 |
else |
a382de56a8e4
+ Laser-Log-List, edit Raum-Reinigung, insert/edit Kosten mit 1000-Trennz.eichen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
22
diff
changeset
|
305 |
return 0; |
20
5877137431e4
+ Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
19
diff
changeset
|
306 |
} |
1
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
307 |
|
6288d5685bff
Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff
changeset
|
308 |
?> |