fhiiqm/report/gefgr_gefahr_pic_report.php
author Bettina Schwarzer
Fri, 20 Dec 2013 15:19:32 +0100
changeset 41 9c668cd391fa
parent 38 45c139f74ea4
permissions -rw-r--r--
+ Gast als MA-Typ, Erweiterungen Projekt, Key, Telefonliste
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
38
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     1
<?php
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     2
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     3
/**
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     5
 * @copyright 05/2013
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     6
 * 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     7
 * Report Gefahrgruppe - Gefaehrdung - Pictogramm
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     8
 */
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
     9
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    10
    error_reporting(E_ALL ^ E_NOTICE);
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    11
    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    12
    if (!isset($_GET['s']) || $_GET['s'] != 2 )
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    13
    {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    14
        session_start();
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    15
        if (! isset($_SESSION["userid"]))
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    16
        { 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    17
            include_once ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");	
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    18
            login($_SERVER["PHP_SELF"]);
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    19
            exit;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    20
        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    21
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    22
        if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("asr",$_SESSION["recht"]) && !in_array("ase",$_SESSION["recht"])))
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    23
        {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    24
            header("Location: start.php");
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    25
            exit;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    26
        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    27
    }    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    28
	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php");
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    29
	if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    30
    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    31
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    32
?>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    33
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    34
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    35
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    36
<head>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    37
	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    38
   	<link href="/fhiiqm/css/db.css" rel="STYLESHEET" type="TEXT/CSS"  media="screen"/> 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    39
   	<link href="/fhiiqm/css/db_print.css" rel="STYLESHEET" type="TEXT/CSS"  media="print"/> 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    40
	<title>Report Gef&auml;hrdungsgruppe-Gef&auml;hrdung-Piktogramm</title>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    41
