fhiiqm/vertrag_flist12.php
author Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
Thu, 23 Aug 2012 10:17:50 +0200
changeset 29 72f79dab938e
parent 26 3c1e3ac7089f
child 31 0a1eb975fbd9
permissions -rw-r--r--
+ Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
26
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     1
<?php
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     2
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     3
/**
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     5
 * @copyright 04/2012
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     6
 * 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     7
 * Liste Vertragsdaten mit Sortierung
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     8
 */
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     9
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    10
    error_reporting(E_ALL ^ E_NOTICE);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    11
    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    12
    session_start();
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    13
    if (! isset($_SESSION["userid"]))
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    14
    { 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    15
        include_once ("inc/func_lib.inc.php");	
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    16
        login("vertrag_flist2.php");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    17
        exit;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    18
    }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    19
    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    20
    if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("vr",$_SESSION["recht"]) && !in_array("ve",$_SESSION["recht"])))
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    21
    {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    22
        header("Location: start.php");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    23
        exit;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    24
    }    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    25
    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    26
?>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    27
    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    28
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    29
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    30
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    31
<head>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    32
	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    33
   	<link href="css/db.css" rel="STYLESHEET" type="TEXT/CSS" media="screen "/> 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    34
   	<link href="css/db_print.css" rel="STYLESHEET" type="TEXT/CSS" media="print" /> 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    35
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    36
	<title>Liste Vertragsdaten, Teil 2</title>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    37
