fhiiqm/vertrag_upd.php
author Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
Thu, 05 Apr 2012 15:35:43 +0200
changeset 25 482252ff12fd
parent 24 15f33315f045
child 31 0a1eb975fbd9
permissions -rw-r--r--
+ Prozesse edit, Liste; Reports Info, GVP
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
13
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     1
<?php
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     2
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     3
/**
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     5
 * @copyright 05/2011
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     6
 *
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     7
 * UPDATE/DELETE Vertragsdaten   
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     8
 */
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
     9
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    10
    error_reporting(E_ALL ^ E_NOTICE);
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    11
    
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    12
    session_start();
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    13
    if (! isset($_SESSION["userid"]))
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    14
    { 
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    15
        include_once ("inc/func_lib.inc.php");	
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    16
        login("vertrag_upd.php");
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    17
        exit;
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    18
    }
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    19
    
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    20
    if (is_null($_SESSION["recht"]) || (!is_null($_SESSION["recht"]) && !in_array("vr",$_SESSION["recht"]) && !in_array("ve",$_SESSION["recht"])))
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    21
    {
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    22
        header("Location: start.php");
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    23
        exit;
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    24
    }    
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    25
    
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    26
?>
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    27
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    28
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    29
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    30
<head>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    31
	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
20
5877137431e4 + Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 16
diff changeset
    32
   	<link href="css/db.css" rel="STYLESHEET" type="TEXT/CSS" media="screen"/> 
5877137431e4 + Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 16
diff changeset
    33
   	<link href="css/db_print.css" rel="STYLESHEET" type="TEXT/CSS" media="print"/> 
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    34
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    35
	<title>Aktualisieren Vertragsdaten</title>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    36
