fhiiqm/report/keytyp_bestand_all_report.php
author Bettina Schwarzer
Thu, 12 Sep 2013 09:04:56 +0200
changeset 40 6f4b105daa24
child 41 9c668cd391fa
permissions -rw-r--r--
+Keytyp Korrekturen, LDAP Authentifizierung
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
40
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     1
<?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     2
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     3
/**
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     5
 * @copyright 08/2013
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     6
 * 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     7
 * Report Keytyp wo/wer, Anzahl (MA und Depots)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     8
 */
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
     9
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    10
    error_reporting(E_ALL ^ E_NOTICE);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    11
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    12
    session_start();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    13
    if (! isset($_SESSION["userid"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    14
    { 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    15
        include_once ($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/inc/func_lib.inc.php");	
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    16
        login($_SERVER["PHP_SELF"]);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    17
        exit;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    18
    }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    19
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    20
    if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("kr",$_SESSION["recht"]) && !in_array("ke",$_SESSION["recht"])))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    21
    {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    22
        header("Location: start.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    23
        exit;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    24
    }    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    25
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    26
	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    27
	if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    28
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    29
    // zulaessige Depots
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    30
    $uid = $_SESSION["userid"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    31
    $sql = "SELECT depot_ID FROM KeyDepot_userweb WHERE userid = '$uid'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    32
    $res = $dbc -> queryObjectArray($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    33
    foreach ($res as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    34
        $adep[] = $row->depot_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    35
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    36
?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    37
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    38
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    39
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    40
<head>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    41
	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    42
   	<link href="/fhiiqm/css/db.css" rel="STYLESHEET" type="TEXT/CSS"  media="screen"/> 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    43
   	<link href="/fhiiqm/css/db_print.css" rel="STYLESHEET" type="TEXT/CSS"  media="print"/> 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    44
	<title>Report &Uuml;bersicht Schl&uuml;sseltypen</title>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    45
</head>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    46
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    47
<body>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    48
<?php    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    49
    echo "&nbsp;";  
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    50
    echo "<div class=\"float-br smaller\" valign='top'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    51
    echo "&nbsp;&nbsp;&nbsp;user: " . $_SESSION["userid"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    52
    echo "&nbsp;&nbsp;&nbsp;<a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    53
    echo "<div class=\"float-r\"><img src=\"/fhiiqm/img/key.png\" border=\"0\" alt=\"Keytyp &Uuml:bersicht\" title=\"Schl&uuml;sseltypen Bestand\"/></div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    54
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    55
    $ky    = $_POST["ky"];    // Parameter aus Form
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    56
    $search = $_POST["search"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    57
    if (!$search) $search =  $_GET["s"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    58
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    59
    $zeil = $ky["z"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    60
    if (!$zeil) $zeil = $_GET["z"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    61
    if (!$zeil) $zeil = 9999; // Anzahl der gezeigten Zeilen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    62
    $start = $_GET["st"];   // Start bei DS $start+1
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    63
    if (!$start) $start=0;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    64
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    65
    if (!is_array($ky))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    66
    {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    67
        $ky["kt"] = $_GET["k"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    68
        $ky["sort1"]   = $_GET["s1"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    69
        $ky["sort2"]   = $_GET["s2"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    70
    }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    71
    $_GET["k"] = $ky["kt"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    72
    $_GET["s1"]= $ky["sort1"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    73
    $_GET["s2"]= $ky["sort2"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    74
    $_GET["z"]  = $zeil;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    75
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    76
    if ($search)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    77
    {    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    78
        echo "<span class='sc'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    79
        echo "<br />&nbsp;&nbsp;&nbsp;<a href=\"/fhiiqm/keytyp_report.php\" target=\"_self\" title=\"Berichte\" class='sc'>&laquo; zur Berichts&uuml;bersicht</a>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    80
        echo "&nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp;<a href=\"" . $_SERVER["PHP_SELF"] . "\" target=\"_self\" title=\"Keytyp Bestand\" class=\"sc\">neuer Bericht Bestand Schl&uuml;sseltyp gesamt</a>\n";    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    81
        echo "</span>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    82
    }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    83
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    84
    echo "<div align='center'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    85
    echo "<p><b>Bericht Bestand Schl&uuml;sseltyp Depot und Mitarbeiter</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    86
    echo "<p>- zeigt alle Schl&uuml;sseltypen und deren Besitzer aus dem gew&auml;hlten Depot und im Depot selbst<br />
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    87
          - wenn kein Depot gew&auml;hlt wurde, werden alle oder nur der gew&auml;hlte Schl&uuml;sseltyp von allen Depots angezeigt<p>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    88
    echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    89
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    90
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    91
    if (!$search)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    92
    {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    93
?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    94
        <div align="center">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    95
        <p>Bitte Kriterien f&uuml;r die Suche w&auml;hlen</p>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    96
        <form action="<?php $_SERVER['PHP_SELF'] ?>" method="post" enctype="application/x-www-form-urlencoded" name="form_raum" target="_self">	
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    97
        <table width="50%" border="0" cellspacing="3" cellpadding="3">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    98
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
    99
            <tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   100
                <td>Depot</td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   101
                <td><select name="ky[dep]">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   102
                    <?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   103
                        if ($ky["dep"] == -1) $select = "selected='selected'"; else $select = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   104
                        echo "<option $select value=\"-1\"></option>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   105
                        $strdep = "'". implode("','",$adep) ."'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   106
                        $sql = "SELECT * FROM fhiiqm.KeyDepot WHERE depot_ID IN ($strdep)";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   107
                        if ($res = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   108
                            foreach ($res as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   109
                            {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   110
                               if ($row->depot_ID == $ky['dep']) $select = "selected='selected'"; else $select = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   111
    					       echo "<option $select value=\"$row->depot_ID\">$row->depot_ID: $row->depot_bez</option>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   112
                            }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   113
                        $beg=0;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   114
                    ?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   115
                </select>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   116
                </td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   117
            </tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   118
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   119
            <tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   120
                <td>Schl&uuml;sseltyp</td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   121
                <td><select name="ky[kt]">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   122
                    <?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   123
                        if ($ky["kt"] == -1) $select = "selected='selected'"; else $select = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   124
                        echo "<option $select value=\"-1\"></option>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   125
                        $strdep = "'". implode("','",$adep) ."'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   126
                        $sql = "SELECT key_level,keytyp_ID,keytyp_bez
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   127
                                        FROM Keytyp 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   128
                                        ORDER BY key_level";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   129
                        if ($res = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   130
                            foreach ($res as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   131
                            {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   132
                               if ($row->keytyp_ID == $ky['kt']) $select = "selected='selected'"; else $select = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   133
    					       echo "<option $select value=\"$row->keytyp_ID\">$row->key_level - $row->keytyp_ID [$row->keytyp_bez] </option>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   134
                            }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   135
                        $beg=0;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   136
                    ?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   137
                </select>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   138
            </tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   139
            <tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   140
                <td>Sortierung nach<br />(in dieser Reihenfolge)</td><td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   141
            <?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   142
                $sort = array("-1"=>"","1"=>"Schl&uuml;sseltyp","2"=>"Level","3"=>"Besitzer");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   143
                for ($i=1; $i<3; $i++)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   144
                { 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   145
                  echo "$i.&nbsp;&nbsp;<select name='ky[sort$i]'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   146
                  foreach ($sort as $key=>$val)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   147
                  {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   148
                    $rsort = "sort" . $i;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   149
                    if ($ky[$rsort] == $val) $select = "selected='selected'"; else $select = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   150
                    echo "<option $select value='$key'>$val</option>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   151
                  }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   152
                  echo "</select>&nbsp;&nbsp;&nbsp;&nbsp;\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   153
                } 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   154
                echo "</td></tr>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   155
        
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   156
                $azeil = array(10=>'10',20=>'20',25=>'25',50=>'50',100=>'100',9999=>'alle'); // Anzahl gezeigter rows
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   157
                echo "<tr><td>Zeilen/Seite?</td><td><select name='ky[z]'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   158
                if (!$ky['z']) $ky['z'] = 9999;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   159
                foreach ($azeil as $key=>$val)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   160
                {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   161
                    if ($key == $ky['z']) $select = "selected='selected'"; else $select = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   162
                    echo "<option $select value='$key'>$val</option>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   163
                }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   164
                echo "</select></td></tr>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   165
        
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   166
            ?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   167
            <tr> 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   168
                <td>&nbsp;</td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   169
                <td><input class="button" type="submit" name="search" value="Bericht erstellen"/></td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   170
            </tr> 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   171
        </table>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   172
        </div>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   173
        </form>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   174
<?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   175
    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   176
    }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   177
    else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   178
    {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   179
        echo "<div align='center'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   180
                        
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   181
        $lim = " LIMIT $start,$zeil";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   182
        $where = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   183
        if ($ky["kt"]> -1)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   184
            $where = " h.keytyp_ID = '$ky[kt]' ";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   185
        if ($where) $where = " AND ($where)";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   186
/*
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   187
        if ($ky["dep"]> -1)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   188
            $where .= " AND (h.depot_ID = '$ky[dep]' OR h.depot_ID IS NULL)";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   189
*/        
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   190
        if ($ky["dep"] > -1)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   191
        {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   192
            $sql = "SELECT DISTINCT keytyp_ID FROM Keytyp_Depot WHERE depot_ID = '".$ky["dep"]."'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   193
            $res = $dbc -> queryObjectArray($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   194
            foreach ($res as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   195
                $akeyt[] = $row->keytyp_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   196
            $strkt = "'". implode("','",$akeyt) ."'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   197
            $wherk = " AND h.keytyp_ID IN ($strkt) ";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   198
            $wherd = " AND h.depot_ID = '".$ky["dep"]."'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   199
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   200
        if ($ky["sort1"]>0 || $ky["sort2"]>0)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   201
        {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   202
            if ($ky["sort1"]>0) $ord  = " ORDER BY " . $ky["sort1"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   203
            if ($ky["sort2"]>0) $ord .= ",".$ky["sort2"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   204
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   205
         
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   206
        $sql = "SELECT h.keytyp_ID, key_level, 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   207
                    CONCAT (nachname, ', ',vorname, ', ' , IFNULL(abt_name,''),' (',CASE aktiv WHEN 0 THEN 'inaktiv' ELSE 'aktiv' END, ')') AS keyowner, h.depot_ID, 'ma' AS tab,  
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   208
                	SUM(CASE WHEN pers_action='get' THEN IFNULL(pers_anz,0) ELSE 0 END) - SUM(CASE WHEN pers_action='out' THEN IFNULL(pers_anz,0) ELSE 0 END) - SUM(CASE WHEN pers_action='lost' THEN IFNULL(pers_anz,0) ELSE 0 END) AS bestand
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   209
                	FROM fhiiqm.Mitarbeiter m 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   210
                	INNER JOIN Keytyp_MA h ON m.persknr=h.persknr
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   211
                    INNER JOIN Keytyp k ON h.keytyp_ID = k.keytyp_ID 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   212
                    LEFT OUTER JOIN Abteilung a ON m.abt_tel=a.abt_ID
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   213
                	WHERE m.aktiv<2
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   214
					GROUP BY h.keytyp_ID, key_level,keyowner
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   215
                    HAVING bestand > 0 $where $wherk
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   216
                UNION
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   217
                SELECT h.keytyp_ID, key_level,CONCAT(depot_ID,'-Depot') AS keyowner, h.depot_ID, 'dep' AS tab, 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   218
                    SUM(CASE WHEN depot_action='get' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='out' THEN IFNULL(depot_anz,0) ELSE 0 END) - SUM(CASE WHEN depot_action='lost' THEN IFNULL(depot_anz,0) ELSE 0 END) AS bestand
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   219
                    FROM fhiiqm.Keytyp_Depot h INNER JOIN Keytyp k ON h.keytyp_ID = k.keytyp_ID
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   220
                    GROUP BY h.keytyp_ID, key_level,keyowner
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   221
                    HAVING bestand > 0 $where $wherd";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   222
        $ianz = $dbc -> numrows($sql); 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   223
        $sql .= $ord . $lim;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   224
//echo $sql . "<br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   225
        $result = $dbc ->queryObjectArray($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   226
        if ($dbc -> error)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   227
        {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   228
            echo "error SELECT: " . $dbc -> error . "<br /><br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   229
            echo "sql = $sql<br />\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   230
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   231
        $krit = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   232
        if ($ky["kt"] > -1)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   233
        { 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   234
            $krit = " [Schl&uuml;sseltyp = <b>'".$ky["kt"]."'</b>]";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   235
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   236
        if ($ky["dep"] > -1)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   237
        {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   238
            if ($krit > " ") $bd = " UND"; else $bd = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   239
            $krit .= $bd ." [Depot = <b>'".$ky["dep"]."'</b>]";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   240
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   241
        if ($krit )echo "Suchergebnis f&uuml;r $krit"; else echo "Suchergebnis\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   242
        printf ("<p>Anzahl Besitzer: %s</p>", $ianz);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   243
        if ($result)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   244
        {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   245
            include ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   246
            
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   247
    		$bg1 = "#F8F8F8";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   248
    		$bg2 = "#DEDFE1";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   249
    		$bg = "#FFFFFF";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   250
            echo "<table border='1' cellspacing='0' cellpadding='2'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   251
            // Listenkopf
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   252
            echo "<tr bgcolor='#68ACBF'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   253
            if ($ky["sort1"] == 2)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   254
                echo "<th>Level</th><th>Schl&uuml;sseltyp</th>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   255
            else            
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   256
                echo "<th>Schl&uuml;sseltyp</th><th>Level</th>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   257
            echo "<th>Besitzer</th><th>Anzahl</th>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   258
            $anzt = 0;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   259
            foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   260
            {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   261
        		if ($bg == $bg1) $bg = $bg2; else $bg = $bg1;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   262
                echo "<tr bgcolor='" . $bg . "'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   263
                if ($ky["sort1"] == 2)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   264
                    echo "<td>$row->key_level</td><td>$row->keytyp_ID</td>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   265
                else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   266
                    echo "<td>$row->keytyp_ID</td><td>$row->key_level</td>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   267
                if ($row->tab == 'dep') $cl = " class = 'bold'"; else $cl = "";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   268
                echo "<td$cl>$row->keyowner</td>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   269
                echo "<td class='right'>$row->bestand</td>"; 
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   270
                echo "</tr>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   271
                $anzt += $row->bestand;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   272
            }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   273
            echo "<tr><td colspan='2'>&nbsp;</td><td>Summe</td><td class='right'>$anzt</td></tr>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   274
            echo "</table>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   275
            echo "<p></p><table width=40%><tr><td class='right'><a href=\"javascript:window.print()\" class='sc'>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   276
                <img src=\"/fhiiqm/img/printer.png\" alt=\"Bericht drucken\" border=\"0\" align=\"right\" title=\"Bericht drucken\"></a></td></tr></table>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   277
            echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   278
        
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   279
            echo "<br />&nbsp;&nbsp;&nbsp;";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   280
            if ($search != 2) // Aufruf aus fhiiqm
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   281
            {    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   282
                // Parameter aus $_GET fuer weitere Seiten
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   283
                $_GET["s"] = 1; // bewirkt weitere Suche
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   284
                foreach ($_GET as $key=>$val)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   285
                {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   286
                    if ($key != "st") $liste .= "&" . $key ."=".$val;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   287
                }    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   288
                // Links auf andere Seiten generieren
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   289
                liste_links($start,$zeil,$ianz,$liste);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   290
            }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   291
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   292
        else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   293
        {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   294
            echo "<p class='red'>&nbsp;&nbsp;&nbsp;Leider gibt es kein Ergebnis für die von Ihnen gewählten Kriterien!</p>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   295
            echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   296
            echo "<br />&nbsp;&nbsp;&nbsp;";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   297
        }
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   298
        echo "<span class='sc'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   299
        echo "<br /><br />&nbsp;&nbsp;&nbsp;<a href=\"/fhiiqm/keytyp_report.php\" target=\"_self\" title=\"Berichte\" class='sc'>&laquo; zur Berichts&uuml;bersicht</a>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   300
        echo "&nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp;<a href=\"" . $_SERVER["PHP_SELF"] . "\" target=\"_self\" title=\"&Uuml;bersicht Keytyp\" class=\"sc\">neuer Bericht Bestand Schl&uuml;sseltyp gesamt</a>\n";    
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   301
        echo "</span>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   302
    }        
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   303
?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   304
</body>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung
Bettina Schwarzer
parents:
diff changeset
   305
</html>