</head>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    38
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    39
<body>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    40
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    41
<?php
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    42
    echo "&nbsp;";  
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    43
    echo "<div class=\"float-br smaller\" valign='top'>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    44
    echo "&nbsp;&nbsp;&nbsp;user: " . $_SESSION["userid"];
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    45
    echo "&nbsp;&nbsp;&nbsp;<a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    46
    echo "<div class=\"float-r\">&nbsp;&nbsp;&nbsp;<img src=\"img/document_mark_as_final.png\" border=\"0\" alt=\"Vertr&auml;ge\" title=\"Vertr&auml;ge\"/></div>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    47
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    48
    $zeil = $_GET["z"];
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    49
    if (!$zeil) $zeil = 25; // Anzahl der gezeigten Zeilen
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    50
    $start = $_GET["st"];   // Start bei DS $start+1
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    51
    if (!$start) $start=0;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    52
    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    53
    // Felder, nach denen gefiltert werden kann
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    54
    $fields = array(2=>"Bezeichnung",4=>"Bearbeiter",6=>"Vertragstyp",7=>"Produkt",8=>"Partner");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    55
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    56
	$sort   = $_GET["s"];
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    57
    $dir    = $_GET["d"];
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    58
    if (!isset($sort) && !$sort) $sort = 2;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    59
    if (!isset($dir) && !$dir)  $dir = "";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    60
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    61
    $fnum   = $_GET["f"];   // Spaltennummer, nach der aktuell gefiltert wird
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    62
    $filter = $_GET["b"];
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    63
    if (!isset($fnum) && !$fnum) $fnum = 0;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    64
    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    65
    $listg  = $_GET["l"];
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    66
    if (!isset($listg) && !$listg)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    67
    {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    68
        // Recht Produktgruppe beruecksichtigen
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    69
        if (is_array($_SESSION["prodg"]))
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    70
        {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    71
                foreach ($_SESSION["prodg"] as $val)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    72
                    $listg .= "," .$val;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    73
                $listg = substr($listg,1);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    74
        }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    75
        else $listg = "";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    76
    }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    77
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    78
    include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    79
    include_once ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    80
	$dbc = new dbconnection();
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    81
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    82
    $sql = "CALL fhiiqm.vertrag_flist12(" . $sort . ",'" . $dir . "', " . $fnum . ", '" . $filter . "', '" . $listg . "',$start,$zeil, @anz, @ganz)";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    83
    // Parameter: Nr. Sortfelf, Sortierrichtung, Nr. Filterfeld, Filterbegriff, Start bei DS $start+1, Anzahl DS/Seite, Anzahl gefundener Vertraege, Anzahl DS gesamt
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    84
    // liefert Felder: contract_ID,cname,clong,bearb,doc,typ,prod,cbegin,cend,kmon,partfirmar,kyear,kosten,bem
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    85
    $result = $dbc -> queryObjectArray($sql);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    86
    if ($result)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    87
    {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    88
		$bg1 = "#F8F8F8";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    89
		$bg2 = "#DEDFE1";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    90
		$bg = "#FFFFFF";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    91
        
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    92
        $heute = new DateTime();
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    93
        
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    94
        $vanz = $dbc -> querySingleItem("SELECT @anz");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    95
        $ganz = $dbc -> querySingleItem("SELECT @ganz");
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    96
        
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    97
        echo "<div align='center'>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    98
        echo "<p><b>Vertr&auml;ge Teil 2</b></p>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    99
        echo "<table border='0' cellspacing='0'>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   100
        echo "<tr><td class='bigger'>Mittels '<img src='img/auf.gif' border='0' width='9' hight='9'>' / '<img src='img/ab.gif' border='0' width='9' hight='9'>' 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   101
            können Sie Spalten auf- bzw. absteigend sortieren</td></tr>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   102
            <tr><td class='bigger'>Klick auf '<img src='img/edit.gif' border='0' width='11' hight='11'>' - Bearbeiten der Vertragsdaten</td></tr>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   103
        echo "</table>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   104
        printf ("<p>Anzahl Vertr&auml;ge: %s </p>", $vanz);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   105
        echo "<table width='99%'>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   106
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   107
        if ($filter>'!') echo "<tr><td class='bigger' colspan=7>Filter: ". $fields["$fnum"] . " wie '$filter'</td><tr>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   108
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   109
        echo "<tr bgcolor='#68ACBF'>";
29
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   110
        tab_column(8,"Partner",$sort,$dir,0,$fnum,$filter,$start,$zeil);
26
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   111
        tab_column(2,"Bezeichnung",$sort,$dir,0,$fnum,$filter,$start,$zeil);
29
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   112
        tab_column(9,"Beginn",$sort,$dir,0,$fnum,$filter,$start,$zeil);
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   113
        tab_column(10,"Ende",$sort,$dir,0,$fnum,$filter,$start,$zeil);
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   114
        tab_column(11,"Verl&auml;ng.",$sort,$dir,0,$fnum,$filter,$start,$zeil);
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   115
        tab_column(12,"K&uuml;nd.frist (mon)",$sort,$dir,0,$fnum,$filter,$start,$zeil);
26
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   116
        echo "<th>Kosten/Jahr(&euro;)</th>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   117
        echo "<th>Bemerkung</th>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   118
        echo "<th>E-Mail</th>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   119
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   120
        echo "<th>&nbsp;</th></tr>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   121
        $cid=0;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   122
        foreach ($result as $row)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   123
        {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   124
            // Anzeigen der nur einmal relevanten Daten
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   125
			if ($bg == $bg1) $bg = $bg2; else $bg = $bg1;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   126
            if ($row->cend)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   127
            {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   128
                $ce = new DateTime($row->cend);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   129
                if ((!$row->cautoend || is_null($row->cautoend)) && $heute > $ce) $class="class='red'"; else $class="";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   130
            }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   131
            else $class="";
29
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   132
            echo "<tr bgcolor='" . $bg . "'>"; 
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   133
            echo "<td>$row->partfirma</td>";
72f79dab938e + Infotyp 7,8,81, Info-Report, Reports AS, Menu anpassen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 26
diff changeset
   134
            echo "<td $class><b>$row->cname</b></td>";    
26
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   135
//            echo "<td>$row->contract_s</td>";    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   136
            if ($row->cbegin)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   137
            {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   138
                $cb = new DateTime($row->cbegin);    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   139
                echo "<td>" . $cb->format('d.m.Y')."</td>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   140
            }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   141
            else  echo "<td>&nbsp;</td>";       
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   142
            if ($row->cend)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   143
                echo "<td>" . $ce->format('d.m.Y')."</td>";    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   144
            else  echo "<td>&nbsp;</td>";       
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   145
            if ($row->cautoend) echo "<td>automatisch</td>"; else echo "<td>&nbsp;</td>"; 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   146
            echo "<td class='center'>$row->kmon</td>";    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   147
        
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   148
            // Anzeigen Kosten pro Jahr -> 1 Zeile des Resultsets (Kosten fast rechtsbuendig!))
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   149
            if ($row->yearkosten)   // Form: yyyy:nnn.nn|yyyy:nnnnn|yyyy:nn.n usw.
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   150
            { 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   151
                $yka = explode('|',$row->yearkosten);   
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   152
                $first = true;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   153
                foreach ($yka as $yk)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   154
                {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   155
                    if (!$first) echo "<br />"; else echo "<td>"; 
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   156
                    list($year,$kost) = explode(':',$yk);                    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   157
                    echo "$year:&nbsp;&nbsp;&nbsp;" . str_replace(" ","&nbsp;",sprintf("%' 10s",number_format($kost,2,",","."))) . "";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   158
                    $first = false;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   159
                }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   160
                echo "</td>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   161
            }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   162
            else echo "<td>&nbsp;</td>";    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   163
            $mail = ($row->email)? "ja": "&nbsp;";   
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   164
            echo "<td width='27%'>".nl2br($row->bem)."</td>";    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   165
            echo "<td>$mail</td>";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   166
            echo "<td><a href='vertrag_upd.php?uid=$cid'><img src=\"img/edit.gif\" alt='edit' title='edit' border='0'/></a></td></tr>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   167
       }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   168
        echo "</table></div>\n";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   169
        echo "<br />&nbsp;&nbsp;&nbsp;";
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   170
        
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   171
        // Sortierung und Filter aus $_GET fuer weitere Seiten
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   172
        foreach ($_GET as $key=>$val)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   173
        {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   174
            if ($key != "st") $liste .= "&" . $key ."=".$val;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   175
        }    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   176
        // Sortierung und Filter aus $_POST fuer weitere Seiten
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   177
        if ($subf)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   178
        foreach ($_POST as $key=>$val)
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   179
        {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   180
            if ($key != "st" && $key != "subf" && $key != "filter") $liste .= "&" . $key ."=".$val;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   181
            if ($key == "filter") $liste .= "&b=" . $val;
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   182
        }    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   183
        
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   184
        // Links auf andere Seiten generieren
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   185
        liste_links($start,$zeil,$ganz,$liste);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   186
    }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   187
    else
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   188
    {
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   189
        print_r ($dbc -> error);
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   190
    }
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   191
    $dbc -> close();
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   192
    if (!is_null($_SESSION["recht"]) && in_array("ve",$_SESSION["recht"]))
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   193
        echo "<p>&nbsp;&nbsp;&nbsp;<a href=\"vertrag_ins.php\" class=\"sc\" target=\"_self\" title=\"Vertrag erfassen\">Weiteren Vertrag erfassen</a></p>\n";    
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   194
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   195
?>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   196
</body>
3c1e3ac7089f + csv-Dateien Laser, Vertrag, Raum
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   197
</html>