</head>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    37
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    38
<body>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    39
13
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    40
<?php    
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    41
    echo "&nbsp;";  
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    42
    echo "<div class=\"float-br smaller\" valign='top'>";
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    43
    echo "&nbsp;&nbsp;&nbsp;user: " . $_SESSION["userid"];
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    44
    echo "&nbsp;&nbsp;&nbsp;<a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
    45
    echo "<div class=\"float-r\"><img src=\"img/document_mark_as_final.png\" border=\"0\" alt=\"Vertragsdaten bearbeiten\" title=\"Vertragsdaten bearbeiten\"/></div>\n";
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    46
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    47
	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    48
    include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    49
	$dbc = new dbconnection();
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    50
    $cid    = $_GET["uid"];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    51
    if (!$cid) $cid=3;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    52
	$ok		= $_POST["ok"];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    53
	$upd	= $_POST["upd"];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    54
    $del    = $_POST["del"];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    55
    $vtr    = $_POST["vertrag"];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    56
    if (!$vtr['okn']) $ok=false;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    57
    
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    58
//    print_r($vtr);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    59
//    echo "<br><br>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    60
//    echo "Vertragsbezeichnung: " . $vtr['cname'] ."<br><br>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    61
    
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    62
    if (!$ok && ((!$upd && !$del) || $upd || $del))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    63
    {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    64
        if (!$upd && !$del)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    65
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    66
            $sql = "SELECT contract_ID,contract_name,contract_s,contract_l,vtyp_ID,contract_begin,contract_end,
24
15f33315f045 + Info GVP, Raum-Reinigung, Vertrag: Email vor Ende, Test Hierarchie
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
    67
                    contract_autoend,contract_mon_notice,contract_file,Bemerkung,email_send 
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    68
                    FROM fhiiqm.Vertrag WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    69
            if ($result = $dbc ->queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    70
            {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    71
                foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    72
                {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    73
                    $vtr['cname']   = $row->contract_name;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    74
//                    $vtr['cshort'] = $row->contract_s;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    75
                    $vtr['clong']   = $row->contract_l;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    76
                    $vtr['vtyp']    = $row->vtyp_ID;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    77
                    $vtr['bjahr']   = substr($row->contract_begin,0,4);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    78
                    $vtr['bmon']    = substr($row->contract_begin,5,2);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    79
                    $vtr['btag']    = substr($row->contract_begin,8,2);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    80
                    $vtr['ejahr']   = substr($row->contract_end,0,4);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    81
                    $vtr['emon']    = substr($row->contract_end,5,2);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    82
                    $vtr['etag']    = substr($row->contract_end,8,2);
8
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
    83
                    $vtr['cautoend']= $row->contract_autoend;
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    84
                    $vtr['cnot']    = $row->contract_mon_notice;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    85
                    $vtr['cfname']  = $row->contract_file;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    86
                    $vtr['cbem']    = $row->Bemerkung;
24
15f33315f045 + Info GVP, Raum-Reinigung, Vertrag: Email vor Ende, Test Hierarchie
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
    87
                    $vtr['email']   = $row->email_send;
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    88
                }  
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    89
            }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    90
            // Bearbeiter
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    91
            $sql = "SELECT persknr FROM Vertrag_Bearbeiter WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    92
            if ($result = $dbc ->queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    93
            {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    94
                foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    95
                {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    96
                   $vtr['cpers'][] = $row->persknr; 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    97
                }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    98
            }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    99
            // Partner
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   100
            $sql = "SELECT part_ID FROM Vertrag_Partner WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   101
            if ($result = $dbc -> queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   102
            {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   103
                foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   104
                {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   105
                    $vtr['partid'] = $row->part_ID;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   106
                }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   107
            }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   108
            // Produkt
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   109
            $sql = "SELECT produkt_ID FROM Produkt_Vertrag WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   110
            if ($result = $dbc -> queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   111
            {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   112
                foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   113
                {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   114
                    $vtr['prodid'] = $row->produkt_ID;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   115
                }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   116
            }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   117
            // Kosten
8
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   118
            if ($vtr['ejahr']) 
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   119
                $ejahr = $vtr['ejahr'];
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   120
            elseif ($vtr["cautoend"] && !$vtr['ejahr']) // automatische Vertragsverlaengerung und kein Endjahr angegeben
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   121
                $ejahr = date("Y");
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   122
            else 
9
f3ee378f9631 + cssMenu, kleinere ?nderungen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 8
diff changeset
   123
                $ejahr = $vtr['bjahr']; // Kosten nur im Startjahr
8
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   124
            for ($i=(int)$vtr['bjahr']; $i< (int)$ejahr +1; $i++)
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   125
            {   $ayear[] = $i;  }
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   126
            $sql = "SELECT k_year, kosten FROM Vertrag_Kosten WHERE contract_ID = $cid ORDER BY k_year ";
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   127
            if ($result = $dbc -> queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   128
            {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   129
                foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   130
                {
8
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   131
                    $j = array_search($row->k_year,$ayear);
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   132
                    if ( $j > -1 )
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   133
                        $vtr['kost'][$j] = str_replace('.',',',$row->kosten);
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   134
                }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   135
            }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   136
            
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   137
        }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   138
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   139
        include_once("form/vertrag_form.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   140
        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   141
        if ($upd)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   142
		{
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   143
            echo            
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   144
            "<tr>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   145
        		<td>Upload Vertragsdokument </td>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   146
        		<td><input type=\"file\" name=\"vfile\" size=\"50\" maxlength=\"50\" value=\"" .
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   147
            $_FILES["vfile"]["name"] . "\"/></td>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   148
            </tr>";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   149
    
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   150
		}
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   151
	  	if ($upd || $del)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   152
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   153
            if ($upd)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   154
              $frage = "Alle Angaben ok?<br>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   155
              erst wenn Haken gesetzt, Upload-File w&auml;hlen!";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   156
            elseif ($del)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   157
                $frage = "Vertrag wirklich l&ouml;schen?";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   158
    		echo "<tr>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   159
    		  <td class=\"red\" valign=\"top\" align=\"left\">$frage</td>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   160
    		        <td><input type=\"checkbox\" name=\"ok\" value=\"1\"";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   161
    		        if ($ok)  echo "checked"; 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   162
    		echo "></td>\n</tr>\n"; 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   163
        }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   164
		
13
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   165
        if (!is_null($_SESSION["recht"]) && in_array("ve",$_SESSION["recht"]))
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   166
        {
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   167
    		echo "<tr>\n";
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   168
    		echo "
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   169
    		  <td>&nbsp;</td>
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   170
    		  <td><input class=\"button\" type=\"submit\" value=\"&auml;ndern\" name=\"upd\" title=\"update\" />
21
97dba0fe820c +Anlage-Vertrag, Form Laser
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 20
diff changeset
   171
    		  &nbsp;&nbsp;&nbsp;<input class=\"buttonr\" type=\"submit\" value=\"l&ouml;schen\" name=\"del\" title=\"delete\" /></td>\n";
13
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   172
    		echo "</tr>\n";
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   173
        }
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   174
        echo "</table>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   175
        echo "</div>\n";
13
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   176
        if (!is_null($_SESSION["recht"]) && !in_array("ve",$_SESSION["recht"]))
20
5877137431e4 + Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 16
diff changeset
   177
            echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"vertrag_flist1.php\" target=\"_self\" title=\"Vertragsliste\">&laquo; zur Vertragsliste</a></p>\n";    
13
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   178
        echo "</form>\n";
741b35e9ebbe Rechteverwaltung I
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 9
diff changeset
   179
        	
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   180
    }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   181
    elseif ($ok && $upd)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   182
    {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   183
        echo "<div align='center'>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   184
        //daten speichern
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   185
        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   186
        //UPDATE Vertrag
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   187
/*
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   188
        if ($vtr['vtyp']== -1 || !(is_numeric($vtr['vtyp']))) $vtr['vtyp'] = "NULL";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   189
        if ($vtr['bjahr'] && $vtr['bmon'] && $vtr['btag'])
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   190
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   191
            $vbegin = $vtr['bjahr'] . "-" . $vtr['bmon'] . "-" . $vtr['btag'];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   192
            $vbegin = "'$vbegin'";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   193
            $vbd = $vtr['btag'] . "." . $vtr['bmon'] . "." . $vtr['bjahr']; 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   194
        }    
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   195
        else
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   196
            $vbegin = "NULL";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   197
        if ($vtr['ejahr'] && $vtr['emon'] && $vtr['etag'])
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   198
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   199
            $vend = $vtr['ejahr'] . "-" . $vtr['emon'] . "-" . $vtr['etag'];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   200
            $vend = "'$vend'";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   201
            $ved = $vtr['etag'] . "." . $vtr['emon'] . "." . $vtr['ejahr']; 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   202
        }   
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   203
        else
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   204
            $vend = "NULL";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   205
        if (!is_numeric($vtr['cnot'])) $vtr['cnot'] = "NULL";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   206
        if ($vtr['cbem']) $vtr['cbem'] = "'" . str_replace("'","\"",substr($vtr['cbem'],0,500)) . "'"; else $vtr['cbem']="NULL";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   207
*/        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   208
        $vtr['cname'] = substr($vtr['cname'],0,50);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   209
//        $vtr['cshort'] = substr($vtr['cshort'],0,50);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   210
        $vtr['clong'] = substr($vtr['clong'],0,100);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   211
        if ($vtr['vtyp']== -1 || !(is_numeric($vtr['vtyp']))) $vtr['vtyp'] = null;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   212
        $vbegin = date_obj($vtr['bjahr'], $vtr['bmon'], $vtr['btag']);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   213
        $vend = date_obj($vtr['ejahr'], $vtr['emon'], $vtr['etag']);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   214
        if (!is_numeric($vtr['cnot'])) $vtr['cnot'] = null;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   215
        if ($vtr['cbem']) $vtr['cbem'] = substr($vtr['cbem'],0,500); else $vtr['cbem']=null;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   216
        // Filename Vertrag
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   217
        $vtr['cfname'] = substr($vtr['cfname'],0,50);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   218
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   219
        if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   220
        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   221
        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   222
        // upload File, wenn vorhanden
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   223
        if (is_uploaded_file($_FILES["vfile"]["tmp_name"]) && isset($_FILES["vfile"]["name"]) && $_FILES["vfile"]["name"] )
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   224
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   225
            include ("inc/file_upload.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   226
            $fname  = gen_filename($vtr['cfname'],"vfile",$cid);            // Dateinamen generieren
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   227
            $retdf  = mod_file("/var/www/fhiiqm/documents",$cid,"","del");  // Loeschen alte Datei
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   228
            $retf   = upload("vfile", $fname, $cid);                        // Datei prüfen und in Dokumentenverzeichnis verschieben
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   229
        }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   230
        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   231
        if (isset($fname) && $retf) $cfile = $cid . "_" . $fname; else $cfile = $vtr['cfname'];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   232
/*        
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   233
        if (isset($fname) && $retf) $cfile = "contract_file = '" . $cid . "_" . $fname . "', ";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   234
        $sql = "UPDATE fhiiqm.Vertrag SET
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   235
                contract_name ='" . $vtr['cname'] ."', 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   236
--                contract_s ='" . $vtr['cshort'] ."', 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   237
                contract_l ='" . $vtr['clong'] ."', 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   238
                vtyp_ID = " . $vtr['vtyp'] . ", 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   239
                contract_begin = $vbegin, 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   240
                contract_end = $vend, 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   241
                contract_mon_notice = " . $vtr['cnot'] . ", " .
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   242
                $cfile .  
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   243
                "Bemerkung = " . $vtr['cbem'] ." 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   244
                WHERE contract_ID = $cid" ;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   245
        $retv = $dbc -> execute($sql);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   246
*/
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   247
        $stmt = $dbc -> stmtinit();
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   248
        if (is_object($stmt))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   249
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   250
            $stmt -> prepare("UPDATE fhiiqm.Vertrag SET
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   251
                    contract_name = ?, 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   252
                    contract_l = ?, 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   253
                    vtyp_ID = ?, 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   254
                    contract_begin = ?, 
8
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   255
                    contract_end = ?,
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   256
                    contract_autoend = ?, 
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   257
                    contract_mon_notice = ?,
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   258
                    contract_file = ?,  
24
15f33315f045 + Info GVP, Raum-Reinigung, Vertrag: Email vor Ende, Test Hierarchie
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   259
                    Bemerkung = ?,
15f33315f045 + Info GVP, Raum-Reinigung, Vertrag: Email vor Ende, Test Hierarchie
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   260
                    email_send = ? 
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   261
                    WHERE contract_ID = $cid") ;
24
15f33315f045 + Info GVP, Raum-Reinigung, Vertrag: Email vor Ende, Test Hierarchie
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 21
diff changeset
   262
            $stmt -> bind_param('ssissiissi',$vtr["cname"],$vtr["clong"],$vtr['vtyp'],$vbegin,$vend,$vtr['cautoend'],$vtr['cnot'],$cfile,$vtr['cbem'],$vtr["email"]);
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   263
            $retv = $stmt -> execute();
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   264
        }       
8
908abe8cec4d + Automatische Verlaengerung Vertrag
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 1
diff changeset
   265
//        echo "UPDATE-sql = \n";print_r($stmt); echo "<br />";
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   266
        if (!$retv) echo "error update" . $dbc -> error ."<br />\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   267
        if ($retv)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   268
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   269
            // DELETE, INSERT n:m Tabellen
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   270
            include ("inc/vertragtab_ins.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   271
        }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   272
//        echo "retv=$retv, retb=$retb, retp=$retp, retd=$retd, retk=$retk<br />\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   273
        if ($retv && $retb && $retp && $retd && $retk)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   274
        {//Eingabe Daten, Upload File erfolgreich 
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   275
            echo "<p class='green'><b>Vertragsdaten zu ID '$cid' wurden erfolgreich gespeichert.</b></p>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   276
            echo "<br /><br />\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   277
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   278
            // Anzeigen gespeicherte Vertragsdaten
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   279
            if ($fname)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   280
                $cfile = $cid . "_" . $fname;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   281
            else
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   282
                $cfile = $vtr['cfname'];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   283
            include ("inc/vertrag_dat_show.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   284
        }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   285
    }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   286
    elseif ($ok && $del)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   287
    {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   288
        // DELETE aus Tab Vertrag und abhaengigen Tabellen
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   289
        echo "<div align='center'>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   290
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   291
        $sql = "DELETE FROM Vertrag WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   292
        $retvd = $dbc -> execute($sql);
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   293
        if ($retvd)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   294
        {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   295
            include ("inc/file_upload.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   296
            $retdf  = mod_file("/var/www/fhiiqm/documents",$cid,"","del");  // Loeschen Dokument
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   297
            if ($retdf) echo "<p class='green'><b>Vertragsdokument zu ID '$cid' wurde gel&ouml;scht.</b></p>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   298
            echo "<p class='green'><b>Vertragsdaten zu ID '$cid' wurden gel&ouml;scht.</b></p>\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   299
            echo "<br /><br />\n";
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   300
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   301
            // Anzeigen geloeschter Vertragsdaten
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   302
            if ($fname)
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   303
                $cfile = $cid . "_" . $fname;
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   304
            else
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   305
                $cfile = $vtr['cfname'];
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   306
            include ("inc/vertrag_dat_show.inc.php");
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   307
        }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   308
    }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   309
    if ($ok && ($upd || $del))
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   310
    {
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   311
        echo "</div><br /><br />\n";
20
5877137431e4 + Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 16
diff changeset
   312
        echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"vertrag_flist1.php\" target=\"_self\" title=\"Vertragsliste\">Zur&uuml;ck zur Vertragsliste</a></p>\n";    
5877137431e4 + Anlage duplizieren, Voreinstellungen edit, Korrekturen
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 16
diff changeset
   313
        echo "<p class='sc'>&nbsp;&nbsp;&nbsp;<a href=\"vertrag_ins.php\" target=\"_self\" title=\"Vertrag erfassen\">Weiteren Vertrag erfassen</a></p>\n";    
1
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   314
    }
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   315
    
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   316
?>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   317
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   318
</body>
6288d5685bff Stand v. 31.08.2011
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   319
</html>