2000-08-18 05:24:22 +02:00
|
|
|
<?phpphp_track_vars?>
|
|
|
|
<?php
|
|
|
|
/**************************************************************************\
|
|
|
|
* phpGroupWare - Calendar *
|
|
|
|
* http://www.phpgroupware.org *
|
|
|
|
* Based on Webcalendar by Craig Knudsen <cknudsen@radix.net> *
|
|
|
|
* http://www.radix.net/~cknudsen *
|
|
|
|
* -------------------------------------------- *
|
|
|
|
* This program is free software; you can redistribute it and/or modify it *
|
|
|
|
* under the terms of the GNU General Public License as published by the *
|
|
|
|
* Free Software Foundation; either version 2 of the License, or (at your *
|
|
|
|
* option) any later version. *
|
|
|
|
\**************************************************************************/
|
|
|
|
|
|
|
|
/* $Id$ */
|
2000-11-16 08:56:58 +01:00
|
|
|
$phpgw_info["flags"] = array("currentapp" => "calendar", "enable_calendar_class" => True,
|
|
|
|
"noheader" => True, "nonavbar" => True, "enable_nextmatchs_class" => True);
|
2000-08-18 05:24:22 +02:00
|
|
|
include("../header.inc.php");
|
|
|
|
|
|
|
|
if ($id > 0) {
|
|
|
|
$phpgw->db->query("SELECT cal_date FROM webcal_entry WHERE cal_id = $id");
|
|
|
|
// date format is 19991231
|
|
|
|
$phpgw->db->next_record();
|
|
|
|
|
|
|
|
$thisyear = (int)($phpgw->db->f(0) / 10000);
|
|
|
|
$thismonth = ($phpgw->db->f(0) / 100) % 100;
|
|
|
|
|
|
|
|
$phpgw->db->query("DELETE FROM webcal_entry WHERE cal_id = $id");
|
|
|
|
$phpgw->db->query("DELETE FROM webcal_entry_user WHERE cal_id = $id");
|
|
|
|
$phpgw->db->query("DELETE FROM webcal_entry_repeats WHERE cal_id = $id");
|
|
|
|
$phpgw->db->query("DELETE FROM webcal_entry_groups WHERE cal_id = $id");
|
|
|
|
}
|
|
|
|
|
2000-09-05 08:35:34 +02:00
|
|
|
Header("Location: " . $phpgw->link("index.php","year=$thisyear&month=$thismonth"));
|
|
|
|
?>
|