IQM: fhiiqm/vertrag_upd.php@6288d5685bff (annotated)

1 6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	1	<!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	2	<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	3
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	4	<head>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	5	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	6	<link href="css/db.css" rel="STYLESHEET" type="TEXT/CSS" />
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	7
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	8	<title>Aktualisieren Vertragsdaten</title>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	9	</head>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	10
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	11	<body>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	12	<div class="float-r"><img src="img/document_mark_as_final.png" border="0" alt="Vertragsdaten bearbeiten" title="Vertragsdaten bearbeiten"/></div>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	13
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	14	<?php
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	15
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	16	/**
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	17	* @author Bettina Schwarzer, Fritz-Haber-Institut
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	18	* @copyright 05/2011
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	19	*
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	20	* UPDATE/DELETE Vertragsdaten
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	21	*/
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	22
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	23	error_reporting(E_ALL ^ E_NOTICE);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	24
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	25	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	26	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	27	$dbc = new dbconnection();
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	28	$cid = $_GET["uid"];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	29	if (!$cid) $cid=3;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	30	$ok = $_POST["ok"];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	31	$upd = $_POST["upd"];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	32	$del = $_POST["del"];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	33	$vtr = $_POST["vertrag"];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	34	if (!$vtr['okn']) $ok=false;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	35
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	36	// print_r($vtr);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	37	// echo "<br><br>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	38	// echo "Vertragsbezeichnung: " . $vtr['cname'] ."<br><br>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	39
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	40	if (!$ok && ((!$upd && !$del) \|\| $upd \|\| $del))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	41	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	42	if (!$upd && !$del)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	43	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	44	$sql = "SELECT contract_ID,contract_name,contract_s,contract_l,vtyp_ID,contract_begin,contract_end,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	45	contract_mon_notice,contract_file,Bemerkung
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	46	FROM fhiiqm.Vertrag WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	47	if ($result = $dbc ->queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	48	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	49	foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	50	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	51	$vtr['cname'] = $row->contract_name;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	52	// $vtr['cshort'] = $row->contract_s;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	53	$vtr['clong'] = $row->contract_l;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	54	$vtr['vtyp'] = $row->vtyp_ID;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	55	$vtr['bjahr'] = substr($row->contract_begin,0,4);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	56	$vtr['bmon'] = substr($row->contract_begin,5,2);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	57	$vtr['btag'] = substr($row->contract_begin,8,2);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	58	$vtr['ejahr'] = substr($row->contract_end,0,4);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	59	$vtr['emon'] = substr($row->contract_end,5,2);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	60	$vtr['etag'] = substr($row->contract_end,8,2);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	61	$vtr['cnot'] = $row->contract_mon_notice;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	62	$vtr['cfname'] = $row->contract_file;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	63	$vtr['cbem'] = $row->Bemerkung;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	64	}
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	// Bearbeiter
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	67	$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	68	if ($result = $dbc ->queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	69	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	70	foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	71	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	72	$vtr['cpers'][] = $row->persknr;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	73	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	74	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	75	// Partner
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	76	$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	77	if ($result = $dbc -> queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	78	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	79	foreach ($result as $row)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	80	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	81	$vtr['partid'] = $row->part_ID;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	82	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	83	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	84	// Produkt
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	85	$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	86	if ($result = $dbc -> queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	87	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	88	foreach ($result as $row)
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	$vtr['prodid'] = $row->produkt_ID;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	91	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	92	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	93	// Kosten
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	94	$sql = "SELECT kosten FROM Vertrag_Kosten WHERE contract_ID = $cid ORDER BY k_year ";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	95	if ($result = $dbc -> queryObjectArray($sql))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	96	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	97	foreach ($result as $row)
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	$vtr['kost'][] = str_replace('.',',',$row->kosten);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	100	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	101	}
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	}
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	include_once("form/vertrag_form.inc.php");
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	if ($upd)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	108	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	109	echo
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	110	"<tr>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	111	<td>Upload Vertragsdokument </td>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	112	<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	113	$_FILES["vfile"]["name"] . "\"/></td>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	114	</tr>";
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	if ($upd \|\| $del)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	118	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	119	if ($upd)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	120	$frage = "Alle Angaben ok?<br>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	121	erst wenn Haken gesetzt, Upload-File wählen!";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	122	elseif ($del)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	123	$frage = "Vertrag wirklich löschen?";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	124	echo "<tr>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	125	<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	126	<td><input type=\"checkbox\" name=\"ok\" value=\"1\"";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	127	if ($ok) echo "checked";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	128	echo "></td>\n</tr>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	129	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	130
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	131	echo "<tr>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	132	echo "
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	133	<td> </td>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	134	<td><input class=\"button\" type=\"submit\" value=\"ändern\" name=\"upd\" title=\"update\" />
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	135	<input class=\"button\" type=\"submit\" value=\"löschen\" name=\"del\" title=\"delete\" /></td>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	136	echo "</tr>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	137	echo "</table>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	138	echo "</div>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	139	echo "</form>\n";
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	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	142	elseif ($ok && $upd)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	143	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	144	echo "<div align='center'>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	145	//daten speichern
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	146
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	147	//UPDATE Vertrag
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	148	/*
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	149	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	150	if ($vtr['bjahr'] && $vtr['bmon'] && $vtr['btag'])
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	151	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	152	$vbegin = $vtr['bjahr'] . "-" . $vtr['bmon'] . "-" . $vtr['btag'];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	153	$vbegin = "'$vbegin'";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	154	$vbd = $vtr['btag'] . "." . $vtr['bmon'] . "." . $vtr['bjahr'];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	155	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	156	else
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	157	$vbegin = "NULL";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	158	if ($vtr['ejahr'] && $vtr['emon'] && $vtr['etag'])
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	159	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	160	$vend = $vtr['ejahr'] . "-" . $vtr['emon'] . "-" . $vtr['etag'];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	161	$vend = "'$vend'";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	162	$ved = $vtr['etag'] . "." . $vtr['emon'] . "." . $vtr['ejahr'];
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	else
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	165	$vend = "NULL";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	166	if (!is_numeric($vtr['cnot'])) $vtr['cnot'] = "NULL";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	167	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	168	*/
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	169	$vtr['cname'] = substr($vtr['cname'],0,50);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	170	// $vtr['cshort'] = substr($vtr['cshort'],0,50);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	171	$vtr['clong'] = substr($vtr['clong'],0,100);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	172	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	173	$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	174	$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	175	if (!is_numeric($vtr['cnot'])) $vtr['cnot'] = null;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	176	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	177	// Filename Vertrag
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	178	$vtr['cfname'] = substr($vtr['cfname'],0,50);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	179
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	180	if (!isset($dbc) \|\| !$dbc) $dbc = new dbconnection();
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	181
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	// upload File, wenn vorhanden
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	184	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	185	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	186	include ("inc/file_upload.inc.php");
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	187	$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	188	$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	189	$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	190	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	191
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	192	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	193	/*
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	194	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	195	$sql = "UPDATE fhiiqm.Vertrag SET
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	196	contract_name ='" . $vtr['cname'] ."',
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	197	-- contract_s ='" . $vtr['cshort'] ."',
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	198	contract_l ='" . $vtr['clong'] ."',
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	199	vtyp_ID = " . $vtr['vtyp'] . ",
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	200	contract_begin = $vbegin,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	201	contract_end = $vend,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	202	contract_mon_notice = " . $vtr['cnot'] . ", " .
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	203	$cfile .
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	204	"Bemerkung = " . $vtr['cbem'] ."
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	205	WHERE contract_ID = $cid" ;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	206	$retv = $dbc -> execute($sql);
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	$stmt = $dbc -> stmtinit();
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	209	if (is_object($stmt))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	210	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	211	$stmt -> prepare("UPDATE fhiiqm.Vertrag SET
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	212	contract_name = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	213	contract_l = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	214	vtyp_ID = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	215	contract_begin = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	216	contract_end = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	217	contract_mon_notice = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	218	contract_file = ?,
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	219	Bemerkung = ?
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	220	WHERE contract_ID = $cid") ;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	221	$stmt -> bind_param('ssississ',$vtr["cname"],$vtr["clong"],$vtr['vtyp'],$vbegin,$vend,$vtr['cnot'],$cfile,$vtr['cbem']);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	222	$retv = $stmt -> execute();
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	223	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	224	// echo "UPDATE-sql = $sql<br />\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	225	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	226	if ($retv)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	227	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	228	// DELETE, INSERT n:m Tabellen
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	229	include ("inc/vertragtab_ins.inc.php");
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	// 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	232	if ($retv && $retb && $retp && $retd && $retk)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	233	{//Eingabe Daten, Upload File erfolgreich
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	234	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	235	echo "<br /><br />\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	236
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	237	// Anzeigen gespeicherte Vertragsdaten
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	238	if ($fname)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	239	$cfile = $cid . "_" . $fname;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	240	else
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	241	$cfile = $vtr['cfname'];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	242	include ("inc/vertrag_dat_show.inc.php");
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	243	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	244	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	245	elseif ($ok && $del)
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	// DELETE aus Tab Vertrag und abhaengigen Tabellen
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	248	echo "<div align='center'>\n";
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	$sql = "DELETE FROM Vertrag WHERE contract_ID = $cid";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	251	$retvd = $dbc -> execute($sql);
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	252	if ($retvd)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	253	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	254	include ("inc/file_upload.inc.php");
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	255	$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	256	if ($retdf) echo "<p class='green'><b>Vertragsdokument zu ID '$cid' wurde gelöscht.</b></p>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	257	echo "<p class='green'><b>Vertragsdaten zu ID '$cid' wurden gelöscht.</b></p>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	258	echo "<br /><br />\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	259
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	260	// Anzeigen geloeschter Vertragsdaten
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	261	if ($fname)
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	262	$cfile = $cid . "_" . $fname;
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	263	else
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	264	$cfile = $vtr['cfname'];
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	265	include ("inc/vertrag_dat_show.inc.php");
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	266	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	267	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	268	if ($ok && ($upd \|\| $del))
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	269	{
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	270	echo "</div><br /><br />\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	271	echo "<p>   <a href=\"vertrag_flist1.php\" target=\"_self\" title=\"Vertragsliste\">Zurück zur Vertragsliste</a></p>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	272	echo "<p>   <a href=\"vertrag_ins.php\" target=\"_self\" title=\"Vertrag erfassen\">Weiteren Vertrag erfassen</a></p>\n";
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	273	}
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	274
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	275	?>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	276
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	277	</body>
6288d5685bff Stand v. 31.08.2011 Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de> parents: diff changeset	278	</html>

author	Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
	Wed, 31 Aug 2011 14:22:19 +0200
changeset 1	6288d5685bff
child 8	908abe8cec4d
permissions	-rw-r--r--