fhiiqm/rag_ed.php
author Bettina Schwarzer
Fri, 05 Feb 2016 14:03:40 +0100
changeset 44 d652bbba2d43
parent 43 70cea8f0e807
permissions -rw-r--r--
fhiiqm: achilleus -> db2, Korrekturen
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
43
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     1
<?php
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     2
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     3
/**
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     5
 * @copyright 07/2014
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     6
 * 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     7
 * Arbeitsgruppe INSERT/UPDATE DELETE COPY
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     8
 */
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
     9
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    10
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    11
    error_reporting(E_ALL ^ E_NOTICE);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    12
    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    13
    session_start();
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    14
    if (! isset($_SESSION["userid"]))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    15
    { 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    16
        include_once ("inc/func_lib.inc.php");	
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    17
        login($_SERVER["PHP_SELF"]);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    18
        exit;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    19
    }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    20
    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    21
    if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("pr",$_SESSION["recht"]) && !in_array("pe",$_SESSION["recht"])))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    22
    {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    23
        header("Location: start.php");
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    24
        exit;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    25
    }    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    26
    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    27
    include_once($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/inc/dbconnect.inc.php");
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    28
    include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    29
    if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    30
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    31
    $ragid = $_GET["i"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    32
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    33
    $zeil = $_GET["z"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    34
    if (!$zeil) $zeil = 25; // Anzahl der gezeigten Zeilen
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    35
    $start = $_GET["st"];   // Start bei DS $start+1
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    36
    if (!$start) $start=0;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    37
	$sort   = $_GET["s"];   // Sortierung nach Spalte
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    38
    $dir    = $_GET["d"];   // Sortierrichtung
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    39
    $fnum   = $_GET["f"];   // Spaltennummer, nach der aktuell gefiltert wird
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    40
    $filter = $_GET["b"];   // Filterbegriff
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    41
    // $_GET-Parameter zurück zur Infoliste mit den selben Einstellungen wie zuvor
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    42
    $getp = "s=$sort&d=$dir&f=$fnum&b=$filter&st=$start&z=$zeil";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    43
    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    44
    $del    = $_POST["del"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    45
    $sub    = $_POST["eintragen"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    46
    $dup    = $_POST["dup"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    47
    if (!$dup) $dup = $_GET["dp"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    48
    $copy   = $_GET["c"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    49
	$rag    = $_POST["rag"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    50
    $ok		= $_POST["ok"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    51
    if (!$rag["okn"]) $ok = false;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    52
    $duptext="";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    53
    if ($dup)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    54
    {   // Info duplizieren
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    55
        $tab = "RaumArb_Gruppe";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    56
        $key = "rag_ID";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    57
        $val =  $ragid;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    58
//        $ret=1;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    59
        $ret = duplicate_record ($tab, $key, $val);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    60
        if ($ret)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    61
        { 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    62
            $ragid_new = $ret;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    63
            $addr = $_SERVER["PHP_SELF"] . "?i=$ragid_new&c=1&$getp";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    64
            header("Location: $addr");
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    65
            exit;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    66
        }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    67
        else $duptext = " - Fehler beim Duplizieren von ". $rag["rbez"];    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    68
    }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    69
?>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    70
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    71
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    72
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    73
<head>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    74
	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    75
   	<link href="/fhiiqm/css/db.css" rel="STYLESHEET" type="TEXT/CSS" media="screen"/> 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    76
   	<link href="/fhiiqm/css/db_print.css" rel="STYLESHEET" type="TEXT/CSS" media="print"/> 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    77
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    78
	<title>Edit Arbeitsgruppe</title>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    79
</head>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    80
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    81
<body>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    82
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    83
<?php
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    84
    echo "&nbsp;";  
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    85
    echo "<div class=\"float-br smaller\" valign='top'>";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    86
    echo "&nbsp;&nbsp;&nbsp;user: " . $_SESSION["userid"];
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    87
    echo "&nbsp;&nbsp;&nbsp;<a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    88
    echo "<div class=\"float-r\"><img src=\"/fhiiqm/img/reseller_programm.png\" border=\"0\" alt=\"Arbeitsgruppe &auml;ndern\" title=\"Arbeitsgruppe &auml;ndern\"/></div>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    89
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    90
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    91
    echo "<div align='center'>";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    92
    if ($ragid) $text = "editieren"; else $text = "erfassen";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    93
    if ($copy) $duptext = " (Kopie)";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    94
    echo "<h3>Arbeitsgruppe $text$duptext<h3>";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    95
    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    96
    echo "</div>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    97
    if (!$ok || (!$sub && !$del && !$dup))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    98
    {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
    99
        if ($ragid && (!$sub || !$del) && !isset($rag))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   100
        { // update
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   101
            $sql = "SELECT rag_bez, rag_bezk, abt_ID FROM RaumArb_Gruppe WHERE rag_ID = $ragid";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   102
            if ($result = $dbc -> queryObjectArray($sql))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   103
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   104
                foreach ($result as $row)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   105
                {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   106
                   $rag["ragid"]    = $ragid;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   107
                   $rag["ragbez"]   = $row->rag_bez;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   108
                   $rag["ragbezk"]  = $row->rag_bezk;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   109
                   $rag["abt"]      = $row->abt_ID;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   110
                }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   111
            }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   112
        }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   113
?>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   114
<div align="center">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   115
<h5>* - Felder sind erforderlich!</h5>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   116
</div>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   117
<form action="<?php $_SERVER['PHP_SELF'] ?>" method="post" enctype="application/x-www-form-urlencoded" name="form_ma">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   118
<div align="center"> 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   119
<table width="65%" border="0" cellspacing="3" cellpadding="3">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   120
    <tr><td>Abteilung *</td>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   121
        <td valign="top">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   122
             <select name="rag[abt]" onchange="this.form.submit();">
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   123
            <?php 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   124
                $okn = true;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   125
                $sql = "SELECT abt_ID, abt_name, abt_long FROM `fhiiqm`.`Abteilung` ORDER BY abt_ID+0";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   126
                if ($result = $dbc->queryObjectArray($sql))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   127
                {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   128
                    foreach ($result as $row)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   129
                    {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   130
                        if ($row->abt_ID == $rag['abt'])
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   131
    					   echo "<option selected='selected' value=\"$row->abt_ID\">$row->abt_name: $row->abt_long</option>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   132
    				    else
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   133
    					   echo "<option value=\"$row->abt_ID\">$row->abt_name: $row->abt_long</option>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   134
                    }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   135
                }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   136
            ?>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   137
            </select>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   138
         </td>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   139
    </tr>          
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   140
    <tr><td>Arbeitsgruppe *</td>;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   141
           <td><input name="rag[ragbez]" type="text" size="50" maxlength="100"  value="<?php echo $rag['ragbez']; ?>" />
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   142
           <?php 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   143
            if (isset($rag["ragbez"]) && $rag["ragbez"] < "!") 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   144
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   145
                echo "<br><span class=\"red\">AG-Bezeichnung ist erforderlich!</span>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   146
                $okn = false; 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   147
            }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   148
           ?>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   149
         </td>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   150
    </tr>          
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   151
    <tr><td>Arbeitsgruppe kurz</td>;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   152
           <td><input name="rag[ragbezk]" type="text" size="10" maxlength="10" value="<?php echo $rag['ragbezk']; ?>" />
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   153
         </td>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   154
    </tr>          
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   155
    <input type="hidden" name="rag[okn]" value="<?php echo $okn; ?>" />
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   156
    <input type="hidden" name="rag[ragid]" value="<?php echo $ragid; ?>" />
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   157
<?php
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   158
        if ($sub || $del)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   159
		{
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   160
		  	if ($sub)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   161
                $frage = "Alle Angaben ok?";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   162
            elseif ($del)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   163
                $frage = "Arbeitsgruppe wirklich l&ouml;schen?";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   164
			echo "<tr>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   165
			  <td class=\"red\" valign=\"top\" align=\"left\">$frage</td>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   166
			        <td><input type=\"checkbox\" name=\"ok\" value=\"1\"";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   167
			        if ($ok)  echo "checked=\"checked\""; 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   168
			echo " /></td>\n</tr>\n"; 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   169
		}
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   170
        if (!is_null($_SESSION["recht"]) && in_array("pe",$_SESSION["recht"]))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   171
        {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   172
            echo "
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   173
           	<tr><td>&nbsp;</td>\n
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   174
            	<td><input  class=\"button\" type=\"submit\" name=\"eintragen\" value=\"  eintragen  \" />";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   175
            if ($ragid)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   176
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   177
                echo "&nbsp;&nbsp;&nbsp;<input class=\"buttonr\" type=\"submit\" value=\"l&ouml;schen\" name=\"del\" title=\"delete\" />";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   178
                echo "&nbsp;&nbsp;&nbsp;<input class=\"button\" type=\"submit\" value=\"duplizieren\" name=\"dup\" title=\"delete\" />";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   179
            }    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   180
           	echo "</td></tr>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   181
        }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   182
        echo "</table>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   183
        echo "</div>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   184
            echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"rag_flist.php?$getp\" target=\"_self\" title=\"AG-Liste\">&laquo; zur AG-Liste</a></p>\n"; 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   185
        echo "</form>\n";   
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   186
    }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   187
    else
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   188
    {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   189
        echo "<div align='center'>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   190
        
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   191
        if ($del)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   192
        {   // loeschn
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   193
            $sql = "DELETE FROM RaumArb_Gruppe WHERE rag_ID = '$ragid'";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   194
            $retdi = $dbc -> execute($sql);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   195
            if ($retdi)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   196
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   197
                // Anzeigen geloeschter Infodaten
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   198
                echo "<p class='green'><b>DELETE: Daten  zu '".$rag["ragbez"]."' wurden erfolgreich gel&ouml;scht.</b></p>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   199
            }                
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   200
            else
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   201
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   202
                echo "<p class='red'><b>DELETE: Daten  zu '".$rag["ragbez"]."' konnten nicht gel&ouml;scht werden!</b></p>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   203
                echo "sql = $sql<br />";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   204
                echo "error DELETE: " . $dbc->error . "<br />";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   205
            }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   206
        }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   207
        else //INSERT oder UPDATE
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   208
        {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   209
            //daten speichern
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   210
            $rag["ragbez"] = substr($rag["ragbez"],0,100);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   211
            $rag["ragbezk"] = substr($rag["ragbezk"],0,10);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   212
            if ($rag["ragbezk"] < "!") $rag["ragbezk"] = null;
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   213
            if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   214
            
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   215
            $stmt = $dbc -> stmtinit();
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   216
            if (is_object($stmt))
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   217
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   218
                if ($ragid)
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   219
                {   //UPDATE
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   220
                    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   221
                    $stmt -> prepare("UPDATE fhiiqm.RaumArb_Gruppe SET
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   222
                                rag_bez = ?,
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   223
                                rag_bezk = ?,
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   224
                                abt_ID = ?
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   225
                                WHERE rag_ID = ?");
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   226
                    $stmt -> bind_param('ssii',$rag["ragbez"],$rag["ragbezk"],$rag["abt"],$ragid);
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   227
                    $result = $stmt -> execute();
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   228
                    if ($stmt->error) echo "error UPDATE AG: " . $stmt->error . "<br><br>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   229
                }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   230
                else
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   231
                {   //INSERT
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   232
                    $stmt -> prepare ("INSERT INTO RaumArb_Gruppe (rag_bez,rag_bezk,abt_ID) VALUES(?,?,?)"); 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   233
                    $stmt -> bind_param('ssi',$rag["ragbez"],$rag["ragbezk"],$rag["abt"]);        
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   234
                    $result = $stmt -> execute();      
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   235
                    if ($stmt->error) echo "error INSERT AG: " . $stmt->error . "<br><br>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   236
                    else
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   237
                    {// rag_ID ermitteln
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   238
                        $ragid = $dbc -> insertId();
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   239
                    }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   240
                }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   241
            }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   242
            if ($result) // INSERT/UPDATE Info
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   243
            {
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   244
                //Eingabe Daten erfolgreich 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   245
                    echo "<p class='green'><b>AG '".$rag["ragbez"]."' wurde erfolgreich gespeichert.</b></p>\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   246
                    echo "<br /><br />\n";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   247
            }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   248
        }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   249
        echo "</div>";
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   250
        echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"rag_flist.php?$getp\" target=\"_self\" title=\"AG-Liste\">AG-Liste</a></p>\n"; 
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   251
        echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"".$_SERVER["PHP_SELF"]."\" target=\"_self\" title=\"AG erfassen\">Weitere AG erfassen</a></p>\n";    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   252
    }
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   253
    
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   254
?>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   255
</body>
70cea8f0e807 + Arbeitsgruppen List,Edit; Korrekturen
Bettina Schwarzer
parents:
diff changeset
   256
</html>