IQM: fhiiqm/info_ed3.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 Geschaeftverteilungsplan
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 ("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	$zeil = $_GET["z"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	27	if (!$zeil) $zeil = 10; // Anzahl der gezeigten Zeilen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	28	$start = $_GET["st"]; // Start bei DS $start+1
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	29	if (!$start) $start=0;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	30	$sort = $_GET["s"]; // Sortierung nach Spalte
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	31	$dir = $_GET["d"]; // Sortierrichtung
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	32	$fnum = $_GET["f"]; // Spaltennummer, nach der aktuell gefiltert wird
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	33	$filter = $_GET["b"]; // Filterbegriff
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	34	// $_GET-Parameter zurück zur Infoliste mit den selben Einstellungen wie zuvor
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	35	$getp = "s=$sort&d=$dir&f=$fnum&b=$filter&st=$start&z=$zeil";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	36
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	37	$ityp = $_GET["t"]; // t=6 - Geschaeftsverteilungsplan
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	38
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	39	$infid = $_GET["i"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	40	$del = $_POST["del"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	41	$sub = $_POST["eintragen"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	42	$dup = $_POST["dup"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	43	if (!$dup) $dup = $_GET["d"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	44	$copy = $_GET["c"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	45	$inf = $_POST["inf"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	46	$ok = $_POST["ok"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	47	if (!$inf["okn"]) $ok = false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	48	$duptext="";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	49
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	50	// print_r($inf); echo "<br /><br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	51
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	52	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/dbconnect.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	53	include_once($_SERVER['DOCUMENT_ROOT'] ."/fhiiqm/inc/func_lib.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	54	$dbc = new dbconnection();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	55
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	56	if ($dup)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	57	{ // Info duplizieren
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	58	$tab = "Info";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	59	$key = "info_ID";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	60	$val = $infid;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	61	// $ret=1;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	62	$ret = duplicate_record ($tab, $key, $val);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	63	if ($ret)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	64	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	65	$infid_new=$ret;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	66	// Infofilename loeschen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	67	$sql = "UPDATE fhiiqm.Info SET info_file = NULL WHERE info_ID = $infid_new";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	68	$retf = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	69	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	70
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	71	// duplizieren Produkte
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	72	$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	73	$retp = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	74	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	75
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	76	// duplizieren Adressat
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	77	$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	78	$reta = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	79	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	80
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	81	// duplizieren Verantwortliche
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	82	$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	83	$retv = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	84	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	85
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	86	if ($ret && $retf && $retp && $reta && $retv)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	87	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	88	$addr = $_SERVER["PHP_SELF"] . "?i=$infid_new&c=1&$getp";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	89	header("Location: $addr");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	90	exit;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	91	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	92	else $duptext = " - Fehler beim Duplizieren von ". $inf["iname"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	93	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	94	else $duptext = " - Fehler beim Duplizieren von ". $inf["iname"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	95	}
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	<!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	99	<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	100
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	101	<head>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	102	<meta http-equiv="content-type" content="text/html; charset=iso-8859-1" />
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	103	<link href="css/db.css" rel="STYLESHEET" type="TEXT/CSS" media="screen"/>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	104	<link href="css/db_print.css" rel="STYLESHEET" type="TEXT/CSS" media="print"/>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	105	<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	106	<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	107	<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	108
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	109	<title>Edit Geschäftsverteilungsplan</title>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	110	</head>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	111
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	112	<body>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	113
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	114	<script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	115	function split( val ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	116	return val.split( /;\s*/ );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	117	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	118	function extractLast( term ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	119	return split( term ).pop();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	120	}
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	$(function() {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	123	$("#titel").focus();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	124	$("#persknr").autocomplete({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	125	source: "/fhiiqm/inc/ma_list_ac.inc.php",
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	126	minLength: 2,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	127	select: function(event,ui){$("#pid").val(ui.item.id);}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	128	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	129	$("#vpers")
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	130	.bind( "keydown", function( event ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	131	if ( event.keyCode === $.ui.keyCode.TAB &&
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	132	$( this ).data( "autocomplete" ).menu.active ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	133	event.preventDefault();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	134	// alert ("bind: "+event.keyCode);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	135	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	136	})
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	137	.autocomplete({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	138	// source: "/fhiiqm/inc/ma_list_ac.inc.php",
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	139	// minLength: 2,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	140	// select: function(event,ui){$("#pid").val(ui.item.id);}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	141	source: function( request, response ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	142	$.getJSON( "/fhiiqm/inc/ma_list_ac.inc.php", {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	143	term: extractLast( request.term )
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	144	}, response );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	145	},
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	146	focus: function() {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	147	// prevent value inserted on focus
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	148	return false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	149	},
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	150	select: function( event, ui ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	151	if (this.value.length < 6) // zuvor Feld-id 'vpers' geleert und bis zu 5 Zeichen eingegeben
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	152	{ $("#vpid").val("");}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	153	var terms = split( this.value );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	154	// alert ("eingabe: "+terms+ ", ids="+idstr.valueOf());
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	155	// remove the current input
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	156	terms.pop();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	157	// add the selected item
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	158	terms.push( ui.item.value );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	159	// add placeholder to get the comma-and-space at the end
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	160	terms.push( "" );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	161	// alert ("select: "+terms+ "ids = "+$("#vpid").val());
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	162	this.value = terms.join( "; " );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	163
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	164	var ids = $("#vpid").val().split(",");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	165	ids.push(ui.item.id);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	166	ids.join(",");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	167	// alert (ids);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	168	$("#vpid").val(ids);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	169	return false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	170	},
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	171	change: function(event, ui){
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	172	// alert ("change: "+ui.item.value+","+ ui.item.id);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	173	},
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	174	search: function() {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	175	// custom minLength
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	176	var term = extractLast( this.value );
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	177	if ( term.length < 2 ) {
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	178	return false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	179	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	180	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	181	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	182	$("#cdat").datepicker({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	183	dateFormat: 'yy-mm-dd', //nur Datum
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	184	yearRange: '2000:2025',
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	185	changeMonth: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	186	changeYear: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	187	firstDay: 1,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	188	dayNamesMin: ['So','Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa' ],
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	189	monthNamesShort: ['Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez']
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	190	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	191	$("#vdat").datepicker({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	192	dateFormat: 'yy-mm-dd', //nur Datum
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	193	yearRange: '2000:2025',
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	194	changeMonth: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	195	changeYear: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	196	firstDay: 1,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	197	dayNamesMin: ['So','Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa' ],
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	198	monthNamesShort: ['Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez']
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	199	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	200	$("#bdat").datepicker({
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	201	dateFormat: 'yy-mm-dd', //nur Datum
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	202	yearRange: '2000:2025',
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	203	changeMonth: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	204	changeYear: true,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	205	firstDay: 1,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	206	dayNamesMin: ['So','Mo', 'Di', 'Mi', 'Do', 'Fr', 'Sa' ],
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	207	monthNamesShort: ['Jan','Feb','Mar','Apr','Mai','Jun','Jul','Aug','Sep','Okt','Nov','Dez']
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	208	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	209	$("input[id='persknr']").addClass("long20");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	210	$("input[id='cdat']").addClass("long10");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	211	$("input[id='vdat']").addClass("long10");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	212	$("input[id='bdat']").addClass("long10");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	213	});
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	214	function addInputf(divId,anz){
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	215	var cdiv = document.createElement('div');
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	216	var idl = "cbl_" + anz;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	217	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	218	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	219	cdiv.innerHTML += "<img src='/fhiiqm/img/nixt.gif' border='0' height='100%' />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	220	//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	221	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	222	cdiv.innerHTML += "<label id='lb' for='del'> löschen</label></span>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	223	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	224	document.getElementById(divId).appendChild(cdiv);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	225	var delcb = document.getElementById('del');
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	226	delcb.id = "del_" + anz;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	227	delcb.style.display = 'none';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	228	var lcb = document.getElementById('lb');
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	229	lcb.id = "lb_" + anz;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	230	lcb.setAttribute("for", delcb.id);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	231	lcb.style.display = 'none';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	232	counter++;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	233	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	234	function markdelInput(divId,anz){
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	235	for (i=1; i<anz; i++)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	236	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	237	var id = "del_" + i;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	238	var delcb = document.getElementById(id);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	239	delcb.style.display = 'inline';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	240	var idl = "lb_" + i;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	241	var lcb = document.getElementById(idl);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	242	lcb.style.display = 'inline';
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	243	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	244	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	245	</script>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	246
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	247	<?php
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	248	echo " ";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	249	echo "<div class=\"float-br smaller\" valign='top'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	250	echo "   user: " . $_SESSION["userid"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	251	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	252	echo "<div class=\"float-r\"><img src=\"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	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	echo "<div align='center'>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	256	if ($infid) $text = "editieren"; else $text = "erfassen";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	257	if ($copy) $duptext = " (Kopie)";
41 9c668cd391fa + Gast als MA-Typ, Erweiterungen Projekt, Key, Telefonliste Bettina Schwarzer parents: 40 diff changeset	258	echo "<h3>Geschäftsverteilungsplan $text$duptext</h3>";
40 6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	259
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	260	echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	261
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	262	//Filename wenn Upload?
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	263	if (isset($_FILES["ifile"]["error"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	264	foreach ($_FILES["ifile"]["error"] as $key => $err)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	265	if ($err == 0 && !$inf["ifname"][$key]) $ok = $ok && false;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	266
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	267	if (!$ok \|\| (!$sub && !$del && !$dup))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	268	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	269	if ($infid && (!$sub \|\| !$del) && !isset($inf))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	270	{ // update
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	271	$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	272	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	273	CONCAT(nachname,', ',vorname) AS aname,i.timestamp,i.userid
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	274	FROM fhiiqm.Info i LEFT OUTER JOIN fhiiqm.Mitarbeiter m
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	275	ON i.persknr=m.persknr
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	276	WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	277	if ($result = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	278	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	279	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	280	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	281	$inf["infid"] = $infid;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	282	$inf["iname"] = $row->info_name_s;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	283	$inf["ilong"] = $row->info_name_l;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	284	$inf["cdat"] = $row->info_date;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	285	$inf["vdat"] = $row->info_valid_from;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	286	$inf["bdat"] = $row->info_valid_to;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	287	$inf["ityp"] = $row->infotyp_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	288	$inf["persknr"] = $row->aname;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	289	$inf["pers"] = $row->persknr;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	290	$inf["infrel"] = $row->info_rel_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	291	// $inf["ifname"] = $row->info_file;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	292	$inf["lang"] = $row->lang;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	293	$inf["fg"] = $row->info_freigabe_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	294	$inf["sort"] = $row->info_sort;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	295	$inf["betr"] = str_replace('.',',',$row->betrag);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	296	$inf["tstmp"] = $row->timestamp;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	297	$inf["uid"] = $row->userid;
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	// Produkt
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	301	$sql = "SELECT produkt_ID FROM Info_Produkt WHERE info_ID = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	302	if ($result = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	303	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	304	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	305	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	306	$inf['prid'][] = $row->produkt_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	307	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	308	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	309	// Adressat
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	310	$sql = "SELECT info_adr_ID FROM Info_Adressat WHERE info_id = $infid";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	311	if ($result = $dbc->queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	312	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	313	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	314	$inf["adr"][] = $row->info_adr_ID;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	315	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	316	// Verantwortlicher
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	317	$sql = "SELECT iv.persknr,prioritaet, CONCAT (nachname, ', ',vorname) as ma
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	318	FROM Info_Verantwortlich iv INNER JOIN Mitarbeiter m ON iv.persknr=m.persknr
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	319	WHERE info_id = $infid
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	320	ORDER BY 3";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	321	if ($result = $dbc->queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	322	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	323	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	324	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	325	$inf["vpers"] .= $row->ma . "; ";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	326	$inf["vpn"] .= $row->persknr .",";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	327	// $inf["prio"][] = $row->prioritaet;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	328	$inf["prio"][$row->persknr] = $row->prioritaet;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	329	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	330	$inf["vpn"] = substr($inf["vpn"],0,strlen($inf["vpn"])-1);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	331	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	332	// Dokumente
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	333	$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	334	if ($result = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	335	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	336	foreach ($result as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	337	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	338	$inf["ifname"][] = $row->if_filename;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	339	$inf["swort"][] = $row->if_schlagwort;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	340	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	341	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	342	// print_r($inf); echo "<br /><br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	343
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	344	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	345	include($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/form/info_form3.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	346	if ($sub \|\| $del)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	347	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	348	if ($sub)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	349	$frage = "Alle Angaben ok?";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	350	elseif ($del)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	351	$frage = "Information wirklich löschen?";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	352	echo "<tr>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	353	<td class=\"red\" valign=\"top\" align=\"left\">$frage</td>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	354	<td><input type=\"checkbox\" name=\"ok\" value=\"1\"";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	355	if ($ok) echo "checked=\"checked\"";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	356	echo " /></td>\n</tr>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	357	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	358	if (!is_null($_SESSION["recht"]) && in_array("ie",$_SESSION["recht"]))
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 "
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	361	<tr><td> </td>\n
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	362	<td><input class=\"button\" type=\"submit\" name=\"eintragen\" value=\" eintragen \" />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	363	if ($infid)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	364	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	365	echo "   <input class=\"buttonr\" type=\"submit\" value=\"löschen\" name=\"del\" title=\"delete\" />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	366	echo "   <input class=\"button\" type=\"submit\" value=\"duplizieren\" name=\"dup\" title=\"delete\" />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	367	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	368	echo "</td></tr>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	369	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	370	echo "</table>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	371	echo "</div>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	372	// if (!is_null($_SESSION["recht"]) && !in_array("le", $_SESSION["recht"]))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	373	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	374	echo "</form>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	375	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	376	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	377	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	378	echo "<div align='center'>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	379
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	380	if ($del)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	381	{ // loescht auch m:n - Tabellen wegen Loeschweitergabe
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	382	$sql = "DELETE FROM Info WHERE info_ID = '$infid'";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	383	$retdi = $dbc -> execute($sql);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	384	if ($retdi)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	385	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	386	// alte Namen Infodocumente
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	387	$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	388	if ($res = $dbc -> queryObjectArray($sql))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	389	foreach ($res as $row)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	390	$ifile_old[] = $row->if_filename;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	391
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	392	include_once ("inc/file_upload.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	393	foreach ($inf['ifname'] as $key => $filename)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	394	$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	395	if ($retdf) echo "<p class='green'><b>Infodokument zu ID '$infid' wurde gelöscht.</b></p>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	396	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	397	echo "<br /><br />\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	398
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	399	// Anzeigen geloeschter Infodaten
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	400	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	401	include ("inc/info_dat_show.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	402	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	403	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	404	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	405	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	406	echo "sql = $sql<br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	407	echo "error DELETE: " . $dbc->error . "<br />";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	408	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	409	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	410	else //INSERT oder UPDATE
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	411	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	412	//daten speichern
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	413	$userid = $_SESSION["userid"];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	414	$inf["iname"] = substr($inf["iname"],0,300);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	415	$inf["ilong"] = substr($inf["ilong"],0,8000);
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	416	$inf["sort"] = substr($inf["sort"],0,10); // 28.03.2012 5 -> 10 Zeichen
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	417	if ($inf["ityp"] == -1) $inf["ityp"] = null;
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 ($inf["persknr"] < "!") $inf["pers"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	420	if ($inf["infrel"] == -1) $inf["infrel"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	421	if ($inf["lang"] == -1) $inf["lang"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	422	if ($inf["ifname"] < "!") $inf["ifname"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	423
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	424	if ($inf["cdat"] == "") $inf["cdat"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	425	if ($inf["vdat"] == "") $inf["vdat"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	426	if ($inf["bdat"] == "") $inf["bdat"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	427	if ($inf["fg"] == -1) $inf["fg"] = null;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	428	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	429
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	430	if (!isset($dbc) \|\| !$dbc) $dbc = new dbconnection();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	431
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	432	$stmt = $dbc -> stmtinit();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	433	if (is_object($stmt))
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	434	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	435	if ($infid)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	436	{ //UPDATE
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	437
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	438	$stmt -> prepare("UPDATE fhiiqm.Info SET
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	439	info_name_s = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	440	info_name_l = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	441	info_date = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	442	info_valid_from = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	443	info_valid_to = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	444	infotyp_ID = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	445	persknr = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	446	lang = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	447	info_freigabe_ID = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	448	info_sort = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	449	info_rel_ID = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	450	betrag = ?,
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	451	userid = ?
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	452	WHERE info_ID = $infid");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	453	$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	454	$result = $stmt -> execute();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	455	if ($stmt->error) echo "error UPDATE Info: " . $stmt->error . "<br><br>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	456	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	457	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	458	{ //INSERT
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	459	$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	460	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	461	$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	462	$result = $stmt -> execute();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	463
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	464	if ($stmt->error) echo "error INSERT Info: " . $stmt->error . "<br><br>\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	465	if ($result)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	466	{ // INSERT o.k.
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	467	// info_ID ermitteln
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	468	$infid = $dbc -> insertId();
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	469	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	470	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	471	} // stmt-Objekt
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	472	if ($result)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	473	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	474	// upload Files
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	475	if ($infid) include ("inc/info_file.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	476	// n:m Tabellen INSERT
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	477	if ($ret && $retf) include ("inc/info_tab_ins.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	478
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	479	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	480	if ($result && $retf && $ret && $reta && $retp && $retv) // INSERT/UPDATE Info
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	481	{
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	482	//Eingabe Daten, Upload File erfolgreich
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	483	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	484	echo "<br /><br />\n";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	485
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	486	// Anzeigen gespeicherte Infodaten
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	487	if ($fname)
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	488	$ifile = $infid . "_" . $fname;
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	489	else
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	490	$ifile = $inf['ifname'];
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	491	include ("inc/info_dat_show.inc.php");
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	492	}
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	493	} // INSERT / UPDATE
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	494	echo "</div>";
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	495	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	496	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	497
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	498	} // Form o.k. und submit
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	499	?>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	500
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	501	</body>
6f4b105daa24 +Keytyp Korrekturen, LDAP Authentifizierung Bettina Schwarzer parents: 38 diff changeset	502	</html>

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