IQM: fhiiqm/info_ed.php@d652bbba2d43 (annotated)

40 6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	1	<?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	2
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	3	/**
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	4	* @author Bettina Schwarzer, Fritz-Haber-Institut
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	5	* @copyright 02/2012
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	6	*
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	7	* INSERT,UPDATE Informationen ausser Betriebsanweisung, Betriebsstoerung
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	8	*/
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	9
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	10	error_reporting(E_ALL ^ E_NOTICE);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	11
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	12	session_start();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	13	if (! isset($_SESSION["userid"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	14	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	15	include_once ($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	16	login($_SERVER["PHP_SELF"]);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	17	exit;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	18	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	19
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	20	if (is_null($_SESSION["recht"]) \|\| (!is_null($_SESSION["recht"]) && !in_array("ir",$_SESSION["recht"]) && !in_array("ie",$_SESSION["recht"])))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	21	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	22	header("Location: start.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	23	exit;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	24	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	25
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	26	$ityp = $_GET["t"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	27
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	28	$infid = $_GET["i"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	29
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	30	$zeil = $_GET["z"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	31	if (!$zeil) $zeil = 10; // Anzahl der gezeigten Zeilen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	32	$start = $_GET["st"]; // Start bei DS $start+1
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	33	if (!$start) $start=0;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	34	$sort = $_GET["s"]; // Sortierung nach Spalte
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	35	$dir = $_GET["d"]; // Sortierrichtung
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	36	$fnum = $_GET["f"]; // Spaltennummer, nach der aktuell gefiltert wird
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	37	$filter = $_GET["b"]; // Filterbegriff
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	38	// $_GET-Parameter zurück zur Infoliste mit den selben Einstellungen wie zuvor
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	39	$getp = "s=$sort&d=$dir&f=$fnum&b=$filter&st=$start&z=$zeil";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	40
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	41	$del = $_POST["del"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	42	$sub = $_POST["eintragen"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	43	$dup = $_POST["dup"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	44	if (!$dup) $dup = $_GET["dp"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	45	$copy = $_GET["c"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	46	$inf = $_POST["inf"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	47	$ok = $_POST["ok"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	48	if (!$inf["okn"]) $ok = false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	49	$duptext="";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	50
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	51	// print_r($inf); echo "ok = $ok<br /><br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	52
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	53	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	54	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	55	$dbc = new dbconnection();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	56
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	57	if ($dup)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	58	{ // Info duplizieren
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	59	$tab = "Info";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	60	$key = "info_ID";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	61	$val = $infid;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	62	// $ret=1;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	63	$ret = duplicate_record ($tab, $key, $val);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	64	if ($ret)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	65	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	66	$infid_new=$ret;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	67	// Infofilename loeschen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	68	$sql = "UPDATE fhiiqm.Info SET info_file = NULL WHERE info_ID = $infid_new";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	69	$retf = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	70	if ($dbc->error) echo "<p class='red'>error loeschen Info-File: " . $dbc->error . "</p>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	71
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	72	// duplizieren Produkte
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	73	$sql = "INSERT INTO Info_Produkt SELECT $infid_new,produkt_ID FROM Info_Produkt WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	74	$retp = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	75	if ($dbc->error) echo "<p class='red'>error copy Info_Produkt: " . $dbc->error . "</p>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	76
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	77	// duplizieren Adressat
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	78	$sql = "INSERT INTO Info_Adressat SELECT $infid_new,info_adr_ID FROM Info_Adressat WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	79	$reta = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	80	if ($dbc->error) echo "<p class='red'>error copy Info_Adressat: " . $dbc->error . "</p>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	81
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	82	// duplizieren Verantwortliche
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	83	$sql = "INSERT INTO Info_Verantwortlich SELECT $infid_new,persknr,prioritaet FROM Info_Verantwortlich WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	84	$retv = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	85	if ($dbc->error) echo "<p class='red'>error copy Info_Verantwortlich: " . $dbc->error . "</p>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	86
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	87	if ($ret && $retf && $retp && $reta && $retv)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	88	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	89	$addr = $_SERVER["PHP_SELF"] . "?i=$infid_new&c=1&$getp";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	90	header("Location: $addr");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	91	exit;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	92	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	93	else $duptext = " - Fehler beim Duplizieren von ". $inf["iname"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	94	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	95	else $duptext = " - Fehler beim Duplizieren von ". $inf["iname"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	96	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	97
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	98	?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	99	<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	100	<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	101
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	102	<head>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	103	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	104	<link href="/fhiiqm/css/db.css" rel="STYLESHEET" type="TEXT/CSS" media="screen"/>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	105	<link href="/fhiiqm/css/db_print.css" rel="STYLESHEET" type="TEXT/CSS" media="print"/>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	106	<!--
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	107	<link type="text/css" href="/fhiiqm/css/jquery/ui-lightness/jquery-ui-1.8.16.custom.css" rel="Stylesheet" />
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	108	<script type="text/javascript" src="/fhiiqm/js/jquery/jquery-1.6.2.min.js"></script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	109	<script type="text/javascript" src="/fhiiqm/js/jquery/jquery-ui-1.8.16.custom.min.js"></script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	110	-->
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	111	<link type="text/css" href="/fhiiqm/css/jquery/ui-lightness-1.8.21/jquery-ui-1.8.21.custom.css" rel="Stylesheet" />
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	112	<script type="text/javascript" src="/fhiiqm/js/jquery/jquery-1.7.2.min.js"></script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	113	<script type="text/javascript" src="/fhiiqm/js/jquery/jquery-ui-1.8.21.custom.min.js"></script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	114
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	115	<title>Edit Informationen</title>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	116	</head>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	117
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	118	<body>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	119
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	120	<script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	121	$(document).ready(function() {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	122	$("#titel").focus();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	123	$("#persknr").autocomplete({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	124	source: "/fhiiqm/inc/ma_list_ac.inc.php",
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	125	minLength: 2,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	126	select: function(event,ui){$("#pid").val(ui.item.id);}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	127	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	128	$("#cdat").datepicker({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	129	dateFormat: 'yy-mm-dd', //nur Datum
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	130	yearRange: '2000:2025',
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	131	changeMonth: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	132	changeYear: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	133	firstDay: 1,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	134	dayNamesMin: ['So','Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa' ],
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	135	monthNamesShort: ['Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez']
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	136	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	137	$("#vdat").datepicker({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	138	dateFormat: 'yy-mm-dd', //nur Datum
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	139	yearRange: '2000:2025',
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	140	changeMonth: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	141	changeYear: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	142	firstDay: 1,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	143	dayNamesMin: ['So','Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa' ],
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	144	monthNamesShort: ['Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez']
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	145	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	146	$("#bdat").datepicker({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	147	dateFormat: 'yy-mm-dd', //nur Datum
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	148	yearRange: '2000:2025',
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	149	changeMonth: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	150	changeYear: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	151	firstDay: 1,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	152	dayNamesMin: ['So','Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa' ],
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	153	monthNamesShort: ['Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez']
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	154	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	155	$("input[id='persknr']").addClass("long20");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	156	$("input[id='cdat']").addClass("long10");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	157	$("input[id='vdat']").addClass("long10");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	158	$("input[id='bdat']").addClass("long10");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	159	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	160	function addInputf(divId,anz){
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	161	var cdiv = document.createElement('div');
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	162	var idl = "cbl_" + anz;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	163	cdiv.innerHTML = "<span></span>Dok-Name     <input name='inf[ifname][]' type='text' size='50' maxlength='50' value='' />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	164	cdiv.innerHTML += "     Schlagwort   <input type='text' name='inf[swort][]' size='30' maxlength='50' value='' />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	165	cdiv.innerHTML += "<img src='/fhiiqm/img/nixt.gif' border='0' height='100%' />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	166	//cdiv.innerHTML += "<span id='cbl'>   <input type='checkbox' id='del' name='vertrag[del][]' value='1'/></span>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	167	cdiv.innerHTML += "<span id='cbl'>   <input type='checkbox' id='del' name='inf[del][]' value='1'/>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	168	cdiv.innerHTML += "<label id='lb' for='del'> löschen</label></span>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	169	cdiv.innerHTML += "<br />Upload-Dokument     <input type='file' name='ifile[]' size='50' maxlength='50' value='' />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	170	document.getElementById(divId).appendChild(cdiv);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	171	var delcb = document.getElementById('del');
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	172	delcb.id = "del_" + anz;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	173	delcb.style.display = 'none';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	174	var lcb = document.getElementById('lb');
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	175	lcb.id = "lb_" + anz;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	176	lcb.setAttribute("for", delcb.id);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	177	lcb.style.display = 'none';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	178	counter++;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	179	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	180	function markdelInput(divId,anz){
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	181	for (i=1; i<anz; i++)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	182	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	183	var id = "del_" + i;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	184	var delcb = document.getElementById(id);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	185	delcb.style.display = 'inline';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	186	var idl = "lb_" + i;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	187	var lcb = document.getElementById(idl);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	188	lcb.style.display = 'inline';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	189	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	190	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	191	</script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	192
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	193	<?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	194	echo " ";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	195	echo "<div class=\"float-br smaller\" valign='top'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	196	echo "   user: " . $_SESSION["userid"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	197	echo "   <a class='sc' href='/fhiiqm/logout.php' title='Session beenden'>logout</a></div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	198	echo "<div class=\"float-r\"><img src=\"/fhiiqm/img/document_image_ver.png\" border=\"0\" alt=\"Infodaten ändern\" title=\"Infodaten ändern\"/></div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	199
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	200
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	201	echo "<div align='center'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	202	if ($infid) $text = "editieren"; else $text = "erfassen";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	203	if ($copy) $duptext = " (Kopie)";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	204	echo "<h3>Information $text$duptext<h3>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	205
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	206	echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	207
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	208	//Filename wenn Upload?
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	209	if (isset($_FILES["ifile"]["error"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	210	foreach ($_FILES["ifile"]["error"] as $key => $err)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	211	if ($err == 0 && !$inf["ifname"][$key]) $ok = $ok && false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	212
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	213	if (!$ok \|\| (!$sub && !$del && !$dup))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	214	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	215	if ($infid && (!$sub \|\| !$del) && !isset($inf))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	216	{ // update
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	217	$sql = "SELECT info_ID,info_name_s,info_name_l,info_date,info_valid_from,info_valid_to,infotyp_ID,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	218	i.persknr,lang,info_file,info_rel_ID,info_freigabe_ID,info_sort,betrag,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	219	CONCAT(nachname,', ',vorname) AS aname,i.timestamp,i.userid
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	220	FROM fhiiqm.Info i LEFT OUTER JOIN fhiiqm.Mitarbeiter m
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	221	ON i.persknr=m.persknr
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	222	WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	223	if ($result = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	224	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	225	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	226	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	227	$inf["infid"] = $infid;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	228	$inf["iname"] = $row->info_name_s;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	229	$inf["ilong"] = $row->info_name_l;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	230	$inf["cdat"] = $row->info_date;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	231	$inf["vdat"] = $row->info_valid_from;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	232	$inf["bdat"] = $row->info_valid_to;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	233	$inf["ityp"] = $row->infotyp_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	234	$inf["persknr"] = $row->aname;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	235	$inf["pers"] = $row->persknr;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	236	$inf["infrel"] = $row->info_rel_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	237	// $inf["ifname"] = $row->info_file;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	238	$inf["lang"] = $row->lang;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	239	$inf["fg"] = $row->info_freigabe_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	240	$inf["sort"] = $row->info_sort;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	241	$inf["betr"] = str_replace('.',',',$row->betrag);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	242	$inf["tstmp"] = $row->timestamp;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	243	$inf["uid"] = $row->userid;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	244	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	245	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	246	// Produkt
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	247	$sql = "SELECT produkt_ID FROM Info_Produkt WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	248	if ($result = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	249	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	250	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	251	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	252	$inf['prid'][] = $row->produkt_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	253	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	254	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	255	// Adressat
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	256	$sql = "SELECT info_adr_ID FROM Info_Adressat WHERE info_id = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	257	if ($result = $dbc->queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	258	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	259	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	260	$inf["adr"][] = $row->info_adr_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	261	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	262	// Verantwortlicher
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	263	$sql = "SELECT iv.persknr,prioritaet, CONCAT (nachname, ', ',vorname)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	264	FROM Info_Verantwortlich iv INNER JOIN Mitarbeiter m ON iv.persknr=m.persknr
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	265	WHERE info_id = $infid
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	266	ORDER BY 3";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	267	if ($result = $dbc->queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	268	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	269	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	270	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	271	$inf["vpers"][] = $row->persknr;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	272	// $inf["prio"][] = $row->prioritaet;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	273	$inf["prio"][$row->persknr] = $row->prioritaet;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	274	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	275	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	276	// Dokumente
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	277	$sql = "SELECT if_filename, if_schlagwort FROM Info_File WHERE info_ID = $infid ORDER BY if_ID";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	278	if ($result = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	279	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	280	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	281	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	282	$inf["ifname"][] = $row->if_filename;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	283	$inf["swort"][] = $row->if_schlagwort;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	284	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	285	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	286	// print_r($inf); echo "<br /><br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	287
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	288	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	289	include($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/form/info_form2.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	290	/* if ($sub)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	291	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	292	echo
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	293	"<tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	294	<td>Upload Infodokument </td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	295	<td><input type=\"file\" name=\"ifile\" size=\"50\" maxlength=\"50\" value=\"" .
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	296	$_FILES["ifile"]["name"] . "\"/></td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	297	</tr>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	298
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	299	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	300	*/
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	301	if ($sub \|\| $del)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	302	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	303	if ($sub)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	304	$frage = "Alle Angaben ok?";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	305	elseif ($del)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	306	$frage = "Information wirklich löschen?";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	307	echo "<tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	308	<td class=\"red\" valign=\"top\" align=\"left\">$frage</td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	309	<td><input type=\"checkbox\" name=\"ok\" value=\"1\"";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	310	if ($ok) echo "checked=\"checked\"";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	311	echo " /></td>\n</tr>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	312	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	313	if (!is_null($_SESSION["recht"]) && in_array("ie",$_SESSION["recht"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	314	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	315	echo "
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	316	<tr><td> </td>\n
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	317	<td><input class=\"button\" type=\"submit\" name=\"eintragen\" value=\" eintragen \" />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	318	if ($infid)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	319	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	320	echo "   <input class=\"buttonr\" type=\"submit\" value=\"löschen\" name=\"del\" title=\"delete\" />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	321	echo "   <input class=\"button\" type=\"submit\" value=\"duplizieren\" name=\"dup\" title=\"delete\" />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	322	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	323	echo "</td></tr>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	324	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	325	echo "</table>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	326	echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	327	// if (!is_null($_SESSION["recht"]) && !in_array("le", $_SESSION["recht"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	328	echo "<p class='sc'>   <a href=\"info_flist.php?$getp\" target=\"_self\" title=\"Infoliste\">« zur Infoliste</a></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	329	echo "</form>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	330	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	331	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	332	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	333	echo "<div align='center'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	334
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	335	if ($del)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	336	{ // loescht auch m:n - Tabellen wegen Loeschweitergabe
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	337	$sql = "DELETE FROM Info WHERE info_ID = '$infid'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	338	$retdi = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	339	if ($retdi)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	340	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	341	// alte Namen Infodocumente
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	342	$sql = "SELECT if_filename FROM Info_File WHERE info_ID = $infid ORDER BY if_ID";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	343	if ($res = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	344	foreach ($res as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	345	$ifile_old[] = $row->if_filename;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	346
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	347	include_once ("inc/file_upload.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	348	foreach ($inf['ifname'] as $key => $filename)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	349	$retdf = $retdf && mod_file("/var/www/fhiiqm/infos",$infid,"","del",$ifile_old[$key]); // Loeschen alte Datei
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	350	if ($retdf) echo "<p class='green'><b>Infodokumente zu ID '$infid' wurde gelöscht.</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	351	echo "<p class='green'><b>Infodaten zu ID '$infid' wurden gelöscht.</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	352	echo "<br /><br />\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	353
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	354	// Anzeigen geloeschter Infodaten
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	355	echo "<p class='green'><b>DELETE: Daten zu '".$inf["iname"]."' wurden erfolgreich gelöscht.</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	356	include ("inc/info_dat_show.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	357	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	358	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	359	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	360	echo "<p class='red'><b>DELETE: Daten zu '".$inf["iname"]."' konnten nicht gelöscht werden!</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	361	echo "sql = $sql<br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	362	echo "error DELETE: " . $dbc->error . "<br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	363	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	364	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	365	else //INSERT oder UPDATE
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	366	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	367	//daten speichern
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	368	$userid = $_SESSION["userid"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	369	$inf["iname"] = substr($inf["iname"],0,300);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	370	$inf["ilong"] = substr($inf["ilong"],0,8000);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	371	$inf["sort"] = substr($inf["sort"],0,10); // 28.03.2012 5 -> 10 Zeichen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	372	if ($inf["ityp"] == -1) $inf["ityp"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	373
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	374	if ($inf["persknr"] < "!") $inf["pers"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	375	if ($inf["infrel"] == -1) $inf["infrel"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	376	if ($inf["lang"] == -1) $inf["lang"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	377	if ($inf["ifname"] < "!") $inf["ifname"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	378
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	379	if ($inf["cdat"] == "") $inf["cdat"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	380	if ($inf["vdat"] == "") $inf["vdat"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	381	if ($inf["bdat"] == "") $inf["bdat"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	382	if ($inf["fg"] == -1) $inf["fg"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	383	if (isset($inf['betr']) && $inf['betr']) $betrag = dbformat_wert($inf['betr']); else $betrag = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	384
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	385	if (!isset($dbc) \|\| !$dbc) $dbc = new dbconnection();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	386
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	387	$stmt = $dbc -> stmtinit();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	388	if (is_object($stmt))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	389	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	390	if ($infid)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	391	{ //UPDATE
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	392
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	393	$stmt -> prepare("UPDATE fhiiqm.Info SET
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	394	info_name_s = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	395	info_name_l = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	396	info_date = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	397	info_valid_from = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	398	info_valid_to = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	399	infotyp_ID = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	400	persknr = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	401	lang = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	402	info_freigabe_ID = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	403	info_sort = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	404	info_rel_ID = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	405	betrag = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	406	userid = ?
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	407	WHERE info_ID = $infid");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	408	$stmt -> bind_param('sssssiisisids',$inf["iname"],$inf["ilong"],$inf["cdat"],$inf["vdat"],$inf["bdat"],$inf["ityp"],$inf["pers"],$inf["lang"],$inf["fg"],$inf["sort"],$inf["infrel"],$betrag,$userid);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	409	$result = $stmt -> execute();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	410	if ($stmt->error) echo "error UPDATE Info: " . $stmt->error . "<br><br>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	411	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	412	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	413	{ //INSERT
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	414	$stmt -> prepare ("INSERT INTO Info (info_name_s,info_name_l,info_date,info_valid_from,info_valid_to,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	415	infotyp_ID,persknr,lang,info_freigabe_ID,info_sort,info_rel_ID,betrag,userid) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?)");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	416	$stmt -> bind_param('sssssiisisids', $inf["iname"],$inf["ilong"],$inf["cdat"],$inf["vdat"],$inf["bdat"],$inf["ityp"],$inf["pers"],$inf["lang"],$inf["fg"],$inf["sort"],$inf["infrel"],$betrag,$userid);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	417	$result = $stmt -> execute();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	418
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	419	if ($stmt->error) echo "error INSERT Info: " . $stmt->error . "<br><br>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	420	if ($result)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	421	{ // INSERT o.k.
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	422	// info_ID ermitteln
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	423	$infid = $dbc -> insertId();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	424	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	425	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	426	} // stmt-Objekt
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	427	if ($result)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	428	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	429	// upload Files
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	430	if ($infid) include ("inc/info_file.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	431	// n:m Tabellen INSERT
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	432	if ($ret && $retf) include ("inc/info_tab_ins.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	433	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	434	if ($result && $retf && $ret && $reta && $retp && $retv) // INSERT/UPDATE Info
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	435	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	436	//Eingabe Daten, Upload File erfolgreich
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	437	echo "<p class='green'><b>Infodaten zu ID '$infid' wurden erfolgreich gespeichert.</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	438	echo "<br /><br />\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	439
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	440	// Anzeigen gespeicherte Infodaten
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	441	include ("inc/info_dat_show.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	442	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	443	} // INSERT / UPDATE
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	444	echo "</div>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	445	echo "<p class='sc'>   <a href=\"info_flist.php?$getp\" target=\"_self\" title=\"Infoliste\">Infoliste</a></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	446	echo "<p class='sc'>   <a href=\"".$_SERVER["PHP_SELF"]."\" target=\"_self\" title=\"Info erfassen\">Weitere Info erfassen</a></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	447
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	448	} // Form o.k. und submit
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	449	?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	450
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	451	</body>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	452	</html>

author	Bettina Schwarzer
	Fri, 05 Feb 2016 14:03:40 +0100
changeset 44	d652bbba2d43
parent 40	6f4b105daa24
permissions	-rw-r--r--