</head>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    42
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    43
<body>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    44
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    45
<?php    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    46
    echo "&nbsp;";  
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    47
    if (!isset($_GET['s']) || $_GET['s'] != 2 )
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    48
    {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    49
        echo "<div class=\"float-br smaller\" valign='top'>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    50
        echo "&nbsp;&nbsp;&nbsp;user: " . $_SESSION["userid"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    51
        echo "&nbsp;&nbsp;&nbsp;<a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    52
    }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    53
    echo "<div class=\"float-r\"><img src=\"/fhiiqm/img/role.png\" border=\"0\" alt=\"Arbeitssicherheit\" title=\"Arbeitssicherheit\"/></div>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    54
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    55
    $rag    = $_POST["rag"];    // Parameter aus Form
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    56
    $search = $_POST["search"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    57
    if (!$search) $search =  $_GET["s"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    58
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    59
    $zeil = $rag["z"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    60
    if (!$zeil) $zeil = $_GET["z"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    61
    if (!$zeil) $zeil = 9999; // Anzahl der gezeigten Zeilen
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    62
    $start = $_GET["st"];   // Start bei DS $start+1
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    63
    if (!$start) $start=0;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    64
    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    65
    if (!is_array($rag))
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    66
    {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    67
        $rag["gef"]     = $_GET["g"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    68
        $rag["gru"]   = $_GET["u"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    69
        $rag["bind"]    = $_GET["b"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    70
        $rag["sort1"]   = $_GET["s1"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    71
        $rag["sort2"]   = $_GET["s2"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    72
        $rag["sort3"]   = $_GET["s3"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    73
    }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    74
    $_GET["g"] = $rag["gef"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    75
    $_GET["u"] = $rag["gru"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    76
    $_GET["b"] = $rag["bind"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    77
    $_GET["s1"] = $rag["sort1"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    78
    $_GET["s2"] = $rag["sort2"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    79
    $_GET["s3"] = $rag["sort3"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    80
    $_GET["z"]  = $zeil;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    81
   
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    82
    if ($search && $_GET['s'] != 2)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    83
    {    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    84
        echo "<span class='sc'>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    85
        echo "<br />&nbsp;&nbsp;&nbsp;<a href=\"/fhiiqm/as_report.php\" target=\"_self\" title=\"Berichte\" class='sc'>&laquo; zur Berichts&uuml;bersicht</a>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    86
        echo "&nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp;<a href=\"" . $_SERVER["PHP_SELF"] . "\" target=\"_self\" title=\"Gefgruppe-Gef.-Pic\" class=\"sc\">neuer Bericht Gef&auml;hrdungsgruppe - Gef&auml;hrdung - Piktogramm</a>\n";    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    87
        echo "</span>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    88
    }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    89
    echo "<div align='center'>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    90
    echo "<p><b>(5b) Bericht Gef&auml;hrdungsgruppe - Gef&auml;hrdung - Piktogramm</b></p>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    91
    echo "</div>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    92
    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    93
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    94
    if (!$search)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    95
    {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    96
?>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    97
        <div align="center">
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    98
        <p>Bitte Kriterien f&uuml;r die Suche w&auml;hlen</p>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
    99
        <form action="<?php $_SERVER['PHP_SELF'] ?>" method="post" enctype="application/x-www-form-urlencoded" name="form_as_report.php" target="_self">	
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   100
        <table width="50%" border="0" cellspacing="3" cellpadding="3">
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   101
            <tr>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   102
                <td>Gef&auml;hrdungs-Gruppe</td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   103
                <td><select name="rag[gru]" onchange="this.form.submit();">
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   104
                    <?php 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   105
                        if ($rag["atyp"] == -1) $select = " selected='selected' "; else $select = "";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   106
                        echo "<option $select value=\"-1\"></option>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   107
                        $sql = "SELECT gefahrgr_ID,gefahrgr_bez FROM fhiiqm.Gefahr_Gruppe ORDER BY 1";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   108
                        if ($result = $dbc->queryObjectArray($sql))
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   109
                        {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   110
                            foreach ($result as $row)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   111
                            {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   112
                                $select = ($row->gefahrgr_ID == $rag['gru'])? " selected='selected'" : ""; 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   113
                                echo "<option$select value=\"$row->gefahrgr_ID\">$row->gefahrgr_ID - $row->gefahrgr_bez</option>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   114
                            }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   115
                        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   116
                    ?>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   117
                    </select>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   118
                </td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   119
            </tr>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   120
            <tr>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   121
                <td>Gef&auml;hrdung</td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   122
                <td><select name="rag[gef]">
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   123
                    <?php 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   124
                        if ($rag["gru"] && $rag["gru"]>0) $wher = " WHERE gefahrgr_ID = " . $rag["gru"]; else $wher = "";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   125
                        if ($rag["gef"] == -1) $select = " selected='selected' "; else $select = "";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   126
                        echo "<option $select value=\"-1\"></option>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   127
                        $sql = "SELECT gefahr_ID,gefahrgr_ID,gefahr_bez FROM fhiiqm.Gefahr $wher
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   128
                                ORDER BY CONVERT(substring(gefahr_ID,1,INSTR(gefahr_ID,'.')-1),DECIMAL),CONVERT(SUBSTRING(gefahr_ID,INSTR(gefahr_ID,'.')+1),DECIMAL);";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   129
                        if ($result = $dbc->queryObjectArray($sql))
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   130
                        {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   131
                            foreach ($result as $row)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   132
                            {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   133
                                $select = ($row->gefahr_ID == $rag['gef'])? " selected='selected'" : ""; 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   134
                                echo "<option$select value=\"$row->gefahr_ID\">$row->gefahr_ID - $row->gefahr_bez</option>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   135
                            }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   136
                        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   137
                    ?>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   138
                    </select>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   139
                </td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   140
            </tr>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   141
            <tr> 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   142
                  <td>Verkn&uuml;pfung</td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   143
                  <td>UND&nbsp;&nbsp;&nbsp;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   144
                    <input type="radio" name="rag[bind]" value="AND" <?php if (isset($rag["bind"]) && $rag["bind"]=="AND") echo "checked"; else  echo "checked";?>>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   145
                  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ODER&nbsp;&nbsp;&nbsp;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   146
                    <input type="radio" name="rag[bind]" value="OR" <?php if (isset($rag["bind"]) && $rag["bind"]=="OR") echo "checked"; ?>></td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   147
            </tr>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   148
            <tr>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   149
                <td>Sortierung nach<br />(in dieser Reihenfolge)</td><td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   150
            <?php
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   151
                $sort = array("-1"=>"","1"=>"Gefährdungsgruppe","2"=>"Gef&auml;hrdung");
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   152
                for ($i=1; $i<3; $i++)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   153
                { 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   154
                  echo "$i.&nbsp;&nbsp;<select name='rag[sort$i]'>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   155
                  foreach ($sort as $key=>$val)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   156
                  {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   157
                    $rsort = "sort" . $i;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   158
                    if ($rag[$rsort] == $val) $select= " selected"; else $select = "";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   159
                    echo "<option$select value='$key'>$val</option>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   160
                  }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   161
                  echo "</select>&nbsp;&nbsp;&nbsp;&nbsp;\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   162
                } 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   163
                echo "</td></tr>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   164
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   165
                $azeil = array(10=>'10',20=>'20',25=>'25',50=>'50',100=>'100',9999=>'alle'); // Anzahl gezeigter rows
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   166
                echo "<tr><td>Zeilen/Seite?</td><td><select name='rag[z]'>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   167
                if (!$rag['z']) $rag['z'] = 9999;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   168
                foreach ($azeil as $key=>$val)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   169
                {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   170
                    if ($key == $rag['z']) $select = "selected"; else $select = "";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   171
                    echo "<option $select value='$key'>$val</option>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   172
                }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   173
                echo "</select></td></tr>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   174
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   175
            ?>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   176
            <tr> 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   177
                <td>&nbsp;</td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   178
                <td><input class="button" type="submit" name="search" value="Bericht erstellen"/></td>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   179
            </tr> 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   180
        </table>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   181
        </div>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   182
        </form>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   183
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   184
<?php        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   185
    }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   186
    else
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   187
    {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   188
        echo "<div align='center'>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   189
        $sql = "SELECT gg.gefahrgr_ID,g.gefahr_ID,gefahrgr_bez,gefahr_bez,gefahr_pic,gefahr_pic_bez
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   190
                FROM Gefahr_Gruppe gg LEFT OUTER JOIN Gefahr g ON gg.gefahrgr_ID=g.gefahrgr_ID ";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   191
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   192
        $lim = " LIMIT $start,$zeil";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   193
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   194
        if (!$rag["bind"]) $bind = " AND "; else $bind = $rag["bind"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   195
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   196
        if ($rag["gru"]> -1)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   197
        { 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   198
            if ($where) $where .= "$bind g.gefahrgr_ID = '$rag[gru]' "; else $where = " g.gefahrgr_ID = '$rag[gru]' ";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   199
            $krit = " [Gef&auml;hrdungsgruppe = '" . $dbc -> querySingleItem("SELECT gefahrgr_bez FROM Gefahr_Gruppe WHERE gefahrgr_ID='".$rag['gru'] ."'")."']";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   200
        }    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   201
        if ($rag["gef"]> -1)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   202
        { 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   203
            $where = " g.gefahr_ID = '$rag[gef]' ";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   204
            if ($krit) $bd = " ".$bind; else $bd = "";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   205
            $krit .= "$bd [Gef&auml;hrdung = '" . $dbc -> querySingleItem("SELECT gefahr_bez FROM Gefahr WHERE gefahr_ID='".$rag['gef'] ."'")."']";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   206
        }   
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   207
        if ($where) $where = " WHERE ($where)";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   208
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   209
        if ($rag["sort1"]>0 || $rag["sort2"]>0 || $rag["sort3"]>0)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   210
        {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   211
            if ($rag["sort1"]>0) $ord  = " ORDER BY " . $rag["sort1"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   212
            if ($rag["sort2"]>0) $ord .= ",".$rag["sort2"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   213
            if ($rag["sort3"]>0) $ord .= ",".$rag["sort3"];
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   214
        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   215
        $sql .= $where;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   216
        if ($ord && strpos($ord,'2')>0) $ord = str_replace("2","CONVERT(substring(g.gefahr_ID,1,INSTR(g.gefahr_ID,'.')-1),DECIMAL),CONVERT(SUBSTRING(g.gefahr_ID,INSTR(g.gefahr_ID,'.')+1),DECIMAL)",$ord);
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   217
        $sql .= $ord . $lim;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   218
//        echo "sql = $sql<br />\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   219
        $result = $dbc ->queryObjectArray($sql);
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   220
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   221
        if ($krit )echo "Suchergebnis f&uuml;r $krit"; else echo "Suchergebnis\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   222
        $ianz = $dbc -> querySingleItem("SELECT COUNT(*) 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   223
                                            FROM Gefahr_Gruppe gg LEFT OUTER JOIN Gefahr g 
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   224
                                            ON gg.gefahrgr_ID=g.gefahrgr_ID $where");
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   225
        printf ("<p>Anzahl: %s</p>", $ianz);
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   226
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   227
        if ($result)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   228
        {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   229
            include ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   230
            
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   231
    		$bg1 = "#F8F8F8";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   232
    		$bg2 = "#DEDFE1";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   233
    		$bg = "#FFFFFF";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   234
            echo "<table border='1' width='50%' cellspacing='0' cellpadding='2'>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   235
            // Listenkopf
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   236
            echo "<tr bgcolor='#68ACBF'>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   237
            echo "<th>Gef&auml;hrdungsgruppe</th>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   238
            echo "<th>Gef&auml;hrdung</th>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   239
            echo "<th>pic</th>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   240
            echo "<th>pic_bez</th>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   241
            echo "</tr>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   242
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   243
            foreach ($result as $row)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   244
            {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   245
                $gid   = $row->gefahr_ID;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   246
                if ($gru != $row->gefahrgr_ID)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   247
                {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   248
        			if ($bg == $bg1) $bg = $bg2; else $bg = $bg1;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   249
                    echo "<tr bgcolor='" . $bg . "'>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   250
                    echo "<td>$row->gefahrgr_ID - $row->gefahrgr_bez</td>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   251
                    echo "<td nowrap='1'>$row->gefahr_ID - $row->gefahr_bez</td>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   252
                    $gid = urlencode(trim($gid));
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   253
                    echo "<td><img name='gefahr' width='30px' src=" . "'/fhiiqm/inc/show_img_gef.inc.php?gid=$gid' alt='$gef' title='$gef'></td>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   254
                    echo "<td>$row->gefahr_pic_bez</td></tr>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   255
                }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   256
                elseif ($gru == $row->gefahrgr_ID && $gfid != $row->gefahr_ID)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   257
                {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   258
        			if ($bg == $bg1) $bg = $bg2; else $bg = $bg1;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   259
                    echo "<tr bgcolor='" . $bg . "'>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   260
                    echo "<td>&nbsp;</td>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   261
                    echo "<td nowrap='1'>$row->gefahr_ID - $row->gefahr_bez</td>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   262
                    $gid = urlencode(trim($gid));
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   263
                    echo "<td><img name='gefahr' width='30px' src=" . "'/fhiiqm/inc/show_img_gef.inc.php?gid=$gid' alt='$gef' title='$gef'></td>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   264
                    echo "<td>$row->gefahr_pic_bez</td></tr>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   265
                }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   266
                $gfid   = $row->gefahr_ID;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   267
                $gru    = $row->gefahrgr_ID;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   268
            }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   269
            echo "</table>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   270
            echo "<p></p><table width=60%><tr><td class='right'><a href=\"javascript:window.print()\" class='sc'>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   271
                <img src=\"/fhiiqm/img/printer.png\" alt=\"Bericht drucken\" border=\"0\" align=\"right\" title=\"Bericht drucken\"></a></td></tr></table>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   272
            echo "</div>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   273
        
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   274
            echo "<br />&nbsp;&nbsp;&nbsp;";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   275
            if ($search != 2) // Aufruf aus fhiiqm
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   276
            {    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   277
                // Parameter aus $_GET fuer weitere Seiten
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   278
                $_GET["s"] = 1; // bewirkt weitere Suche
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   279
                foreach ($_GET as $key=>$val)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   280
                {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   281
                    if ($key != "st") $liste .= "&" . $key ."=".$val;
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   282
                }    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   283
                // Links auf andere Seiten generieren
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   284
                liste_links($start,$zeil,$ianz,$liste);
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   285
            }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   286
        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   287
        else
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   288
        {
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   289
            echo "<p class='red'>&nbsp;&nbsp;&nbsp;Leider gibt es kein Ergebnis für die von Ihnen gewählten Kriterien!</p>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   290
            echo "</div>\n";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   291
        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   292
        if ($search != 2)
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   293
        {    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   294
            echo "<span class='sc'>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   295
            echo "<br /><br />&nbsp;&nbsp;&nbsp;<a href=\"/fhiiqm/as_report.php\" target=\"_self\" title=\"Berichte\" class='sc'>&laquo; zur Berichts&uuml;bersicht</a>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   296
            echo "&nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp;<a href=\"" . $_SERVER["PHP_SELF"] . "\" target=\"_self\" title=\"Gefgruppe-Gef.-Pic\" class=\"sc\">neuer Bericht Gef&auml;hrdungsgruppe - Gef&auml;hrdung - Piktogramm</a>\n";    
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   297
            echo "</span>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   298
        }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   299
        else
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   300
            echo "<a href='javascript:history.back();' onMouseOver=\"{window.status='Zur&uuml;ck'; return true;}\">&laquo; Zur&uuml;ck</a>";
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   301
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   302
    }
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   303
?>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   304
</body>
45c139f74ea4 + Laborinfo; Keytyp-Verwaltung
schwarzer@hyperion.rz-berlin.mpg.de
parents:
diff changeset
   305
</html>