fhiiqm/laser_ed.php
author Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
Wed, 27 Feb 2013 09:43:08 +0100
changeset 34 fc60ef80a7ad
parent 28 8d8bce56918f
child 40 6f4b105daa24
permissions -rw-r--r--
+ Telefonliste pdf: 4 Varianten + Projekte, Schritte + Arbeitssicherheit
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     1
<?php
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     2
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     3
/**
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
     5
 * @copyright 12/2011, 01/2012
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
     6
 * 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
     7
 * Laser INSERT, UPDATE, DELETE, COPY
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     8
 */
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     9
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    10
    error_reporting(E_ALL ^ E_NOTICE);
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    11
    
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    12
    session_start();
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    13
    if (! isset($_SESSION["userid"]))
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    14
    { 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    15
        include_once ("inc/func_lib.inc.php");	
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    16
        login($_SERVER["PHP_SELF"]);
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    17
        exit;
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    18
    }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    19
    
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    20
    if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("lr",$_SESSION["recht"]) && !in_array("le",$_SESSION["recht"])))
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    21
    {
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    22
        header("Location: start.php");
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    23
        exit;
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    24
    }    
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    25
    
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    26
    include_once($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/inc/dbconnect.inc.php");
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    27
    if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    28
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    29
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    30
    $la     = $_POST["la"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    31
    $laid   = $_GET["i"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    32
    $copy   = $_GET["c"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    33
    $sub    = $_POST["eintragen"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    34
    $del    = $_POST["del"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    35
    $dup    = $_POST["dup"];
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    36
    if (!$dup) $dup = $_GET["dp"];
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    37
	$ok		= $_POST["ok"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    38
    if (!$la['okn']) $ok=false;
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    39
    $duptext="";
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    40
    $start  = $_GET["st"];
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    41
    $zeil   = $_GET["z"];
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    42
	$sort   = $_GET["s"];   // Sortierung nach Spalte
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    43
    $dir    = $_GET["d"];   // Sortierrichtung
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    44
    $fnum   = $_GET["f"];   // Spaltennummer, nach der aktuell gefiltert wird
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    45
    $filter = $_GET["b"];   // Filterbegriff
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    46
    // $_GET-Parameter zurück zur Laserliste mit den selben Einstellungen wie zuvor
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    47
    $getp = "s=$sort&d=$dir&f=$fnum&b=$filter&st=$start&z=$zeil";
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
    48
    
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    49
    if ($dup)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    50
    {   // Anlage duplizieren
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    51
        include_once ($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/inc/func_lib.inc.php");
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    52
        $tab = "Laser";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    53
        $key = "las_ID";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    54
        $val =  $laid;
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    55
//        $ret=1;
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    56
        $ret = duplicate_record ($tab, $key, $val);
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    57
        if ($ret)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    58
        { 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    59
            $laid=$ret;
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
    60
            $addr = $_SERVER["PHP_SELF"] . "?i=$laid&c=1&$getp";
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    61
            header("Location: $addr");
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    62
            exit;
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    63
        }
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
    64
        else $duptext = " - Fehler beim Duplizieren von ". $la["lbez"];    
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    65
    }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    66
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    67
?>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    68
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    69
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    70
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    71
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    72
<head>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    73
	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    74
    <link type="text/css" href="/fhiiqm/css/db.css" rel="Stylesheet" media="screen"/>	
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    75
    <link type="text/css" href="/fhiiqm/css/db_print.css" rel="Stylesheet" media="print"/>	
28
8d8bce56918f + Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 25
diff changeset
    76
<!--
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    77
    <link type="text/css" href="/fhiiqm/css/jquery/ui-lightness/jquery-ui-1.8.16.custom.css" rel="Stylesheet" />	
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    78
    <script type="text/javascript" src="/fhiiqm/js/jquery/jquery-1.6.2.min.js"></script>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    79
    <script type="text/javascript" src="/fhiiqm/js/jquery/jquery-ui-1.8.16.custom.min.js"></script>
28
8d8bce56918f + Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 25
diff changeset
    80
-->
8d8bce56918f + Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 25
diff changeset
    81
    <link type="text/css" href="/fhiiqm/css/jquery/ui-lightness-1.8.21/jquery-ui-1.8.21.custom.css" rel="Stylesheet" />	
8d8bce56918f + Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 25
diff changeset
    82
    <script type="text/javascript" src="/fhiiqm/js/jquery/jquery-1.7.2.min.js"></script>
8d8bce56918f + Arbeitssicherheit, Listen, Reports, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 25
diff changeset
    83
    <script type="text/javascript" src="/fhiiqm/js/jquery/jquery-ui-1.8.21.custom.min.js"></script>
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    84
    <title>Laser</title>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    85
 </head>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    86
 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    87
 <body>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    88
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    89
<?php
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    90
    echo "&nbsp;";  
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    91
    echo "<div class=\"float-br smaller\" valign='top'>";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    92
    echo "&nbsp;&nbsp;&nbsp;user: " . $_SESSION["userid"];
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    93
    echo "&nbsp;&nbsp;&nbsp;<a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    94
    echo "<div class=\"float-r\"><img src=\"img/laser.png\" border=\"0\" alt=\"Laser\" title=\"Laser\"/></div>\n";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    95
?>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    96
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    97
    <div align='center'>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    98
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    99
    <script>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   100
      $(document).ready(function() {
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   101
        $("#lbez").focus();
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   102
        $("#persknr").autocomplete({
25
482252ff12fd + Prozesse edit, Liste; Reports Info, GVP
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 23
diff changeset
   103
                source: "/fhiiqm/inc/ma_list_ac.inc.php?s=a",
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   104
    			minLength: 2,
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   105
                select: function(event,ui){$("#pid").val(ui.item.id);}
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   106
    		});
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   107
        $("input").persknr("long20").addClass("long20");
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   108
        });
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   109
    </script>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   110
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   111
    <?php
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   112
//        print_r($al);
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   113
        
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   114
        if ($laid) $text = "editieren"; else $text = "erfassen";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   115
        if ($copy) $duptext = " (Kopie)";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   116
        echo "<h3>Laser $text$duptext<h3>";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   117
        
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   118
        echo "</div>\n";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   119
        
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   120
        if (!$ok || (!$sub && !$del && !$dup))
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   121
        {
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   122
            if ($laid && (!$sub || !$del) && !isset($la))
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   123
            { // update
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   124
                $sql = "SELECT las_ID, las_bez, las_welle_von, las_welle_bis, 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   125
                            las_art_ID, las_klasse_ID, las_typ_ID, leistung, einheit_leistung, 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   126
                            apertur, einheit_apertur, energie, einheit_energie, frequenz, einheit_frequenz, 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   127
                            impulsbreite, einheit_impulsbreite, l.las_hersteller_ID, schutzst_ID, 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   128
                            l.aktiv, l.persknr, l.raum_ID, geb_ID, las_info,
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   129
                            CONCAT(nachname,', ',vorname) AS vname, las_hersteller_bez,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   130
                            inventar_nr,maxleistung, einheit_maxleist,schutzst_od_ID,las_ref_ID,l.timestamp
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   131
                        FROM fhiiqm.Laser l LEFT OUTER JOIN fhiiqm.Mitarbeiter m 
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   132
                            ON l.persknr=m.persknr LEFT OUTER JOIN fhiiqm.Laser_Hersteller h
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   133
                            ON l.las_hersteller_ID=h.las_hersteller_ID LEFT OUTER JOIN fhiiqm.Raum r
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   134
                            ON l.raum_ID=r.Raum_ID
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   135
                        WHERE las_ID = '$laid'";
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   136
                if ($result = $dbc -> queryObjectArray($sql))
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   137
                {
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   138
                    foreach ($result as $row)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   139
                    {
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   140
                        $la["lid"]      = $laid;  
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   141
                        $la["lbez"]     = $row->las_bez;   
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   142
//                        $la['wvon']     = str_replace(".",",",$row->las_welle_von);
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   143
                        $la['wvon']     = str_replace(".",",",str_replace(".00","",$row->las_welle_von));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   144
                        $la['wbis']     = str_replace(".",",",str_replace(".00","",$row->las_welle_bis));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   145
                        $la["lart"]     = ($row->las_art_ID) ? $row->las_art_ID : -1;   
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   146
                        $la['lkla']     = ($row->las_klasse_ID) ? $row->las_klasse_ID : -1;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   147
                        $la['ltyp']     = ($row->las_typ_ID) ? $row->las_typ_ID : -1;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   148
                        $la['leist']    = str_replace(".",",",str_replace(".00","",$row->leistung));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   149
                        $la['eleist']   = $row->einheit_leistung;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   150
                        $la["apt"]      = str_replace(".",",",str_replace(".00","",$row->apertur));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   151
                        $la["eapt"]     = $row->einheit_apertur;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   152
                        $la["eng"]      = str_replace(".",",",str_replace(".00","",$row->energie));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   153
                        $la["eeng"]     = $row->einheit_energie;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   154
                        $la["frq"]      = str_replace(".",",",str_replace(".00","",$row->frequenz));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   155
                        $la["efrq"]     = $row->einheit_frequenz;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   156
                        $la["ipb"]      = str_replace(".",",",str_replace(".00","",$row->impulsbreite));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   157
                        $la["eipb"]     = $row->einheit_impulsbreite;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   158
                        $la["akt"]      = $row->aktiv;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   159
                        $la["hstid"]    = $row->las_hersteller_ID;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   160
                        if (!$la["hstid"]) $la["hstid"] = -1;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   161
                        $la["suid"]     = ($row->schutzst_ID)? $row->schutzst_ID : -1;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   162
                        $la["akt"]      = $row->aktiv;  
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   163
                        $la["persknr"]  = $row->vname;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   164
                        $la["pid"]      = ($row->persknr) ? $row->persknr : null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   165
                        $la["geb"]      = $row->geb_ID;    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   166
                        $la["raum"]     = ($row->raum_ID) ? $row->raum_ID : -1;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   167
                        $la["linfo"]    = $row->las_info;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   168
                        $la["invnr"]    = $row->inventar_nr;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   169
                        $la["leistmax"] = str_replace(".",",",str_replace(".00","",$row->maxleistung));
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   170
                        $la["eleistmax"]= $row->einheit_maxleist;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   171
                        $la["suodid"]   = $row->schutzst_od_ID;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   172
                        $la["lidref"]   = $row->las_ref_ID;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   173
                        $la["tstmp"]    = $row->timestamp; 
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   174
                    }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   175
                }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   176
            }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   177
            include ($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/form/laser_form.inc.php");     
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   178
            if ($sub || $del)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   179
    		{
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   180
    		  	if ($sub)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   181
                    $frage = "Alle Angaben ok?";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   182
                elseif ($del)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   183
                    $frage = "Laser wirklich l&ouml;schen?";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   184
    			echo "<tr>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   185
    			  <td class=\"red\" valign=\"top\" align=\"left\">$frage</td>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   186
    			        <td><input type=\"checkbox\" name=\"ok\" value=\"1\"";
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   187
    			        if ($ok)  echo "checked=\"checked\""; 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   188
    			echo " /></td>\n</tr>\n"; 
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   189
    		}
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   190
            if (!is_null($_SESSION["recht"]) && in_array("le",$_SESSION["recht"]))
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   191
            {
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   192
                echo "
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   193
               	<tr><td>&nbsp;</td>\n
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   194
                	<td><input  class=\"button\" type=\"submit\" name=\"eintragen\" value=\"  eintragen  \" />";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   195
                if ($laid)
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   196
                {
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   197
                    echo "&nbsp;&nbsp;&nbsp;<input class=\"buttonr\" type=\"submit\" value=\"l&ouml;schen\" name=\"del\" title=\"delete\" />";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   198
                    echo "&nbsp;&nbsp;&nbsp;<input class=\"button\" type=\"submit\" value=\"duplizieren\" name=\"dup\" title=\"delete\" />";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   199
                }    
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   200
               	echo "</td></tr>\n";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   201
            }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   202
            echo "</table>\n";
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   203
            echo "</div>\n";
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   204
//            if (!is_null($_SESSION["recht"]) && !in_array("le", $_SESSION["recht"]))
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
   205
                echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"laser_flist.php?$getp\" target=\"_self\" title=\"Laser\">&laquo; zur Laserliste</a></p>\n"; 
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   206
            echo "</form>\n";   
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   207
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   208
            
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   209
        }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   210
        else
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   211
        {
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   212
            echo "<div align='center'>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   213
            
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   214
            if ($del)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   215
            {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   216
                $sql = "DELETE FROM Laser WHERE las_ID = '$laid'";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   217
                $retld = $dbc -> execute($sql);
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   218
                if ($retld)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   219
                {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   220
                    echo "<p class='green'><b>DELETE: Daten  zu '".$la["lbez"]."' wurden erfolgreich gel&ouml;scht.</b></p>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   221
                    include ("inc/laser_dat_show.inc.php");
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   222
                }                
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   223
                else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   224
                {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   225
                    echo "<p class='red'><b>DELETE: Daten  zu '".$la["lbez"]."' konnten nicht gel&ouml;scht werden!</b></p>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   226
                    echo "sql = $sql<br />";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   227
                    echo "error DELETE: " . $dbc->error . "<br />";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   228
                }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   229
            }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   230
            else //INSERT oder UPDATE
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   231
            {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   232
                if ($la["lbez"]) $la["lbez"] = substr($la["lbez"],0,250); else $la["lbez"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   233
                if ($la["linfo"]) $la["linfo"] = substr($la["linfo"],0,500); else $la["linfo"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   234
                if ($la["lart"] == -1) $la["lart"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   235
                if ($la["lkla"] == -1) $la["lkla"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   236
                if ($la["ltyp"] == -1) $la["ltyp"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   237
                if ($la["suid"] == -1) $la["suid"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   238
                if ($la["suodid"] == -1) $la["suodid"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   239
                if ($la["lidref"] == -1) $la["lidref"] = null;
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
   240
                if ($la["raum"] == -1) $la["raum"] = null;
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   241
//                print_r($la); echo "<br /><br />";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   242
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   243
                if ($la["hstid"] == -1)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   244
                {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   245
                    if ($la["herst"] > "!") // neuer Hersteller?
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   246
                    {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   247
                        $sql = "SELECT las_hersteller_ID FROM Laser_Hersteller WHERE las_hersteller_bez = '" . ltrim($la["herst"]) . "'";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   248
                        if ($res = $dbc -> queryObjectArray($sql))
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   249
                        {   // Hersteller vorhanden
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   250
                            foreach ($res as $row)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   251
                                $la["hstid"] = $row->las_hersteller_ID;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   252
                        }        
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   253
                        else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   254
                        {   // Hersteller neu
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   255
                            $sql = "INSERT INTO Laser_Hersteller (las_hersteller_bez) VALUES (LEFT(TRIM('" . $la["herst"] . "'),50))";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   256
                            $reth = $dbc -> execute($sql); 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   257
                            if ($reth) $la["hstid"] = $dbc -> insertId(); else $la["hstid"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   258
                        }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   259
                    }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   260
                    else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   261
                        $la["hstid"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   262
                } 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   263
                
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   264
                if ($la["lart"] == -1)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   265
                {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   266
                    if ($la["lartnew"] > "!") // neue Laserart?
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   267
                    {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   268
                        $sql = "SELECT las_art_ID FROM Laser_Art WHERE las_art_bez = '" . ltrim($la["lartnew"]) . "'";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   269
                        if ($res = $dbc -> queryObjectArray($sql))
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   270
                        {   // Hersteller vorhanden
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   271
                            foreach ($res as $row)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   272
                                $la["lart"] = $row->las_art_ID;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   273
                        }        
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   274
                        else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   275
                        {   // Laserart neu
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   276
                            $sql = "INSERT INTO Laser_Art (las_art_bez) VALUES (LEFT(TRIM('" . $la["lartnew"] . "'),50))";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   277
                            $reth = $dbc -> execute($sql); 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   278
                            if ($reth) $la["lart"] = $dbc -> insertId(); else $la["lart"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   279
                        }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   280
                    }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   281
                    else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   282
                        $la["lart"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   283
                } 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   284
                
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   285
                foreach ($la as $key=>$value)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   286
                {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   287
        			if (is_null($value) || $value < "!") $la["$key"] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   288
                }
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
   289
                // "," -> "." fuer decimal-Felder
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   290
                if (is_null($la["persknr"])) $la[pid] = null;
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   291
                if (is_numeric(str_replace(",",".",$la["wvon"]))) $la["wvon"] = round(str_replace(",",".",$la["wvon"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   292
                if (is_numeric(str_replace(",",".",$la["wbis"]))) $la["wbis"] = round(str_replace(",",".",$la["wbis"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   293
                if (is_numeric(str_replace(",",".",$la["leist"]))) $la["leist"] = round(str_replace(",",".",$la["leist"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   294
                if (is_numeric(str_replace(",",".",$la["leistmax"]))) $la["leistmax"] = round(str_replace(",",".",$la["leistmax"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   295
                if (is_numeric(str_replace(",",".",$la["eng"]))) $la["eng"] = round(str_replace(",",".",$la["eng"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   296
                if (is_numeric(str_replace(",",".",$la["apt"]))) $la["apt"] = round(str_replace(",",".",$la["apt"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   297
                if (is_numeric(str_replace(",",".",$la["frq"]))) $la["frq"] = round(str_replace(",",".",$la["frq"]),2);    
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   298
                if (is_numeric(str_replace(",",".",$la["ipb"]))) $la["ipb"] = round(str_replace(",",".",$la["ipb"]),2);
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
   299
                
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
                // Einheiten = NULL, wenn decimal-Felder NULL 
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
                if (is_null($la['leist'])) $la['eleist'] = null;
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
                if (is_null($la['leistmax'])) $la['eleistmax'] = null;
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
                if (is_null($la['eng'])) $la['eeng'] = null;
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
                if (is_null($la['apt'])) $la['eapt'] = null;
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
                if (is_null($la['frq'])) $la['efrq'] = null;
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
   306
                if (is_null($la['ipb'])) $la['eipb'] = null;
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
   307
                   
22
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   308
                $stmt = $dbc -> stmtinit();
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   309
                if (is_object($stmt))
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   310
                {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   311
                    if ($laid)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   312
                    {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   313
                        //update
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   314
                        $stmt -> prepare("UPDATE fhiiqm.Laser SET 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   315
                                    las_bez = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   316
                                    las_welle_von = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   317
                                    las_welle_bis = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   318
                                    las_art_ID = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   319
                                    las_klasse_ID = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   320
                                    las_typ_ID = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   321
                                    leistung = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   322
                                    einheit_leistung = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   323
                                    energie = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   324
                                    einheit_energie = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   325
                                    apertur = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   326
                                    einheit_apertur = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   327
                                    frequenz = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   328
                                    einheit_frequenz = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   329
                                    impulsbreite = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   330
                                    einheit_impulsbreite = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   331
                                    las_hersteller_ID = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   332
                                    schutzst_ID = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   333
                                    aktiv = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   334
                                    persknr = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   335
                                    raum_ID = ?, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   336
                                    las_info = ?,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   337
                                    inventar_nr = ?,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   338
                                    maxleistung = ?,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   339
                                    einheit_maxleist = ?,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   340
                                    schutzst_od_ID = ?,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   341
                                    las_ref_ID = ? 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   342
                                    WHERE las_ID = '$laid'");
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   343
                        $stmt -> bind_param('sddisidididididiiiiiissdiii',$la["lbez"],$la['wvon'],$la['wbis'],$la["lart"],$la['lkla'],
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   344
                                            $la['ltyp'],$la['leist'],$la["eleist"],$la["eng"],$la["eeng"],$la["apt"],$la["eapt"],$la["frq"],$la["efrq"],
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   345
                                            $la["ipb"],$la["eipb"],$la["hstid"],$la["suid"],$la["akt"],$la["pid"],$la["raum"],$la["linfo"],
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   346
                                            $la["invnr"],$la["leistmax"],$la["eleistmax"],$la["suodid"],$la["lidref"]);
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   347
                            
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   348
                        $res = $stmt -> execute();
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   349
                        if ($stmt->error) echo "UPDATE Laser, error: " . $stmt->errno . " - ". $stmt->error . "<br><br>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   350
                        if ($res)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   351
                            echo "<p class='green'><b>UPDATE: Daten  zu '".$la["lbez"]."' wurden erfolgreich gespeichert.</b></p>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   352
                        else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   353
                            echo "<p class='red'><b>UPDATE: Daten  zu '".$la["lbez"]."' konnten nicht gespeichert werden!</b></p>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   354
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   355
                    }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   356
                    else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   357
                    {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   358
                        //insert
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   359
                        $stmt -> prepare("INSERT INTO fhiiqm.Laser (las_bez, las_welle_von, las_welle_bis, las_art_ID, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   360
                                            las_klasse_ID, las_typ_ID, leistung, einheit_leistung, energie, einheit_energie, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   361
                                            apertur, einheit_apertur, frequenz, einheit_frequenz, impulsbreite, einheit_impulsbreite, 
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   362
                                            las_hersteller_ID, schutzst_ID, aktiv, persknr, raum_ID, las_info,
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   363
                                            inventar_nr,maxleistung, einheit_maxleist,schutzst_od_ID,las_ref_ID)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   364
                                          VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)");
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   365
                        $stmt -> bind_param('sddisidididididiiiiiissdiii',$la["lbez"],$la['wvon'],$la['wbis'],$la["lart"],$la['lkla'],
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   366
                                            $la['ltyp'],$la['leist'],$la["eleist"],$la["eng"],$la["eeng"],$la["apt"],$la["eapt"],$la["frq"],$la["efrq"],
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   367
                                            $la["ipb"],$la["eipb"],$la["hstid"],$la["suid"],$la["akt"],$la["pid"],$la["raum"],$la["linfo"],
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   368
                                            $la["invnr"],$la["leistmax"],$la["eleistmax"],$la["suodid"],$la["lidref"]);
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   369
                        $res = $stmt -> execute();
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   370
//                        print_r($stmt); echo "<br /><br />";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   371
                        if ($stmt->error) echo "INSERT Laser, error: " . $stmt->errno . " - ". $stmt->error . "<br><br>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   372
                        if ($res)
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   373
                        {
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   374
                            $la["lid"] = $dbc -> insertId();
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   375
                            echo "<p class='green'><b>INSERT: Daten  zu '".$la["lbez"]."' wurden erfolgreich gespeichert.</b></p>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   376
                        }   
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   377
                        else
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   378
                            echo "<p class='red'><b>INSERT: Daten  zu '".$la["lbez"]."' konnten nicht gespeichert werden!</b></p>\n";
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   379
                    }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   380
                    if ($res) include ("inc/laser_dat_show.inc.php");
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   381
                }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   382
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   383
            }
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   384
            echo "</div>\n";       
aae5b0ecc47b + Laser iud+copy, Laserliste, Rechte/Nutzer-Tab
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   385
            echo "<p class=\"sc\">&nbsp;&nbsp;&nbsp;<a href=\"".$_SERVER["PHP_SELF"]."\" target=\"_self\" title=\"Laser erfassen\">Weiteren Laser erfassen</a></p>\n";    
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 28
diff changeset
   386
            echo "<p class=\"sc\">&nbsp;&nbsp;&nbsp;<a href=\"laser_flist.php?$getp\" target=\"_self\" title=\"Laser\">Laserliste</a></p>\n";    
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   387
        }
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   388
    ?>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   389
 </body>
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   390
 </html>