2001-07-16 13:38:40 +02:00
< ? php
/************************************************************************** \
* phpGroupWare - Calendar *
* http :// www . phpgroupware . org *
* Based on Webcalendar by Craig Knudsen < cknudsen @ radix . net > *
* http :// www . radix . net /~ cknudsen *
* Modified by Mark Peters < skeeter @ phpgroupware . org > *
* -------------------------------------------- *
* 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$ */
class uicalendar
{
var $template ;
var $template_dir ;
var $bo ;
var $cat ;
var $holidays ;
var $holiday_color ;
var $debug = False ;
2001-08-13 03:34:32 +02:00
// var $debug = True;
2001-07-16 13:38:40 +02:00
var $cat_id ;
2001-08-13 16:11:07 +02:00
var $tz_offset ;
var $theme ;
2001-07-16 13:38:40 +02:00
var $public_functions = array (
'mini_calendar' => True ,
'index' => True ,
'month' => True ,
'week' => True ,
'year' => True ,
'view' => True ,
'edit' => True ,
2001-07-28 15:17:30 +02:00
'add' => True ,
2001-07-18 19:32:10 +02:00
'delete' => True ,
'preferences' => True ,
2001-07-22 01:35:22 +02:00
'day' => True ,
'edit_status' => True ,
'set_action' => True ,
2001-07-28 15:17:30 +02:00
'planner' => True ,
'matrixselect' => True ,
'viewmatrix' => True ,
'search' => True ,
2001-07-22 01:35:22 +02:00
'header' => True ,
'footer' => True
2001-07-16 13:38:40 +02:00
);
function uicalendar ()
{
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw' ] -> browser = CreateObject ( 'phpgwapi.browser' );
2001-08-13 16:11:07 +02:00
$this -> theme = $GLOBALS [ 'phpgw_info' ][ 'theme' ];
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
$this -> bo = CreateObject ( 'calendar.bocalendar' , 1 );
2001-08-13 16:11:07 +02:00
$this -> tz_offset = $this -> bo -> datetime -> tz_offset ;
2001-07-16 13:38:40 +02:00
2001-07-22 01:35:22 +02:00
if ( $this -> debug )
{
echo " BO Owner : " . $this -> bo -> owner . " <br> \n " ;
}
2001-08-12 16:47:23 +02:00
$this -> template = $GLOBALS [ 'phpgw' ] -> template ;
$this -> template_dir = $GLOBALS [ 'phpgw' ] -> common -> get_tpl_dir ( 'calendar' );
2001-07-16 13:38:40 +02:00
$this -> cat = CreateObject ( 'phpgwapi.categories' );
2001-08-13 16:11:07 +02:00
$this -> holiday_color = ( substr ( $this -> theme [ 'bg07' ], 0 , 1 ) == '#' ? '' : '#' ) . $this -> theme [ 'bg07' ];
2001-07-16 13:38:40 +02:00
$this -> cat_id = $this -> bo -> cat_id ;
2001-07-18 19:32:10 +02:00
if ( $this -> bo -> use_session )
{
$this -> save_sessiondata ();
}
2001-07-16 13:38:40 +02:00
if ( $this -> debug )
{
$this -> _debug_sqsof ();
}
}
/* Public functions */
2001-08-13 06:49:19 +02:00
function mini_calendar ( $params )
2001-07-16 13:38:40 +02:00
{
2001-08-13 06:49:19 +02:00
if ( ! is_array ( $params ))
{
return ;
}
if ( ! isset ( $params [ 'link' ]))
{
$params [ 'link' ] = '' ;
}
if ( ! isset ( $params [ 'buttons' ]))
{
$params [ 'button' ] = 'none' ;
}
if ( ! isset ( $params [ 'outside_month' ]))
{
$params [ 'outside_month' ] = True ;
}
2001-07-18 19:32:10 +02:00
$this -> bo -> read_holidays ();
2001-07-16 13:38:40 +02:00
2001-08-13 06:49:19 +02:00
$date = $this -> bo -> datetime -> makegmttime ( 0 , 0 , 0 , $params [ 'month' ], $params [ 'day' ], $params [ 'year' ]);
$month_ago = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $params [ 'month' ] - 1 , $params [ 'day' ], $params [ 'year' ])));
$month_ahead = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $params [ 'month' ] + 1 , $params [ 'day' ], $params [ 'year' ])));
$monthstart = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $params [ 'month' ], 1 , $params [ 'year' ])));
$monthend = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $params [ 'month' ] + 1 , 0 , $params [ 'year' ])));
2001-07-16 13:38:40 +02:00
2001-08-13 06:49:19 +02:00
$weekstarttime = $this -> bo -> datetime -> get_weekday_start ( $params [ 'year' ], $params [ 'month' ], 1 );
2001-07-16 13:38:40 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'remove' );
2001-08-06 04:41:36 +02:00
$p -> set_file (
Array (
'mini_calendar' => 'mini_cal.tpl'
)
2001-07-16 13:38:40 +02:00
);
$p -> set_block ( 'mini_calendar' , 'mini_cal' , 'mini_cal' );
$p -> set_block ( 'mini_calendar' , 'mini_week' , 'mini_week' );
$p -> set_block ( 'mini_calendar' , 'mini_day' , 'mini_day' );
2001-07-18 19:32:10 +02:00
if ( $this -> bo -> printer_friendly == False )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$month = '<a href="' . $this -> page ( 'month' , '&month=' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'm' ) . '&year=' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'Y' )) . '" class="minicalendar">' . lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'F' )) . ' ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'Y' ) . '</a>' ;
2001-07-16 13:38:40 +02:00
}
else
{
2001-08-12 16:47:23 +02:00
$month = lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'F' )) . ' ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'Y' );
2001-07-16 13:38:40 +02:00
}
$var = Array (
2001-08-12 16:47:23 +02:00
'cal_img_root' => $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'mini-calendar-bar.gif' ),
2001-08-13 16:11:07 +02:00
'bgcolor' => $this -> theme [ 'bg_color' ],
'bgcolor1' => $this -> theme [ 'bg_color' ],
2001-07-16 13:38:40 +02:00
'month' => $month ,
2001-08-13 16:11:07 +02:00
'bgcolor2' => $this -> theme [ 'cal_dayview' ],
2001-07-16 13:38:40 +02:00
'holiday_color' => $this -> holiday_color
);
$p -> set_var ( $var );
2001-08-13 06:49:19 +02:00
switch ( strtolower ( $params [ 'buttons' ]))
2001-07-16 13:38:40 +02:00
{
case 'right' :
$var = Array (
2001-08-12 16:47:23 +02:00
'nextmonth' => '<a href="' . $this -> page ( 'month' , '&date=' . $month_ahead ) . '"><img src="' . $GLOBALS [ 'phpgw' ] -> common -> image ( 'phpgwapi' , 'right.gif' ) . '" border="0"></a>'
2001-07-16 13:38:40 +02:00
);
break ;
case 'left' :
$var = Array (
2001-08-12 16:47:23 +02:00
'prevmonth' => '<a href="' . $this -> page ( 'month' , '&date=' . $month_ago ) . '"><img src="' . $GLOBALS [ 'phpgw' ] -> common -> image ( 'phpgwapi' , 'left.gif' ) . '" border="0"></a>'
2001-07-16 13:38:40 +02:00
);
break ;
case 'both' :
$var = Array (
2001-08-12 16:47:23 +02:00
'prevmonth' => '<a href="' . $this -> page ( 'month' , '&date=' . $month_ago ) . '"><img src="' . $GLOBALS [ 'phpgw' ] -> common -> image ( 'phpgwapi' , 'left.gif' ) . '" border="0"></a>' ,
'nextmonth' => '<a href="' . $this -> page ( 'month' , '&date=' . $month_ahead ) . '"><img src="' . $GLOBALS [ 'phpgw' ] -> common -> image ( 'phpgwapi' , 'right.gif' ) . '" border="0"></a>'
2001-07-16 13:38:40 +02:00
);
break ;
case 'none' :
default :
$var = Array (
'prevmonth' => '' ,
'nextmonth' => ''
);
break ;
}
$p -> set_var ( $var );
for ( $i = 0 ; $i < 7 ; $i ++ )
{
2001-08-06 04:41:36 +02:00
$var = Array (
'dayname' => '<b>' . substr ( lang ( $this -> bo -> datetime -> days [ $i ]), 0 , 2 ) . '</b>' ,
'day_image' => ''
);
$this -> output_template_array ( $p , 'daynames' , 'mini_day' , $var );
2001-07-16 13:38:40 +02:00
}
$today = date ( 'Ymd' , time ());
unset ( $date );
for ( $i = $weekstarttime ; date ( 'Ymd' , $i ) <= $monthend ; $i += ( 24 * 3600 * 7 ))
{
unset ( $var );
$daily = $this -> bo -> set_week_array ( $i , $cellcolor , $weekly );
@ reset ( $daily );
while ( list ( $date , $day_params ) = each ( $daily ))
{
2001-07-28 15:17:30 +02:00
if ( $this -> debug )
{
echo 'Mini-Cal Date : ' . $date . " <br> \n " ;
}
2001-07-16 13:38:40 +02:00
$year = intval ( substr ( $date , 0 , 4 ));
$month = intval ( substr ( $date , 4 , 2 ));
$day = intval ( substr ( $date , 6 , 2 ));
$str = '' ;
2001-08-13 06:49:19 +02:00
if (( $date >= $monthstart && $date <= $monthend ) || $params [ 'outside_month' ] == True )
2001-07-16 13:38:40 +02:00
{
2001-08-13 06:49:19 +02:00
if ( ! $this -> bo -> printer_friendly && $params [ 'link' ])
2001-07-16 13:38:40 +02:00
{
2001-08-13 06:49:19 +02:00
$str = '<a href="' . $this -> page ( $params [ 'link' ], '&date=' . $date ) . '" class="' . $day_params [ 'class' ] . '">' . $day . '</a>' ;
2001-07-16 13:38:40 +02:00
}
else
{
$str = $day ;
}
}
$var [] = Array (
'day_image' => $day_params [ 'day_image' ],
'dayname' => $str
);
}
for ( $l = 0 ; $l < count ( $var ); $l ++ )
{
$this -> output_template_array ( $p , 'monthweek_day' , 'mini_day' , $var [ $l ]);
}
$p -> parse ( 'display_monthweek' , 'mini_week' , True );
$p -> set_var ( 'dayname' , '' );
$p -> set_var ( 'monthweek_day' , '' );
}
$return_value = $p -> fp ( 'out' , 'mini_cal' );
unset ( $p );
return $return_value ;
}
2001-07-28 15:17:30 +02:00
function index ( $params = '' )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
Header ( 'Location: ' . $this -> page ( '' , $params ));
2001-08-13 23:12:16 +02:00
$GLOBALS [ 'phpgw' ] -> common -> phpgw_exit ();
2001-07-16 13:38:40 +02:00
}
function month ()
{
2001-07-18 19:32:10 +02:00
$this -> bo -> read_holidays ();
2001-07-16 13:38:40 +02:00
$m = mktime ( 0 , 0 , 0 , $this -> bo -> month , 1 , $this -> bo -> year );
2001-08-13 06:49:19 +02:00
if ( ! $this -> bo -> printer_firendly || ( $this -> bo -> printer_friendly && @ $this -> bo -> prefs [ 'calendar' ][ 'display_minicals' ]))
{
$minical_prev = $this -> mini_calendar (
Array (
'day' => 1 ,
'month' => $this -> bo -> month - 1 ,
'year' => $this -> bo -> year ,
'link' => 'day'
)
);
$minical_next = $this -> mini_calendar (
Array (
'day' => 1 ,
'month' => $this -> bo -> month + 1 ,
'year' => $this -> bo -> year ,
'link' => 'day'
)
);
}
else
{
$minical_prev = '' ;
$minical_next = '' ;
}
2001-07-18 19:32:10 +02:00
if ( ! $this -> bo -> printer_friendly )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappfooter' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-16 13:38:40 +02:00
$printer = '' ;
2001-07-18 19:32:10 +02:00
$param = '&year=' . $this -> bo -> year . '&month=' . $this -> bo -> month . '&friendly=1' ;
2001-07-16 13:38:40 +02:00
$print = '<a href="' . $this -> page ( 'month' . $param ) . " \" TARGET= \" cal_printer_friendly \" onMouseOver= \" window.status = ' " . lang ( 'Generate printer-friendly version' ) . " ' \" >[ " . lang ( 'Printer Friendly' ) . ']</a>' ;
}
else
{
$printer = '<body bgcolor="' . $phpgw_info [ 'theme' ][ 'bg_color' ] . '">' ;
$print = '' ;
2001-07-28 15:17:30 +02:00
$phpgw_info [ 'flags' ][ 'nofooter' ] = True ;
2001-07-16 13:38:40 +02:00
}
$var = Array (
'printer_friendly' => $printer ,
2001-08-13 16:11:07 +02:00
'bg_text' => $this -> theme [ 'bg_text' ],
2001-07-16 13:38:40 +02:00
'small_calendar_prev' => $minical_prev ,
2001-07-28 15:17:30 +02:00
'month_identifier' => lang ( strftime ( " %B " , $m )) . ' ' . $this -> bo -> year ,
2001-08-12 16:47:23 +02:00
'username' => $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $this -> bo -> owner ),
2001-07-16 13:38:40 +02:00
'small_calendar_next' => $minical_next ,
2001-07-18 19:32:10 +02:00
'large_month' => $this -> display_month ( $this -> bo -> month , $this -> bo -> year , True , $this -> bo -> owner ),
2001-07-16 13:38:40 +02:00
'print' => $print
);
2001-07-28 15:17:30 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'remove' );
2001-08-06 04:41:36 +02:00
$p -> set_file (
Array (
'index_t' => 'index.tpl'
)
2001-07-28 15:17:30 +02:00
);
2001-07-18 19:32:10 +02:00
$p -> set_var ( $var );
$p -> pparse ( 'out' , 'index_t' );
2001-07-16 13:38:40 +02:00
}
function week ()
{
2001-07-18 19:32:10 +02:00
$this -> bo -> read_holidays ();
2001-07-16 13:38:40 +02:00
$next = $this -> bo -> datetime -> makegmttime ( 0 , 0 , 0 , $this -> bo -> month , $this -> bo -> day + 7 , $this -> bo -> year );
$prev = $this -> bo -> datetime -> makegmttime ( 0 , 0 , 0 , $this -> bo -> month , $this -> bo -> day - 7 , $this -> bo -> year );
2001-08-13 06:49:19 +02:00
if ( ! $this -> bo -> printer_firendly || ( $this -> bo -> printer_friendly && @ $this -> bo -> prefs [ 'calendar' ][ 'display_minicals' ]))
{
$minical_this = $this -> mini_calendar (
Array (
'day' => $this -> bo -> day ,
'month' => $this -> bo -> month ,
'year' => $this -> bo -> year ,
'link' => 'day' ,
'butons' => 'none' ,
'outside_month' => False
)
);
$minical_prev = $this -> mini_calendar (
Array (
'day' => $this -> bo -> day ,
'month' => $this -> bo -> month - 1 ,
'year' => $this -> bo -> year ,
'link' => 'day' ,
'butons' => 'left' ,
'outside_month' => False
)
);
$minical_next = $this -> mini_calendar (
Array (
'day' => $this -> bo -> day ,
'month' => $this -> bo -> month + 1 ,
'year' => $this -> bo -> year ,
'link' => 'day' ,
'butons' => 'right' ,
'outside_month' => False
)
);
}
else
{
$minical_this = '' ;
$minical_prev = '' ;
$minical_next = '' ;
}
2001-07-18 19:32:10 +02:00
if ( ! $this -> bo -> printer_friendly )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-18 19:32:10 +02:00
$printer = '' ;
2001-07-28 15:17:30 +02:00
$prev_week_link = '<a href="' . $this -> page ( 'week' , '&date=' . $prev [ 'full' ]) . '"><<</a>' ;
$next_week_link = '<a href="' . $this -> page ( 'week' , '&date=' . $next [ 'full' ]) . '">>></a>' ;
$print = '<a href="' . $this -> page ( 'week' , '&friendly=1' ) . " \" TARGET= \" cal_printer_friendly \" onMouseOver= \" window.status = ' " . lang ( 'Generate printer-friendly version' ) . " ' \" >[ " . lang ( 'Printer Friendly' ) . ']</a>' ;
2001-07-16 13:38:40 +02:00
}
else
{
2001-08-13 16:11:07 +02:00
$printer = '<body bgcolor="' . $this -> theme [ 'bg_color' ] . '">' ;
2001-07-16 13:38:40 +02:00
$prev_week_link = '<<' ;
$next_week_link = '>>' ;
2001-07-18 19:32:10 +02:00
$print = '' ;
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nofooter' ] = True ;
2001-07-16 13:38:40 +02:00
}
$var = Array (
2001-07-18 19:32:10 +02:00
'printer_friendly' => $printer ,
2001-08-13 16:11:07 +02:00
'bg_text' => $this -> theme [ 'bg_text' ],
2001-07-16 13:38:40 +02:00
'small_calendar_prev' => $minical_prev ,
'prev_week_link' => $prev_week_link ,
'small_calendar_this' => $minical_this ,
2001-07-28 15:17:30 +02:00
'week_identifier' => $this -> bo -> get_week_label (),
2001-07-16 13:38:40 +02:00
'next_week_link' => $next_week_link ,
2001-08-12 16:47:23 +02:00
'username' => $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $this -> bo -> owner ),
2001-07-16 13:38:40 +02:00
'small_calendar_next' => $minical_next ,
2001-08-12 16:47:23 +02:00
'week_display' => $this -> display_weekly (
2001-08-13 06:49:19 +02:00
Array (
'date' => sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $this -> bo -> day ),
'showyear' => true ,
'owners' => $this -> bo -> owner
)
),
2001-07-18 19:32:10 +02:00
'print' => $print
2001-07-16 13:38:40 +02:00
);
2001-07-28 15:17:30 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-08-06 04:41:36 +02:00
$p -> set_file (
Array (
'week_t' => 'week.tpl'
)
2001-07-28 15:17:30 +02:00
);
2001-07-16 13:38:40 +02:00
$p -> set_var ( $var );
$p -> pparse ( 'out' , 'week_t' );
}
function year ()
{
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> printer_friendly )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
$print = '' ;
$left_link = '<a href="' . $this -> page ( 'year' , '&year=' . ( $this -> bo -> year - 1 )) . '"><<</a>' ;
$right_link = '<a href="' . $this -> page ( 'year' , '&year=' . ( $this -> bo -> year + 1 )) . '">>></a>' ;
2001-07-16 13:38:40 +02:00
$link = 'day.php' ;
2001-07-28 15:17:30 +02:00
$printer = '<a href="' . $this -> page ( 'year' , '&friendly=1' ) . '" target="cal_printer_friendly" onMouseOver="window.status = ' . " ' " . lang ( 'Generate printer-friendly version' ) . " ' " . '">[' . lang ( 'Printer Friendly' ) . ']</a>' ;
2001-07-16 13:38:40 +02:00
}
else
{
2001-08-13 16:11:07 +02:00
$print = '<body bgcolor="' . $this -> theme [ 'bg_color' ] . '">' ;
2001-07-28 15:17:30 +02:00
$left_link = '' ;
$right_link = '' ;
2001-07-16 13:38:40 +02:00
$link = '' ;
2001-07-28 15:17:30 +02:00
$printer = '' ;
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nofooter' ] = True ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
$var = Array (
'print' => $print ,
'left_link' => $left_link ,
2001-08-13 16:11:07 +02:00
'font' => $this -> theme [ 'font' ],
2001-07-28 15:17:30 +02:00
'year_text' => $this -> bo -> year ,
'right_link' => $right_link ,
'printer_friendly' => $printer
);
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-08-06 04:41:36 +02:00
$p -> set_file (
Array (
'year_t' => 'year.tpl'
)
2001-07-28 15:17:30 +02:00
);
$p -> set_block ( 'year_t' , 'year' , 'year' );
$p -> set_block ( 'year_t' , 'month' , 'month' );
$p -> set_block ( 'year_t' , 'month_sep' , 'month_sep' );
$p -> set_var ( $var );
for ( $i = 1 ; $i <= 12 ; $i ++ )
2001-07-16 13:38:40 +02:00
{
2001-08-13 06:49:19 +02:00
$p -> set_var ( 'mini_month' , $this -> mini_calendar (
Array (
'day' => 1 ,
'month' => $i ,
'year' => $this -> bo -> year ,
'link' => $link ,
'buttons' => 'none' ,
'outside_month' => False
)
)
);
2001-07-28 15:17:30 +02:00
$p -> parse ( 'row' , 'month' , True );
$p -> set_var ( 'mini_month' , '' );
if (( $i % 3 ) == 0 )
{
$p -> parse ( 'row' , 'month_sep' , True );
}
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
$p -> pparse ( 'out' , 'year_t' );
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
function view ( $vcal_id = 0 )
2001-07-16 13:38:40 +02:00
{
2001-08-17 02:24:20 +02:00
global $HTTP_GET_VARS ;
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
echo '<center>' ;
2001-07-16 13:38:40 +02:00
2001-08-12 16:47:23 +02:00
$cal_id = $vcal_id ? $vcal_id : $HTTP_GET_VARS [ 'cal_id' ];
2001-07-28 15:17:30 +02:00
2001-07-16 13:38:40 +02:00
// First, make sure they have permission to this entry
if ( $cal_id < 1 )
{
2001-07-28 15:17:30 +02:00
echo lang ( 'Invalid entry id.' ) . '</center>' ;
return ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> check_perms ( PHPGW_ACL_READ ))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
echo lang ( 'You do not have permission to read this record!' ) . '</center>' ;
return ;
2001-07-16 13:38:40 +02:00
}
$event = $this -> bo -> read_entry ( $cal_id );
2001-07-30 00:09:24 +02:00
if ( ! isset ( $event [ 'id' ]))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
echo lang ( " Sorry, this event does not exist " ) . '.' . '</center>' ;
return ;
}
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
echo $this -> view_event ( $event );
2001-07-30 00:09:24 +02:00
if ( $this -> bo -> owner == $event [ 'owner' ])
2001-07-28 15:17:30 +02:00
{
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-08-06 04:41:36 +02:00
$p -> set_file (
Array (
'form_button' => 'form_button_script.tpl'
)
2001-07-28 15:17:30 +02:00
);
2001-07-30 00:09:24 +02:00
if ( $this -> bo -> check_perms ( PHPGW_ACL_EDIT ))
{
$var = Array (
'action_url_button' => $this -> page ( 'edit' , '&cal_id=' . $cal_id ),
'action_text_button' => lang ( 'Edit' ),
'action_confirm_button' => '' ,
'action_extra_field' => ''
);
$p -> set_var ( $var );
echo $p -> fp ( 'out' , 'form_button' );
}
if ( $this -> bo -> check_perms ( PHPGW_ACL_DELETE ))
{
$var = Array (
'action_url_button' => $this -> page ( 'delete' , '&cal_id=' . $cal_id ),
'action_text_button' => lang ( 'Delete' ),
'action_confirm_button' => " onClick= \" return confirm(' " . lang ( " Are you sure \\ nyou want to \\ ndelete this entry ? \\ n \\ nThis will delete \\ nthis entry for all users. " ) . " ') \" " ,
'action_extra_field' => ''
);
$p -> set_var ( $var );
echo $p -> fp ( 'out' , 'form_button' );
}
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
echo '</center>' ;
2001-07-16 13:38:40 +02:00
}
2001-08-12 16:47:23 +02:00
function edit ( $params = '' )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
global $HTTP_GET_VARS ;
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> check_perms ( PHPGW_ACL_EDIT ))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$this -> no_edit ();
2001-07-16 13:38:40 +02:00
}
2001-08-12 16:47:23 +02:00
if ( $params != '' && @ isset ( $params [ 'readsess' ]))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$event = $this -> bo -> restore_from_appsession ;
$can_edit = True ;
2001-08-12 16:47:23 +02:00
$this -> edit_form (
Array (
'event' => $event ,
'cd' => $params [ 'cd' ]
)
);
2001-07-16 13:38:40 +02:00
}
2001-08-12 16:47:23 +02:00
elseif ( isset ( $HTTP_GET_VARS [ 'cal_id' ]))
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$cal_id = $HTTP_GET_VARS [ 'cal_id' ];
$event = $this -> bo -> read_entry ( intval ( $HTTP_GET_VARS [ 'cal_id' ]));
2001-07-18 19:32:10 +02:00
$can_edit = $this -> bo -> can_user_edit ( $event );
2001-07-28 15:17:30 +02:00
if ( ! $can_edit )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$this -> view ( intval ( $HTTP_GET_VAR [ 'cal_id' ]));
2001-07-16 13:38:40 +02:00
}
2001-08-12 16:47:23 +02:00
$this -> edit_form (
Array (
'event' => $event ,
'cd' => $cd
)
);
2001-07-16 13:38:40 +02:00
}
2001-08-12 16:47:23 +02:00
}
2001-07-28 15:17:30 +02:00
2001-08-06 04:41:36 +02:00
function add ( $cd = 0 , $readsess = 0 )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
global $HTTP_GET_VARS ;
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> check_perms ( PHPGW_ACL_ADD ))
{
$this -> index ();
}
2001-08-06 04:41:36 +02:00
if ( $readsess )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$event = $this -> bo -> restore_from_appsession ;
2001-07-30 00:09:24 +02:00
if ( ! $event [ 'owner' ])
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$this -> bo -> add_attribute ( 'owner' , $this -> bo -> owner );
2001-07-16 13:38:40 +02:00
}
$can_edit = True ;
}
else
{
2001-07-18 19:32:10 +02:00
$this -> bo -> event_init ();
$this -> bo -> add_attribute ( 'id' , 0 );
2001-07-16 13:38:40 +02:00
$can_edit = True ;
2001-08-12 16:47:23 +02:00
$thishour = ( isset ( $HTTP_GET_VARS [ 'hour' ]) ? intval ( $HTTP_GET_VARS [ 'hour' ]) : 0 );
$thisminute = ( isset ( $HTTP_GET_VARS [ 'minute' ]) ? intval ( $HTTP_GET_VARS [ 'minute' ]) : 0 );
2001-07-18 19:32:10 +02:00
$this -> bo -> set_start ( $this -> bo -> year , $this -> bo -> month , $this -> bo -> day , $thishour , $thisminute , 0 );
$this -> bo -> set_end ( $this -> bo -> year , $this -> bo -> month , $this -> bo -> day , $thishour , $thisminute , 0 );
$this -> bo -> set_title ( '' );
$this -> bo -> set_description ( '' );
$this -> bo -> add_attribute ( 'priority' , 2 );
2001-07-28 15:17:30 +02:00
if ( @ $this -> bo -> prefs [ 'calendar' ][ 'default_private' ])
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$this -> bo -> set_class ( False );
2001-07-16 13:38:40 +02:00
}
else
{
2001-07-18 19:32:10 +02:00
$this -> bo -> set_class ( True );
2001-07-16 13:38:40 +02:00
}
2001-07-30 00:09:24 +02:00
$this -> bo -> add_attribute ( 'participants' , 'A' , $this -> bo -> owner );
2001-07-18 19:32:10 +02:00
$this -> bo -> set_recur_none ();
$event = $this -> bo -> get_cached_event ();
2001-07-16 13:38:40 +02:00
}
2001-08-12 16:47:23 +02:00
$this -> edit_form (
Array (
'event' => $event ,
'cd' => $cd
)
);
2001-07-28 15:17:30 +02:00
}
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
function delete ()
{
2001-08-17 02:24:20 +02:00
global $HTTP_GET_VARS ;
2001-08-12 16:47:23 +02:00
if ( ! isset ( $HTTP_GET_VARS [ 'cal_id' ]))
{
2001-08-13 23:12:16 +02:00
Header ( 'Location: ' . $this -> page ( '' , '&date=' . sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $this -> bo -> day )));
$GLOBALS [ 'phpgw' ] -> common -> phpgw_exit ();
2001-08-12 16:47:23 +02:00
}
2001-08-13 23:12:16 +02:00
$event = $this -> bo -> read_entry ( intval ( $HTTP_GET_VARS [ 'cal_id' ]));
if (( $HTTP_GET_VARS [ 'cal_id' ] > 0 ) && ( $event [ 'owner' ] == $this -> bo -> owner ) && $this -> bo -> check_perms ( PHPGW_ACL_DELETE ))
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
$date = sprintf ( " %04d%02d%02d " , $event [ 'start' ][ 'year' ], $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ]);
2001-07-16 13:38:40 +02:00
2001-08-13 23:12:16 +02:00
$cd = $this -> bo -> delete_entry ( intval ( $HTTP_GET_VARS [ 'cal_id' ]));
2001-07-28 15:17:30 +02:00
$this -> bo -> expunge ();
2001-07-16 13:38:40 +02:00
}
else
{
2001-07-28 15:17:30 +02:00
$date = sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $this -> bo -> day );
$cd = '' ;
2001-07-16 13:38:40 +02:00
}
2001-08-13 16:11:07 +02:00
Header ( 'Location: ' . $this -> page ( '' , '&date=' . $date . ( $cd ? '&cd=' . $cd : '' )));
2001-08-13 23:12:16 +02:00
$GLOBALS [ 'phpgw' ] -> common -> phpgw_exit ();
2001-07-28 15:17:30 +02:00
}
function day ()
{
$this -> bo -> read_holidays ();
2001-08-13 06:49:19 +02:00
if ( ! $this -> bo -> printer_firendly || ( $this -> bo -> printer_friendly && @ $this -> bo -> prefs [ 'calendar' ][ 'display_minicals' ]))
{
$minical = $this -> mini_calendar (
Array (
'day' => $this -> bo -> day ,
'month' => $this -> bo -> month ,
'year' => $this -> bo -> year ,
'link' => 'day'
)
);
}
else
{
$minical = '' ;
}
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> printer_friendly )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
$printer = '' ;
2001-08-12 16:47:23 +02:00
$param = '&date=' . sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $this -> bo -> day ) . '&friendly=1' ;
2001-07-28 15:17:30 +02:00
$print = '<a href="' . $this -> page ( 'day' . $param ) . " \" TARGET= \" cal_printer_friendly \" onMouseOver= \" window.status = ' " . lang ( 'Generate printer-friendly version' ) . " ' \" >[ " . lang ( 'Printer Friendly' ) . ']</a>' ;
2001-07-16 13:38:40 +02:00
}
else
{
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nofooter' ] = True ;
2001-08-13 16:11:07 +02:00
$printer = '<body bgcolor="' . $this -> theme [ 'bg_color' ] . '">' ;
2001-07-28 15:17:30 +02:00
$print = '' ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
$now = $this -> bo -> datetime -> makegmttime ( 0 , 0 , 0 , $this -> bo -> month , $this -> bo -> day , $this -> bo -> year );
2001-08-13 16:11:07 +02:00
$now [ 'raw' ] += $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
$m = mktime ( 0 , 0 , 0 , $this -> bo -> month , 1 , $this -> bo -> year );
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_file (
Array (
'day_t' => 'day.tpl'
)
);
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
$var = Array (
'printer_friendly' => $printer ,
2001-08-12 16:47:23 +02:00
'bg_text' => $GLOBALS [ 'phpgw_info' ][ 'themem' ][ 'bg_text' ],
'daily_events' => $this -> print_day (
Array (
'year' => $this -> bo -> year ,
'month' => $this -> bo -> month ,
'day' => $this -> bo -> day
)
),
2001-07-28 15:17:30 +02:00
'small_calendar' => $minical ,
'date' => lang ( date ( 'F' , $m )) . ' ' . sprintf ( " %02d " , $this -> bo -> day ) . ', ' . $this -> bo -> year ,
2001-08-12 16:47:23 +02:00
'username' => $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $owner ),
2001-07-28 15:17:30 +02:00
'print' => $print
2001-07-16 13:38:40 +02:00
);
2001-07-28 15:17:30 +02:00
$p -> set_var ( $var );
$p -> pparse ( 'out' , 'day_t' );
}
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
function edit_status ()
{
2001-08-17 02:24:20 +02:00
global $HTTP_GET_VARS ;
2001-07-16 13:38:40 +02:00
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappheader' ] = True ;
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappfooter' ] = True ;
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
2001-08-12 16:47:23 +02:00
$event = $this -> bo -> read_entry ( $HTTP_GET_VARS [ 'cal_id' ]);
2001-07-16 13:38:40 +02:00
2001-07-30 00:09:24 +02:00
reset ( $event [ 'participants' ]);
2001-07-28 15:17:30 +02:00
2001-08-20 02:10:16 +02:00
if ( ! $event [ 'participants' ][ $this -> bo -> owner ])
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
echo '<center>The user ' . $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $this -> bo -> owner ) . ' is not participating in this event!</center>' ;
2001-07-28 15:17:30 +02:00
return ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> check_perms ( PHPGW_ACL_EDIT ))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$this -> no_edit ();
return ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
2001-08-13 16:11:07 +02:00
$freetime = $this -> bo -> datetime -> localdates ( mktime ( 0 , 0 , 0 , $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ], $event [ 'start' ][ 'year' ]) - $this -> tz_offset );
2001-08-12 16:47:23 +02:00
echo $this -> timematrix (
Array (
'date' => $freetime ,
'starttime' => $this -> bo -> splittime ( '000000' , False ),
'endtime' => 0 ,
'participants' => $event [ 'participants' ]
)
);
2001-07-28 15:17:30 +02:00
2001-08-17 05:03:44 +02:00
$event = $this -> bo -> read_entry ( $HTTP_GET_VARS [ 'cal_id' ]);
2001-07-28 15:17:30 +02:00
echo $this -> view_event ( $event );
2001-07-30 00:09:24 +02:00
echo $this -> get_response ( $event [ 'id' ]);
2001-07-28 15:17:30 +02:00
}
function set_action ()
{
2001-08-12 16:47:23 +02:00
global $HTTP_GET_VARS ;
2001-07-28 15:17:30 +02:00
if ( ! $this -> bo -> check_perms ( PHPGW_ACL_EDIT ))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$this -> no_edit ();
return ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
2001-08-12 16:47:23 +02:00
$this -> bo -> set_status ( intval ( $HTTP_GET_VARS [ 'cal_id' ]), intval ( $HTTP_GET_VARS [ 'action' ]));
2001-07-28 15:17:30 +02:00
Header ( 'Location: ' . $this -> page ( '' , '' ));
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
function planner ()
2001-07-18 19:32:10 +02:00
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
$html = CreateObject ( 'infolog.html' );
$sbox = CreateObject ( 'phpgwapi.sbox' );
$intervals_per_day = 3 ; // this should be configurable
$interval = Array (
14 => 1 ,
15 => 1 ,
16 => 1 ,
17 => 1 ,
18 => 2 ,
19 => 2 ,
20 => 2 ,
21 => 2 ,
22 => 2 ,
23 => 2
);
2001-07-18 19:32:10 +02:00
2001-08-13 16:11:07 +02:00
$startdate = mktime ( 0 , 0 , 0 , $this -> bo -> month , 1 , $this -> bo -> year ) - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
$days = $this -> bo -> datetime -> days_in_month ( $this -> bo -> month , $this -> bo -> year );
2001-08-13 16:11:07 +02:00
$enddate = mktime ( 23 , 59 , 59 , $this -> bo -> month , $this -> bo -> days , $this -> bo -> year ) - $this -> tz_offset ;
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$header [] = lang ( 'Category' );
for ( $d = 1 ; $d <= $days ; $d ++ )
{
$dayname = substr ( lang ( date ( 'D' , mktime ( 0 , 0 , 0 , $this -> bo -> month , $d , $this -> bo -> year ))), 0 , 2 );
2001-08-06 04:41:36 +02:00
$header [ '.' . $d ] = 'colspan="' . $intervals_per_day . '" align="center"' ;
2001-07-28 15:17:30 +02:00
$header [ $d ] = '<a href="' . $html -> link ( '/index.php' ,
array (
'menuaction' => 'calendar.uicalendar.add' ,
'date' => sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $d )
)
) . '">' . $dayname . '<br>' . $d . '</a>' ;
}
$last_cell = $intervals_per_day * $days - 1 ;
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
$this -> bo -> store_to_cache (
Array (
'syear' => $this -> bo -> year ,
'smonth' => $this -> bo -> month ,
'sday' => 1 ,
2001-08-17 02:24:20 +02:00
'eyear' => $this -> bo -> year ,
'emonth' => $this -> bo -> month ,
'eday' => $days
2001-08-13 03:34:32 +02:00
)
);
2001-07-28 15:17:30 +02:00
$firstday = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $this -> bo -> month , 1 , $this -> bo -> year )));
2001-08-17 02:24:20 +02:00
$lastday = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $this -> bo -> month , $days , $this -> bo -> year )));
2001-07-28 15:17:30 +02:00
2001-08-06 05:36:58 +02:00
$this -> bo -> remove_doubles_in_cache ( $firstday , $lastday );
$rows = array ();
2001-08-17 02:24:20 +02:00
for ( $v = $firstday ; $v <= $lastday ; $v ++ )
2001-07-28 15:17:30 +02:00
{
$daily = $this -> bo -> cached_events [ $v ];
@ reset ( $daily );
if ( $this -> debug )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
echo " For Date : $v : Count of items : " . count ( $daily ) . " <br> \n " ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
for ( $g = 0 ; $g < count ( $daily ); $g ++ )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$event = $daily [ $g ];
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$view = $html -> link ( '/index.php' ,
array (
'menuaction' => 'calendar.uicalendar.view' ,
2001-07-30 00:09:24 +02:00
'cal_id' => $event [ 'id' ]
2001-07-28 15:17:30 +02:00
)
);
2001-08-06 05:36:58 +02:00
$start_cell = $intervals_per_day * ( $event [ 'start' ][ 'mday' ] - 1 );
2001-07-30 00:09:24 +02:00
$start_cell += $interval [ $event [ 'start' ][ 'hour' ]];
2001-07-28 15:17:30 +02:00
2001-08-06 05:36:58 +02:00
$end_cell = $intervals_per_day * ( $event [ 'end' ][ 'mday' ] - 1 );
2001-07-30 00:09:24 +02:00
$end_cell += $interval [ $event [ 'end' ][ 'hour' ]];
2001-07-28 15:17:30 +02:00
$i = 0 ; // search for row of parent category
do {
++ $i ;
2001-07-30 00:09:24 +02:00
if ( $c = $event [ 'category' ])
2001-07-28 15:17:30 +02:00
{
2001-07-30 00:09:24 +02:00
$cat = $this -> planner_category ( $event [ 'category' ]);
2001-07-28 15:17:30 +02:00
if ( $cat [ 'parent' ])
{
$pcat = $this -> planner_category ( $c = $cat [ 'parent' ]);
}
else
{
$pcat = $cat ;
}
}
else
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$cat = $pcat = array ( 'name' => lang ( 'none' ));
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
$k = $c . '_' . $i ;
$ka = '.nr_' . $k ;
if ( ! isset ( $rows [ $k ]))
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $i > 1 ) // further line - no name
{
$rows [ $k ] = array ();
2001-08-06 04:41:36 +02:00
$rows [ $c . '_1' ][ '._name' ] = 'rowspan="' . $i . '"' ;
2001-07-28 15:17:30 +02:00
}
else
{
$rows [ $k ][ '_name' ] = $pcat [ 'name' ];
}
$rows [ $ka ] = 0 ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
$row = & $rows [ $k ];
$akt_cell = & $rows [ $ka ];
} while ( $akt_cell > $start_cell );
if ( $akt_cell < $start_cell )
{
$row [ $event -> id . '_1' ] = ' ' ;
2001-08-06 04:41:36 +02:00
$row [ '.' . $event [ 'id' ] . '_1' ] = 'colspan="' . ( $start_cell - $akt_cell ) . '"' ;
2001-07-18 19:32:10 +02:00
}
2001-07-30 00:09:24 +02:00
$opt = & $row [ '.' . $event [ 'id' ] . '_2' ];
$cel = & $row [ $event [ 'id' ] . '_2' ];
2001-07-28 15:17:30 +02:00
if ( $start_cell < $end_cell )
{
$opt .= " colspan= " . ( 1 + $end_cell - $start_cell );
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
if ( $bgcolor = $cat [ 'color' ])
{
2001-08-06 05:36:58 +02:00
$opt .= ' bgcolor="' . $bgcolor . '"' ;
2001-07-28 15:17:30 +02:00
}
2001-07-30 00:09:24 +02:00
$opt .= ' title="' . $event [ 'title' ];
if ( $event [ 'description' ])
2001-07-28 15:17:30 +02:00
{
2001-07-30 00:09:24 +02:00
$opt .= " \n " . $event [ 'description' ];
2001-07-28 15:17:30 +02:00
}
$opt .= '" onClick="location=\'' . $view . '\'"' ;
$cel = '<a href="' . $view . '">' ;
2001-07-30 00:09:24 +02:00
if ( $event [ 'priority' ] == 3 )
2001-07-28 15:17:30 +02:00
{
2001-08-06 05:36:58 +02:00
$cel .= $html -> image ( 'calendar' , 'mini-calendar-bar.gif' , '' , 'border="0"' );
2001-07-28 15:17:30 +02:00
}
2001-08-06 05:36:58 +02:00
$cel .= $html -> image ( 'calendar' , count ( $event [ 'participants' ]) > 1 ? 'multi_3.gif' : 'single.gif' , $this -> planner_participants ( $event [ 'participants' ]), 'border="0"' );
2001-07-28 15:17:30 +02:00
$cel .= '</a>' ;
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$akt_cell = $end_cell + 1 ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
ksort ( $rows );
while ( list ( $k , $r ) = each ( $rows ))
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
if ( is_array ( $r ))
{
2001-08-12 16:47:23 +02:00
$rows [ '.' . $k ] = 'bgcolor="' . $GLOBALS [ 'phpgw' ] -> nextmatchs -> alternate_row_color () . '"' ;
2001-07-28 15:17:30 +02:00
$row = & $rows [ $k ];
$akt_cell = & $rows [ '.nr_' . $k ];
if ( $akt_cell <= $last_cell )
{
$row [ '3' ] = ' ' ;
2001-08-06 04:41:36 +02:00
$row [ '.3' ] = 'colspan="' . ( 1 + $last_cell - $akt_cell ) . '"' ;
2001-07-28 15:17:30 +02:00
}
}
2001-07-18 19:32:10 +02:00
}
}
2001-08-13 16:11:07 +02:00
$bgcolor = 'bgcolor="' . $this -> theme [ 'th_bg' ] . '"' ;
2001-07-28 15:17:30 +02:00
echo $html -> table (
array (
'_h' => $header ,
'._h' => $bgcolor
) + $rows ,
2001-08-06 04:41:36 +02:00
'width="100%" cols="' . ( 1 + $days * $intervals_per_day ) . '"'
2001-07-28 15:17:30 +02:00
);
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
function matrixselect ()
{
2001-08-13 16:11:07 +02:00
$datetime = mktime ( 0 , 0 , 0 , $this -> bo -> month , $this -> bo -> day , $this -> bo -> year ) - $this -> tz_offset ;
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$sb = CreateObject ( 'phpgwapi.sbox' );
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_file (
Array (
'mq' => 'matrix_query.tpl' ,
'form_button' => 'form_button_script.tpl'
)
);
$p -> set_block ( 'mq' , 'matrix_query' , 'matrix_query' );
$p -> set_block ( 'mq' , 'list' , 'list' );
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$vars = Array (
'matrix_action' => lang ( 'Daily Matrix View' ),
'action_url' => $this -> page ( 'viewmatrix' )
);
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$p -> set_var ( $vars );
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
// Date
$var [] = Array (
'field' => lang ( 'Date' ),
2001-08-12 16:47:23 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> dateformatorder (
$sb -> getYears ( 'year' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $datetime , 'Y' )), intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $datetime , 'Y' ))),
$sb -> getMonthText ( 'month' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $datetime , 'n' ))),
$sb -> getDays ( 'day' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $datetime , 'd' )))
2001-07-28 15:17:30 +02:00
)
);
// View type
$var [] = Array (
'field' => lang ( 'View' ),
'data' => '<select name="matrixtype">' . " \n "
. '<option value="free/busy" selected>' . lang ( 'free/busy' ) . '</option>' . " \n "
. '<option value="weekly">' . lang ( 'Weekly' ) . '</option>' . " \n "
. '</select>' . " \n "
);
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
// Participants
2001-08-12 16:47:23 +02:00
$accounts = $GLOBALS [ 'phpgw' ] -> acl -> get_ids_for_location ( 'run' , 1 , 'calendar' );
2001-07-28 15:17:30 +02:00
$users = Array ();
for ( $i = 0 ; $i < count ( $accounts ); $i ++ )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$user = $accounts [ $i ];
if ( ! isset ( $users [ $user ]))
2001-07-18 19:32:10 +02:00
{
2001-08-12 16:47:23 +02:00
$users [ $user ] = $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $user );
if ( $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( $user ) == 'g' )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
$group_members = $GLOBALS [ 'phpgw' ] -> acl -> get_ids_for_location ( $user , 1 , 'phpgw_group' );
2001-07-28 15:17:30 +02:00
if ( $group_members != False )
{
for ( $j = 0 ; $j < count ( $group_members ); $j ++ )
{
if ( ! isset ( $users [ $group_members [ $j ]]))
{
2001-08-12 16:47:23 +02:00
$users [ $group_members [ $j ]] = $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $group_members [ $j ]);
2001-07-28 15:17:30 +02:00
}
}
}
}
2001-07-18 19:32:10 +02:00
}
}
2001-07-28 15:17:30 +02:00
if ( $num_users > 50 )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$size = 15 ;
}
elseif ( $num_users > 5 )
{
$size = 5 ;
2001-07-18 19:32:10 +02:00
}
else
{
2001-07-28 15:17:30 +02:00
$size = $num_users ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
$str = '' ;
@ asort ( $users );
@ reset ( $users );
while ( $user = each ( $users ))
{
2001-08-12 16:47:23 +02:00
if (( $GLOBALS [ 'phpgw' ] -> accounts -> exists ( $user [ 0 ]) && $this -> bo -> check_perms ( PHPGW_ACL_READ , $user [ 0 ])) || $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( $user [ 0 ]) == 'g' )
2001-07-18 19:32:10 +02:00
{
2001-08-12 16:47:23 +02:00
$str .= ' <option value="' . $user [ 0 ] . '">(' . $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( $user [ 0 ]) . ') ' . $user [ 1 ] . '</option>' . " \n " ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
}
$var [] = Array (
'field' => lang ( 'Participants' ),
'data' => " \n " . ' <select name="participants[]" multiple size="' . $size . '">' . " \n " . $str . ' </select>' . " \n "
);
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
for ( $i = 0 ; $i < count ( $var ); $i ++ )
{
$this -> output_template_array ( $p , 'rows' , 'list' , $var [ $i ]);
}
$vars = Array (
'submit_button' => lang ( 'Submit' ),
'action_url_button' => '' ,
'action_text_button' => lang ( 'Cancel' ),
'action_confirm_button' => 'onClick="history.back(-1)"' ,
'action_extra_field' => ''
);
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$p -> set_var ( $vars );
$p -> parse ( 'cancel_button' , 'form_button' );
$p -> pparse ( 'out' , 'matrix_query' );
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
function viewmatrix ()
{
2001-08-17 02:24:20 +02:00
global $HTTP_POST_VARS ;
2001-08-12 16:47:23 +02:00
$participants = $HTTP_POST_VARS [ 'participants' ];
2001-07-28 15:17:30 +02:00
$parts = Array ();
$acct = CreateObject ( 'phpgwapi.accounts' , $this -> bo -> owner );
2001-08-12 16:47:23 +02:00
$c_participants = count ( $participants );
for ( $i = 0 ; $i < $c_participants ; $i ++ )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
switch ( $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( $participants [ $i ]))
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
case 'g' :
$members = $acct -> members ( intval ( $participants [ $i ]));
while ( $members != False && list ( $index , $member ) = each ( $members ))
{
if ( $this -> bo -> check_perms ( PHPGW_ACL_READ , $member [ 'account_id' ]) && ! isset ( $parts [ $member [ 'account_id' ]]))
{
$parts [ $member [ 'account_id' ]] = 1 ;
}
}
break ;
case 'u' :
if ( $this -> bo -> check_perms ( PHPGW_ACL_READ , $participants [ $i ]) && ! isset ( $parts [ $participants [ $i ]]))
{
$parts [ $participants [ $i ]] = 1 ;
}
break ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
}
unset ( $acct );
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
$participants = Array ();
reset ( $parts );
while ( list ( $key , $value ) = each ( $parts ))
{
$participants [] = $key ;
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
reset ( $participants );
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
switch ( $HTTP_POST_VARS [ 'matrixtype' ])
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
case 'free/busy' :
$freetime = $this -> bo -> datetime -> makegmttime ( 0 , 0 , 0 , $this -> bo -> month , $this -> bo -> day , $this -> bo -> year );
2001-08-12 16:47:23 +02:00
echo $this -> timematrix (
Array (
'date' => $freetime ,
'starttime' => $this -> bo -> splittime ( '000000' , False ),
'endtime' => 0 ,
'participants' => $parts
)
);
2001-07-28 15:17:30 +02:00
break ;
case 'weekly' :
2001-08-12 16:47:23 +02:00
echo $this -> display_weekly (
Array (
'date' => sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $this -> bo -> day ),
'showyear' => true ,
'owners' => $participants
)
);
2001-07-28 15:17:30 +02:00
break ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
echo " \n " . '<center>' . " \n " ;
echo ' <form action="' . $this -> page ( 'viewmatrix' ) . '" method="post" name="matrixform" target="viewmatrix">' . " \n " ;
echo ' <input type="hidden" name="year" value="' . $this -> bo -> year . '">' . " \n " ;
echo ' <input type="hidden" name="month" value="' . $this -> bo -> month . '">' . " \n " ;
echo ' <input type="hidden" name="day" value="' . $this -> bo -> day . '">' . " \n " ;
2001-08-12 16:47:23 +02:00
echo ' <input type="hidden" name="matrixtype" value="' . $HTTP_POST_VARS [ 'matrixtype' ] . '">' . " \n " ;
reset ( $parts );
while ( list ( $key , $value ) = each ( $parts ))
2001-07-18 19:32:10 +02:00
{
2001-08-12 16:47:23 +02:00
echo ' <input type="hidden" name="participants[]" value="' . $key . '">' . " \n " ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
echo ' <input type="submit" value="' . lang ( 'refresh' ) . '">' . " \n " ;
echo ' </form>' . " \n " ;
echo '</center>' . " \n " ;
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
function search ()
{
2001-08-17 02:24:20 +02:00
global $HTTP_POST_VARS ;
2001-08-12 16:47:23 +02:00
if ( ! $HTTP_POST_VARS [ 'keywords' ])
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
// If we reach this, it is because they didn't search for anything,
// attempt to send them back to where they where.
2001-08-12 16:47:23 +02:00
Header ( 'Location: ' . $phpgw -> link ( $from ));
2001-07-18 19:32:10 +02:00
}
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
$error = '' ;
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
if ( strlen ( $HTTP_POST_VARS [ 'keywords' ]) == 0 )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
echo '<b>' . lang ( 'Error' ) . ':</b>' ;
echo lang ( 'You must enter one or more search keywords.' );
return ;
2001-07-18 19:32:10 +02:00
}
2001-07-28 15:17:30 +02:00
$matches = 0 ;
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
// There is currently a problem searching in with repeated events.
// It spits back out the date it was entered. I would like to to say that
// it is a repeated event.
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
// This has been solved by the little icon indicator for recurring events.
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
$event_ids = $this -> bo -> search_keywords ( $HTTP_POST_VARS [ 'keywords' ]);
2001-07-28 15:17:30 +02:00
$ids = Array ();
while ( list ( $key , $id ) = each ( $event_ids ))
{
$event = $this -> bo -> read_entry ( $id );
2001-08-13 16:11:07 +02:00
$datetime = $this -> bo -> maketime ( $event [ 'start' ]) - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
2001-07-30 00:09:24 +02:00
$ids [ strval ( $event [ 'id' ])] ++ ;
2001-08-12 16:47:23 +02:00
$info [ strval ( $event [ 'id' ])] = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $datetime ) . $this -> link_to_entry ( $event , $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ], $event [ 'start' ][ 'year' ]);
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
}
$matches = count ( $event_ids );
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
if ( $matches > 0 )
{
$matches = count ( $ids );
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
if ( $matches == 1 )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$quantity = lang ( '1 match found' ) . '.' ;
}
elseif ( $matches > 0 )
{
$quantity = lang ( 'x matches found' , $matches ) . '.' ;
2001-07-18 19:32:10 +02:00
}
else
{
2001-08-13 16:11:07 +02:00
echo '<b>' . lang ( 'Error' ) . ':</b>' . lang ( 'no matches found.' );
2001-07-28 15:17:30 +02:00
return ;
2001-07-18 19:32:10 +02:00
}
2001-07-16 13:38:40 +02:00
2001-07-22 01:35:22 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'search_form' => 'search.tpl'
)
2001-07-22 01:35:22 +02:00
);
2001-07-28 15:17:30 +02:00
$p -> set_block ( 'search_form' , 'search' , 'search' );
$p -> set_block ( 'search_form' , 'search_list_header' , 'search_list_header' );
$p -> set_block ( 'search_form' , 'search_list' , 'search_list' );
$p -> set_block ( 'search_form' , 'search_list_footer' , 'search_list_footer' );
2001-07-18 19:32:10 +02:00
$var = Array (
2001-08-13 16:11:07 +02:00
'color' => $this -> theme [ 'bg_text' ],
2001-07-28 15:17:30 +02:00
'search_text' => lang ( 'Search Results' ),
'quantity' => $quantity
2001-07-18 19:32:10 +02:00
);
$p -> set_var ( $var );
2001-07-28 15:17:30 +02:00
if ( $matches > 0 )
2001-07-22 01:35:22 +02:00
{
2001-07-28 15:17:30 +02:00
$p -> parse ( 'rows' , 'search_list_header' , True );
2001-07-22 01:35:22 +02:00
}
2001-07-28 15:17:30 +02:00
// now sort by number of hits
arsort ( $ids );
for ( reset ( $ids ); $key = key ( $ids ); next ( $ids ))
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$p -> set_var ( 'result_desc' , $info [ $key ]);
$p -> parse ( 'rows' , 'search_list' , True );
2001-07-22 01:35:22 +02:00
}
2001-07-28 15:17:30 +02:00
if ( $matches > 0 )
2001-07-22 01:35:22 +02:00
{
2001-07-28 15:17:30 +02:00
$p -> parse ( 'rows' , 'search_list_footer' , True );
2001-07-18 19:32:10 +02:00
}
2001-07-22 01:35:22 +02:00
2001-07-28 15:17:30 +02:00
$p -> pparse ( 'out' , 'search' );
2001-07-18 19:32:10 +02:00
}
2001-07-22 01:35:22 +02:00
2001-07-18 19:32:10 +02:00
/* Private functions */
2001-07-16 13:38:40 +02:00
function _debug_sqsof ()
{
$data = array (
2001-07-18 19:32:10 +02:00
'filter' => $this -> bo -> filter ,
'cat_id' => $this -> bo -> cat_id ,
'owner' => $this -> bo -> owner ,
2001-07-16 13:38:40 +02:00
'year' => $this -> bo -> year ,
'month' => $this -> bo -> month ,
'day' => $this -> bo -> day
);
echo '<br>UI:' ;
_debug_array ( $data );
}
/* Called only by get_list(), just prior to page footer. */
function save_sessiondata ()
{
$data = array (
2001-07-18 19:32:10 +02:00
'filter' => $this -> bo -> filter ,
'cat_id' => $this -> bo -> cat_id ,
'owner' => $this -> bo -> owner ,
2001-07-16 13:38:40 +02:00
'year' => $this -> bo -> year ,
'month' => $this -> bo -> month ,
'day' => $this -> bo -> day
);
$this -> bo -> save_sessiondata ( $data );
}
function output_template_array ( & $p , $row , $list , $var )
{
$p -> set_var ( $var );
$p -> parse ( $row , $list , True );
}
function page ( $page = '' , $params = '' )
{
if ( $page == '' )
{
2001-07-18 19:32:10 +02:00
$page_ = explode ( '.' , $this -> bo -> prefs [ 'calendar' ][ 'defaultcalendar' ]);
2001-07-16 13:38:40 +02:00
$page = $page_ [ 0 ];
if ( $page == 'index' || ( $page != 'day' && $page != 'week' && $page != 'month' && $page != 'year' ))
{
$page = 'month' ;
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw' ] -> preferences -> add ( 'calendar' , 'defaultcalendar' , 'month' );
$GLOBALS [ 'phpgw' ] -> preferences -> save_repository ();
2001-07-16 13:38:40 +02:00
}
}
2001-08-13 06:49:19 +02:00
if ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ] == 'home' )
{
$page_app = 'calendar' ;
}
else
{
$page_app = $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'currentapp' ];
}
return $GLOBALS [ 'phpgw' ] -> link ( '/index.php' , 'menuaction=' . $page_app . '.ui' . $page_app . '.' . $page . $params );
2001-07-16 13:38:40 +02:00
}
function header ()
{
2001-08-17 02:24:20 +02:00
global $HTTP_POST_VARS , $HTTP_GET_VARS ;
2001-07-16 13:38:40 +02:00
$cols = 8 ;
if ( $this -> bo -> check_perms ( PHPGW_ACL_PRIVATE ) == True )
{
$cols ++ ;
}
$tpl = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$tpl -> set_unknowns ( 'remove' );
include ( $this -> template_dir . '/header.inc.php' );
2001-07-22 01:35:22 +02:00
$header = $tpl -> fp ( 'out' , 'head' );
unset ( $tpl );
echo $header ;
2001-07-16 13:38:40 +02:00
}
function footer ()
{
2001-08-12 16:47:23 +02:00
list (,, $method ) = explode ( '.' , $GLOBALS [ 'menuaction' ]);
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
if ( @ $this -> bo -> printer_friendly )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
return ;
2001-07-16 13:38:40 +02:00
}
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-08-06 04:41:36 +02:00
$p -> set_file (
Array (
'footer' => 'footer.tpl'
)
2001-07-16 13:38:40 +02:00
);
$p -> set_block ( 'footer' , 'footer_table' , 'footer_table' );
$p -> set_block ( 'footer' , 'footer_row' , 'footer_row' );
$m = $this -> bo -> month ;
$y = $this -> bo -> year ;
2001-08-13 16:11:07 +02:00
$thisdate = date ( 'Ymd' , mktime ( 0 , 0 , 0 , $m , 1 , $y ));
2001-07-16 13:38:40 +02:00
$y -- ;
$str = '' ;
for ( $i = 0 ; $i < 25 ; $i ++ )
{
$m ++ ;
if ( $m > 12 )
{
$m = 1 ;
$y ++ ;
}
$d = mktime ( 0 , 0 , 0 , $m , 1 , $y );
2001-08-13 16:11:07 +02:00
$d_ymd = date ( 'Ymd' , $d );
$str .= '<option value="' . $d_ymd . '"' . ( $d_ymd == $thisdate ? ' selected' : '' ) . '>' . lang ( date ( 'F' , $d )) . strftime ( ' %Y' , $d ) . '</option>' . " \n " ;
2001-07-16 13:38:40 +02:00
}
$var = Array (
2001-07-28 15:17:30 +02:00
'action_url' => $this -> page ( $method , '' ),
2001-07-16 13:38:40 +02:00
'form_name' => 'SelectMonth' ,
'label' => lang ( 'Month' ),
'form_label' => 'date' ,
'form_onchange' => 'document.SelectMonth.submit()' ,
'row' => $str ,
'go' => lang ( 'Go!' )
);
$this -> output_template_array ( $p , 'table_row' , 'footer_row' , $var );
$y = $this -> bo -> year ;
$m = $this -> bo -> month ;
$d = $this -> bo -> day ;
unset ( $thisdate );
$thisdate = $this -> bo -> datetime -> makegmttime ( 0 , 0 , 0 , $m , $d , $y );
2001-08-13 16:11:07 +02:00
$sun = $this -> bo -> datetime -> get_weekday_start ( $y , $m , $d ) - $this -> tz_offset - 7200 ;
2001-07-16 13:38:40 +02:00
$str = '' ;
for ( $i = - 7 ; $i <= 7 ; $i ++ )
{
$begin = $sun + ( 3600 * 24 * 7 * $i );
$end = $begin + ( 3600 * 24 * 6 );
2001-08-12 16:47:23 +02:00
$str .= '<option value="' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $begin , 'Ymd' ) . '"' . ( $begin <= $thisdate [ 'raw' ] && $end >= $thisdate [ 'raw' ] ? ' selected' : '' )
. '>' . lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $begin , 'F' )) . ' ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $begin , 'd' ) . '-'
. lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , 'F' )) . ' ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , 'd' ) . '</option>' . " \n " ;
2001-07-16 13:38:40 +02:00
}
$var = Array (
2001-07-28 15:17:30 +02:00
'action_url' => $this -> page ( $method , '' ),
2001-07-16 13:38:40 +02:00
'form_name' => 'SelectWeek' ,
'label' => lang ( 'Week' ),
'form_label' => 'date' ,
'form_onchange' => 'document.SelectWeek.submit()' ,
'row' => $str ,
'go' => lang ( 'Go!' )
);
$this -> output_template_array ( $p , 'table_row' , 'footer_row' , $var );
$str = '' ;
for ( $i = ( $y - 3 ); $i < ( $y + 3 ); $i ++ )
{
2001-07-28 15:17:30 +02:00
$str .= '<option value="' . $i . '"' . ( $i == $y ? ' selected' : '' ) . '>' . $i . '</option>' . " \n " ;
2001-07-16 13:38:40 +02:00
}
$var = Array (
2001-07-28 15:17:30 +02:00
'action_url' => $this -> page ( $method , '' ),
2001-07-16 13:38:40 +02:00
'form_name' => 'SelectYear' ,
'label' => lang ( 'Year' ),
'form_label' => 'year' ,
'form_onchange' => 'document.SelectYear.submit()' ,
'row' => $str ,
'go' => lang ( 'Go!' )
);
$this -> output_template_array ( $p , 'table_row' , 'footer_row' , $var );
$p -> pparse ( 'out' , 'footer_table' );
unset ( $p );
}
2001-07-28 15:17:30 +02:00
function no_edit ()
{
2001-08-12 16:47:23 +02:00
if ( ! $isset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]))
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappheader' ] = True ;
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappfooter' ] = True ;
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
}
echo '<center>You do not have permission to edit this appointment!</center>' ;
return ;
}
2001-07-16 13:38:40 +02:00
function link_to_entry ( $event , $month , $day , $year )
{
$str = '' ;
2001-07-18 19:32:10 +02:00
$is_private = $this -> bo -> is_private ( $event , $this -> bo -> owner );
$editable = (( ! $this -> bo -> printer_friendly ) && (( $is_private && $this -> bo -> check_perms ( PHPGW_ACL_PRIVATE )) || ! $is_private ));
2001-07-16 13:38:40 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'remove' );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'link_picture' => 'link_pict.tpl'
)
2001-07-16 13:38:40 +02:00
);
$p -> set_block ( 'link_picture' , 'link_pict' , 'link_pict' );
$p -> set_block ( 'link_picture' , 'pict' , 'pict' );
$p -> set_block ( 'link_picture' , 'link_open' , 'link_open' );
$p -> set_block ( 'link_picture' , 'link_close' , 'link_close' );
$p -> set_block ( 'link_picture' , 'link_text' , 'link_text' );
2001-08-13 16:11:07 +02:00
$starttime = $this -> bo -> maketime ( $event [ 'start' ]) - $this -> tz_offset ;
$endtime = $this -> bo -> maketime ( $event [ 'end' ]) - $this -> tz_offset ;
2001-07-16 13:38:40 +02:00
$rawdate = mktime ( 0 , 0 , 0 , $month , $day , $year );
2001-08-13 16:11:07 +02:00
$rawdate_offset = $rawdate - $this -> tz_offset ;
$nextday = mktime ( 0 , 0 , 0 , $month , $day + 1 , $year ) - $this -> tz_offset ;
2001-08-12 16:47:23 +02:00
if ( intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'Hi' )) && $starttime == $endtime )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$time = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , $this -> bo -> users_timeformat );
2001-07-16 13:38:40 +02:00
}
elseif ( $starttime <= $rawdate_offset && $endtime >= $nextday - 60 )
{
$time = '[ ' . lang ( 'All Day' ) . ' ]' ;
}
2001-08-12 16:47:23 +02:00
elseif ( intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'Hi' )) || $starttime != $endtime )
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
if ( $starttime < $rawdate_offset && $event [ 'recur_type' ] == MCAL_RECUR_NONE )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$start_time = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $rawdate_offset , $this -> bo -> users_timeformat );
2001-07-16 13:38:40 +02:00
}
else
{
2001-08-12 16:47:23 +02:00
$start_time = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , $this -> bo -> users_timeformat );
2001-07-16 13:38:40 +02:00
}
if ( $endtime >= ( $rawdate_offset + 86400 ))
{
2001-08-13 16:11:07 +02:00
$end_time = $GLOBALS [ 'phpgw' ] -> common -> show_date ( mktime ( 23 , 59 , 59 , $month , $day , $year ) - $this -> tz_offset , $this -> bo -> users_timeformat );
2001-07-16 13:38:40 +02:00
}
else
{
2001-08-12 16:47:23 +02:00
$end_time = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $endtime , $this -> bo -> users_timeformat );
2001-07-16 13:38:40 +02:00
}
$time = $start_time . '-' . $end_time ;
}
else
{
$time = '' ;
}
2001-07-28 15:17:30 +02:00
$text = '' ;;
2001-07-16 13:38:40 +02:00
if ( ! $is_private )
{
2001-07-30 00:09:24 +02:00
$text .= $this -> bo -> display_status ( $event [ 'users_status' ]);
2001-07-16 13:38:40 +02:00
}
2001-08-13 16:11:07 +02:00
$text = '<font size="-2" face="' . $this -> theme [ 'font' ] . '"><nobr>' . $time . '</nobr> ' . $this -> bo -> get_short_field ( $event , $is_private , 'title' ) . $text . '</font>' . $GLOBALS [ 'phpgw' ] -> browser -> br ;
2001-07-16 13:38:40 +02:00
if ( $editable )
{
2001-07-30 00:09:24 +02:00
$p -> set_var ( 'link_link' , $this -> page ( 'view' , '&cal_id=' . $event [ 'id' ]));
2001-07-16 13:38:40 +02:00
$p -> set_var ( 'lang_view' , lang ( 'View this entry' ));
$p -> parse ( 'picture' , 'link_open' , True );
2001-07-30 00:09:24 +02:00
if ( $event [ 'priority' ] == 3 )
2001-07-16 13:38:40 +02:00
{
$picture [] = Array (
2001-08-12 16:47:23 +02:00
'pict' => $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'high.gif' ),
2001-07-16 13:38:40 +02:00
'width' => 8 ,
'height' => 17
);
}
2001-07-30 00:09:24 +02:00
if ( $event [ 'recur_type' ] == MCAL_RECUR_NONE )
2001-07-16 13:38:40 +02:00
{
$picture [] = Array (
2001-08-12 16:47:23 +02:00
'pict' => $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'circle.gif' ),
2001-07-16 13:38:40 +02:00
'width' => 5 ,
'height' => 7
);
}
else
{
$picture [] = Array (
2001-08-12 16:47:23 +02:00
'pict' => $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'recur.gif' ),
2001-07-16 13:38:40 +02:00
'width' => 12 ,
'height' => 12
);
}
2001-07-30 00:09:24 +02:00
if ( count ( $event [ 'participants' ]) > 1 )
2001-07-16 13:38:40 +02:00
{
$picture [] = Array (
2001-08-12 16:47:23 +02:00
'pict' => $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'multi_3.gif' ),
2001-07-16 13:38:40 +02:00
'width' => 14 ,
'height' => 14
);
}
2001-07-30 00:09:24 +02:00
if ( $event [ 'public' ] == 0 )
2001-07-16 13:38:40 +02:00
{
$picture [] = Array (
2001-08-12 16:47:23 +02:00
'pict' => $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'private.gif' ),
2001-07-16 13:38:40 +02:00
'width' => 13 ,
'height' => 13
);
}
2001-07-28 15:17:30 +02:00
$description = $this -> bo -> get_short_field ( $event , $is_private , 'description' );
2001-07-16 13:38:40 +02:00
for ( $i = 0 ; $i < count ( $picture ); $i ++ )
{
$var = Array (
'pic_image' => $picture [ $i ][ 'pict' ],
'width' => $picture [ $i ][ 'width' ],
'height' => $picture [ $i ][ 'height' ],
'description' => $description
);
$this -> output_template_array ( $p , 'picture' , 'pict' , $var );
}
}
if ( $text )
{
$var = Array (
'text' => $text
);
$this -> output_template_array ( $p , 'picture' , 'link_text' , $var );
}
if ( $editable )
{
$p -> parse ( 'picture' , 'link_close' , True );
}
$str = $p -> fp ( 'out' , 'link_pict' );
unset ( $p );
return $str ;
}
2001-07-28 15:17:30 +02:00
function overlap ( $overlapping_events , $event )
{
2001-08-06 04:41:36 +02:00
$month = $event [ 'start' ][ 'month' ];
$mday = $event [ 'start' ][ 'mday' ];
$year = $event [ 'start' ][ 'year' ];
2001-07-28 15:17:30 +02:00
2001-08-13 16:11:07 +02:00
$start = mktime ( $event [ 'start' ][ 'hour' ], $event [ 'start' ][ 'min' ], $event [ 'start' ][ 'sec' ], $month , $mday , $year ) - $this -> tz_offset ;
$end = $this -> bo -> maketime ( $event [ 'end' ]) - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
$overlap = '' ;
for ( $i = 0 ; $i < count ( $overlapping_events ); $i ++ )
{
$overlap .= '<li>' . $this -> link_to_entry ( $this -> bo -> read_entry ( $overlapping_events [ $i ]), $month , $mday , $year );
}
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nofooter' ] = True ;
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
2001-08-06 04:41:36 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'overlap' => 'overlap.tpl' ,
'form_button' => 'form_button_script.tpl'
)
);
$var = Array (
2001-08-13 16:11:07 +02:00
'color' => $this -> theme [ 'bg_text' ],
2001-07-28 15:17:30 +02:00
'overlap_title' => lang ( 'Scheduling Conflict' ),
2001-08-12 16:47:23 +02:00
'overlap_text' => lang ( 'Your suggested time of <B> x - x </B> conflicts with the following existing calendar entries:' , $GLOBALS [ 'phpgw' ] -> common -> show_date ( $start ), $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end )),
2001-07-28 15:17:30 +02:00
'overlap_list' => $overlap
);
$p -> set_var ( $var );
$date = sprintf ( " %04d%02d%02d " , $this -> bo -> year , $this -> bo -> month , $this -> bo -> mday );
$var = Array (
2001-08-12 16:47:23 +02:00
'action_url_button' => $GLOBALS [ 'phpgw' ] -> link ( '/index.php' , Array ( 'menuaction' => 'calendar.bocalendar.update' , 'readsess' => 1 )),
2001-07-28 15:17:30 +02:00
'action_text_button' => lang ( 'Ignore Conflict' ),
'action_confirm_button' => '' ,
'action_extra_field' => ''
);
$this -> output_template_array ( $p , 'resubmit_button' , 'form_button' , $var );
$var = Array (
2001-08-12 16:47:23 +02:00
'action_url_button' => $GLOBALS [ 'phpgw' ] -> link ( '/index.php' , Array ( 'menuaction' => 'calendar.uicalendar.edit' , 'readsess' => 1 , 'date' => $date )),
2001-07-28 15:17:30 +02:00
'action_text_button' => lang ( 'Re-Edit Event' ),
'action_confirm_button' => '' ,
'action_extra_field' => ''
);
2001-08-06 04:41:36 +02:00
$this -> output_template_array ( $p , 'reedit_button' , 'form_button' , $var );
2001-07-28 15:17:30 +02:00
$p -> pparse ( 'out' , 'overlap' );
}
function planner_participants ( $parts )
{
2001-08-17 02:24:20 +02:00
static $id2lid ;
2001-07-28 15:17:30 +02:00
$names = '' ;
while ( list ( $id , $status ) = each ( $parts ))
{
if ( ! isset ( $id2lid [ $id ]))
{
2001-08-12 16:47:23 +02:00
$id2lid [ $id ] = $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $id );
2001-07-28 15:17:30 +02:00
}
if ( strlen ( $names ))
{
$names .= " , \n " ;
}
$names .= $id2lid [ $id ] . " ( $status ) " ;
}
if ( $this -> debug )
{
echo " Inside participants() : $names <br> \n " ;
}
return $names ;
}
function planner_category ( $id )
{
2001-08-17 02:24:20 +02:00
static $cats ;
2001-07-28 15:17:30 +02:00
if ( ! isset ( $cats [ $id ]))
{
$cat_arr = $this -> cat -> return_single ( $id );
$cats [ $id ] = $cat_arr [ 0 ];
$cats [ $id ][ 'color' ] = strstr ( $cats [ $id ][ 'description' ], '#' );
}
return $cats [ $id ];
}
2001-07-16 13:38:40 +02:00
function week_header ( $month , $year , $display_name = False )
{
$this -> weekstarttime = $this -> bo -> datetime -> get_weekday_start ( $year , $month , 1 );
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'remove' );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'month_header' => 'month_header.tpl'
)
2001-07-16 13:38:40 +02:00
);
$p -> set_block ( 'month_header' , 'monthly_header' , 'monthly_header' );
$p -> set_block ( 'month_header' , 'column_title' , 'column_title' );
$var = Array (
2001-08-13 16:11:07 +02:00
'bgcolor' => $this -> theme [ 'th_bg' ],
'font_color' => $this -> theme [ 'th_text' ]
2001-07-16 13:38:40 +02:00
);
2001-07-18 19:32:10 +02:00
if ( $this -> bo -> printer_friendly && @ $this -> bo -> prefs [ 'calendar' ][ 'print_black_white' ])
2001-07-16 13:38:40 +02:00
{
$var = Array (
'bgcolor' => '' ,
'font_color' => ''
);
}
$p -> set_var ( $var );
$p -> set_var ( 'col_width' , '14' );
if ( $display_name == True )
{
$p -> set_var ( 'col_title' , lang ( 'name' ));
$p -> parse ( 'column_header' , 'column_title' , True );
$p -> set_var ( 'col_width' , '12' );
}
for ( $i = 0 ; $i < 7 ; $i ++ )
{
$p -> set_var ( 'col_title' , lang ( $this -> bo -> datetime -> days [ $i ]));
$p -> parse ( 'column_header' , 'column_title' , True );
}
return $p -> fp ( 'out' , 'monthly_header' );
}
function display_week ( $startdate , $weekly , $cellcolor , $display_name = False , $owner = 0 , $monthstart = 0 , $monthend = 0 )
{
2001-08-12 16:47:23 +02:00
if ( $owner == 0 ) { $owner = $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'account_id' ]; }
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
$temp_owner = $this -> bo -> owner ;
$this -> bo -> owner = $owner ;
2001-07-16 13:38:40 +02:00
$str = '' ;
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'keep' );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'month_header' => 'month_header.tpl' ,
'month_day' => 'month_day.tpl'
)
);
2001-07-16 13:38:40 +02:00
$p -> set_block ( 'month_header' , 'monthly_header' , 'monthly_header' );
$p -> set_block ( 'month_header' , 'month_column' , 'month_column' );
$p -> set_block ( 'month_day' , 'month_daily' , 'month_daily' );
$p -> set_block ( 'month_day' , 'day_event' , 'day_event' );
$p -> set_block ( 'month_day' , 'event' , 'event' );
$p -> set_var ( 'extra' , '' );
$p -> set_var ( 'col_width' , '14' );
if ( $display_name )
{
2001-08-12 16:47:23 +02:00
$p -> set_var ( 'column_data' , $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $owner ));
2001-07-16 13:38:40 +02:00
$p -> parse ( 'column_header' , 'month_column' , True );
$p -> set_var ( 'col_width' , '12' );
}
$today = date ( 'Ymd' , time ());
$daily = $this -> bo -> set_week_array ( $startdate , $cellcolor , $weekly );
@ reset ( $daily );
while ( list ( $date , $day_params ) = each ( $daily ))
{
$year = intval ( substr ( $date , 0 , 4 ));
$month = intval ( substr ( $date , 4 , 2 ));
$day = intval ( substr ( $date , 6 , 2 ));
$var = Array (
'column_data' => '' ,
'extra' => ''
);
$p -> set_var ( $var );
if ( $weekly || ( $date >= $monthstart && $date <= $monthend ))
{
if ( $day_params [ 'new_event' ])
{
2001-08-06 04:41:36 +02:00
$new_event_link = '<a href="' . $this -> page ( 'add' , '&date=' . $date ) . '">'
2001-08-12 16:47:23 +02:00
. '<img src="' . $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'new.gif' ) . '" width="10" height="10" alt="' . lang ( 'New Entry' ) . '" border="0" align="center">'
2001-07-16 13:38:40 +02:00
. '</a>' ;
2001-08-12 16:47:23 +02:00
$day_number = '<a href="' . $this -> page ( 'day' , '&date=' . $date ) . '">' . $day . '</a>' ;
2001-07-16 13:38:40 +02:00
}
else
{
$new_event_link = '' ;
$day_number = $day ;
}
$var = Array (
'extra' => $day_params [ 'extra' ],
'new_event_link' => $new_event_link ,
'day_number' => $day_number
);
$p -> set_var ( $var );
2001-08-13 16:11:07 +02:00
if ( @ $day_params [ 'holidays' ])
2001-07-16 13:38:40 +02:00
{
reset ( $day_params [ 'holidays' ]);
while ( list ( $key , $value ) = each ( $day_params [ 'holidays' ]))
{
$var = Array (
2001-08-13 16:11:07 +02:00
'day_events' => '<font face="' . $this -> theme [ 'font' ] . '" size="-1">' . $value . '</font>' . $GLOBALS [ 'phpgw' ] -> browser -> br
2001-07-16 13:38:40 +02:00
);
$this -> output_template_array ( $p , 'daily_events' , 'event' , $var );
}
}
if ( $day_params [ 'appts' ])
{
$lr_events = CreateObject ( 'calendar.calendar_item' );
$var = Array (
'week_day_font_size' => '2' ,
'events' => ''
);
$p -> set_var ( $var );
$rep_events = $this -> bo -> cached_events [ $date ];
2001-08-13 16:11:07 +02:00
$c_rep_events = count ( $rep_events );
for ( $k = 0 ; $k < $c_rep_events ; $k ++ )
2001-07-16 13:38:40 +02:00
{
$lr_events = $rep_events [ $k ];
$p -> set_var ( 'day_events' , $this -> link_to_entry ( $lr_events , $month , $day , $year ));
$p -> parse ( 'events' , 'event' , True );
$p -> set_var ( 'day_events' , '' );
}
}
$p -> parse ( 'daily_events' , 'day_event' , True );
$p -> parse ( 'column_data' , 'month_daily' , True );
$p -> set_var ( 'daily_events' , '' );
$p -> set_var ( 'events' , '' );
if ( $day_params [ 'week' ])
{
$var = Array (
'week_day_font_size' => '-2' ,
2001-07-28 15:17:30 +02:00
'events' => ( ! $this -> bo -> printer_friendly ? '<a href="' . $this -> page ( 'week' , '&date=' . $date ) . '">' . $day_params [ 'week' ] . '</a>' : $day_params [ 'week' ])
2001-07-16 13:38:40 +02:00
);
$this -> output_template_array ( $p , 'column_data' , 'day_event' , $var );
$p -> set_var ( 'events' , '' );
}
}
$p -> parse ( 'column_header' , 'month_column' , True );
$p -> set_var ( 'column_data' , '' );
}
2001-07-18 19:32:10 +02:00
$this -> bo -> owner = $temp_owner ;
2001-07-16 13:38:40 +02:00
return $p -> fp ( 'out' , 'monthly_header' );
}
function display_month ( $month , $year , $showyear , $owner = 0 )
{
2001-08-13 03:34:32 +02:00
$this -> bo -> store_to_cache (
Array (
'syear' => $year ,
'smonth' => $month ,
'sday' => 1
)
);
2001-07-16 13:38:40 +02:00
$monthstart = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $month , 1 , $year )));
$monthend = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $month + 1 , 0 , $year )));
$start = $this -> bo -> datetime -> get_weekday_start ( $year , $month , 1 );
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'keep' );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'week' => 'month_day.tpl'
)
);
2001-07-16 13:38:40 +02:00
$p -> set_block ( 'week' , 'm_w_table' , 'm_w_table' );
$p -> set_block ( 'week' , 'event' , 'event' );
2001-07-28 15:17:30 +02:00
$var = Array (
'cols' => 7 ,
'day_events' => $this -> week_header ( $month , $year , False )
);
$this -> output_template_array ( $p , 'row' , 'event' , $var );
2001-07-16 13:38:40 +02:00
2001-08-13 16:11:07 +02:00
$cellcolor = $this -> theme [ 'row_on' ];
2001-07-16 13:38:40 +02:00
for ( $i = intval ( $start ); intval ( date ( 'Ymd' , $i )) <= $monthend ; $i += 604800 )
{
2001-08-12 16:47:23 +02:00
$cellcolor = $GLOBALS [ 'phpgw' ] -> nextmatchs -> alternate_row_color ( $cellcolor );
2001-07-16 13:38:40 +02:00
$var = Array (
'day_events' => $this -> display_week ( $i , False , $cellcolor , False , $owner , $monthstart , $monthend )
);
$this -> output_template_array ( $p , 'row' , 'event' , $var );
}
return $p -> fp ( 'out' , 'm_w_table' );
}
2001-08-12 16:47:23 +02:00
function display_weekly ( $params )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
if ( ! is_array ( $params ))
{
$this -> index ();
}
2001-07-16 13:38:40 +02:00
2001-08-12 16:47:23 +02:00
$year = substr ( $params [ 'date' ], 0 , 4 );
$month = substr ( $params [ 'date' ], 4 , 2 );
2001-08-13 16:11:07 +02:00
$day = substr ( $params [ 'date' ], 6 , 2 );
2001-08-12 16:47:23 +02:00
$showyear = $params [ 'showyear' ];
$owners = $params [ 'owners' ];
2001-07-16 13:38:40 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'keep' );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'week' => 'month_day.tpl'
)
2001-07-16 13:38:40 +02:00
);
$p -> set_block ( 'week' , 'm_w_table' , 'm_w_table' );
$p -> set_block ( 'week' , 'event' , 'event' );
$start = $this -> bo -> datetime -> get_weekday_start ( $year , $month , $day );
2001-08-13 16:11:07 +02:00
$cellcolor = $this -> theme [ 'row_off' ];
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
$true_printer_friendly = $this -> bo -> printer_friendly ;
2001-07-16 13:38:40 +02:00
if ( is_array ( $owners ))
{
$display_name = True ;
$counter = count ( $owners );
$owners_array = $owners ;
2001-07-28 15:17:30 +02:00
$cols = 8 ;
2001-07-16 13:38:40 +02:00
}
else
{
$display_name = False ;
$counter = 1 ;
$owners_array [ 0 ] = $owners ;
2001-07-28 15:17:30 +02:00
$cols = 7 ;
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
$var = Array (
'cols' => $cols ,
'day_events' => $this -> week_header ( $month , $year , $display_name )
);
$this -> output_template_array ( $p , 'row' , 'event' , $var );
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
$original_owner = $this -> bo -> owner ;
2001-07-16 13:38:40 +02:00
for ( $i = 0 ; $i < $counter ; $i ++ )
{
$this -> so -> owner = $owners_array [ $i ];
2001-08-13 03:34:32 +02:00
$this -> bo -> store_to_cache (
Array (
'syear' => $year ,
'smonth' => $month ,
'sday' => 1
)
);
2001-07-16 13:38:40 +02:00
$p -> set_var ( 'day_events' , $this -> display_week ( $start , True , $cellcolor , $display_name , $owners_array [ $i ]));
$p -> parse ( 'row' , 'event' , True );
}
2001-07-18 19:32:10 +02:00
$this -> bo -> owner = $original_owner ;
$this -> bo -> printer_friendly = $true_printer_friendly ;
2001-07-16 13:38:40 +02:00
return $p -> fp ( 'out' , 'm_w_table' );
}
function view_add_day ( $day , & $repeat_days )
{
if ( $repeat_days )
{
$repeat_days .= ', ' ;
}
$repeat_days .= $day . ' ' ;
}
function view_event ( $event )
{
2001-08-01 13:07:04 +02:00
if ( ! $event [ 'participants' ][ $this -> bo -> owner ])
{
return '<center>' . lang ( 'You do not have permission to read this record!' ) . '</center>' ;
}
2001-07-16 13:38:40 +02:00
$pri = Array (
1 => lang ( 'Low' ),
2 => lang ( 'Normal' ),
3 => lang ( 'High' )
);
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'keep' );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'view' => 'view.tpl'
)
);
2001-07-16 13:38:40 +02:00
$p -> set_block ( 'view' , 'view_event' , 'view_event' );
$p -> set_block ( 'view' , 'list' , 'list' );
$var = Array (
2001-08-13 16:11:07 +02:00
'bg_text' => $this -> theme [ 'bg_text' ],
2001-08-17 21:32:03 +02:00
'name' => $event [ 'title' ]
2001-07-16 13:38:40 +02:00
);
$p -> set_var ( $var );
unset ( $var );
// Some browser add a \n when its entered in the database. Not a big deal
// this will be printed even though its not needed.
2001-08-17 21:32:03 +02:00
if ( $event [ 'description' ])
2001-07-16 13:38:40 +02:00
{
$var [] = Array (
'field' => lang ( 'Description' ),
2001-08-17 21:32:03 +02:00
'data' => $event [ 'description' ]
2001-07-16 13:38:40 +02:00
);
}
2001-07-30 00:09:24 +02:00
if ( $event [ 'category' ])
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$this -> cat -> categories ( $this -> bo -> owner , 'calendar' );
2001-07-30 00:09:24 +02:00
$cat = $this -> cat -> return_single ( $event [ 'category' ]);
2001-07-16 13:38:40 +02:00
$var [] = Array (
'field' => lang ( 'Category' ),
'data' => $cat [ 0 ][ 'name' ]
);
}
$var [] = Array (
'field' => lang ( 'Start Date/Time' ),
2001-08-13 16:11:07 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> show_date ( $this -> bo -> maketime ( $event [ 'start' ]) - $this -> tz_offset )
2001-07-16 13:38:40 +02:00
);
$var [] = Array (
'field' => lang ( 'End Date/Time' ),
2001-08-13 16:11:07 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> show_date ( $this -> bo -> maketime ( $event [ 'end' ]) - $this -> tz_offset )
2001-07-16 13:38:40 +02:00
);
$var [] = Array (
'field' => lang ( 'Priority' ),
2001-07-30 00:09:24 +02:00
'data' => $pri [ $event [ 'priority' ]]
2001-07-16 13:38:40 +02:00
);
$var [] = Array (
'field' => lang ( 'Created By' ),
2001-08-12 16:47:23 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $event [ 'owner' ])
2001-07-16 13:38:40 +02:00
);
$var [] = Array (
'field' => lang ( 'Updated' ),
2001-08-13 16:11:07 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> show_date ( $this -> bo -> maketime ( $event [ 'modtime' ]) - $this -> tz_offset )
2001-07-16 13:38:40 +02:00
);
$var [] = Array (
'field' => lang ( 'Private' ),
2001-07-30 00:09:24 +02:00
'data' => $event [ 'public' ] == True ? 'False' : 'True'
2001-07-16 13:38:40 +02:00
);
if ( $event -> groups [ 0 ])
{
$cal_grps = '' ;
2001-07-30 00:09:24 +02:00
for ( $i = 0 ; $i < count ( $event [ 'groups' ]); $i ++ )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw' ] -> accounts -> exists ( $event [ 'groups' ][ $i ]))
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$cal_grps .= ( $i > 0 ? '<br>' : '' ) . $GLOBALS [ 'phpgw' ] -> accounts -> id2name ( $event [ 'groups' ][ $i ]);
2001-07-16 13:38:40 +02:00
}
}
$var [] = Array (
'field' => lang ( 'Groups' ),
'data' => $cal_grps
);
}
$str = '' ;
2001-07-30 00:09:24 +02:00
reset ( $event [ 'participants' ]);
while ( list ( $user , $short_status ) = each ( $event [ 'participants' ]))
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw' ] -> accounts -> exists ( $user ))
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$str .= ( $str ? '<br>' : '' ) . $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $user ) . ' (' . ( $this -> bo -> check_perms ( PHPGW_ACL_EDIT , $user ) ? '<a href="' . $this -> page ( 'edit_status' , '&cal_id=' . $event [ 'id' ] . '&owner=' . $user ) . '">' . $this -> bo -> get_long_status ( $short_status ) . '</a>' : $this -> bo -> get_long_status ( $short_status )) . ')' . " \n " ;
2001-07-16 13:38:40 +02:00
}
}
$var [] = Array (
'field' => lang ( 'Participants' ),
'data' => $str
);
// Repeated Events
$rpt_type = Array (
MCAL_RECUR_NONE => 'none' ,
MCAL_RECUR_DAILY => 'daily' ,
MCAL_RECUR_WEEKLY => 'weekly' ,
MCAL_RECUR_MONTHLY_WDAY => 'monthlybyday' ,
MCAL_RECUR_MONTHLY_MDAY => 'monthlybydate' ,
MCAL_RECUR_YEARLY => 'yearly'
);
2001-07-30 00:09:24 +02:00
$str = lang ( $rpt_type [ $event [ 'recur_type' ]]);
if ( $event [ 'recur_type' ] <> MCAL_RECUR_NONE )
2001-07-16 13:38:40 +02:00
{
$str_extra = '' ;
2001-07-30 00:09:24 +02:00
if ( $event [ 'recur_enddate' ][ 'mday' ] != 0 && $event [ 'recur_enddate' ][ 'month' ] != 0 && $event [ 'recur_enddate' ][ 'year' ] != 0 )
2001-07-16 13:38:40 +02:00
{
2001-08-01 13:07:04 +02:00
$recur_end = $this -> bo -> maketime ( $event [ 'recur_enddate' ]);
2001-07-16 13:38:40 +02:00
if ( $recur_end != 0 )
{
2001-08-13 16:11:07 +02:00
$recur_end -= $this -> tz_offset ;
2001-08-12 16:47:23 +02:00
$str_extra .= lang ( 'ends' ) . ': ' . lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $recur_end , 'l' )) . ', ' . lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $recur_end , 'F' )) . ' ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $recur_end , 'd, Y' ) . ' ' ;
2001-07-16 13:38:40 +02:00
}
}
2001-07-30 00:09:24 +02:00
if ( $event [ 'recur_type' ] == MCAL_RECUR_WEEKLY || $event [ 'recur_type' ] == MCAL_RECUR_DAILY )
2001-07-16 13:38:40 +02:00
{
$repeat_days = '' ;
2001-07-18 19:32:10 +02:00
if ( $this -> bo -> prefs [ 'calendar' ][ 'weekdaystarts' ] == 'Sunday' )
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_SUNDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Sunday' ), $repeat_days );
}
}
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_MONDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Monday' ), $repeat_days );
}
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_TUESDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Tuesday' ), $repeat_days );
}
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_WEDNESDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Wednesday' ), $repeat_days );
}
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_THURSDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Thursday' ), $repeat_days );
}
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_FRIDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Friday' ), $repeat_days );
}
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_SATURDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Saturday' ), $repeat_days );
}
2001-07-18 19:32:10 +02:00
if ( $this -> bo -> prefs [ 'calendar' ][ 'weekdaystarts' ] == 'Monday' )
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
if ( !! ( $event [ 'recur_data' ] & MCAL_M_SUNDAY ) == True )
2001-07-16 13:38:40 +02:00
{
$this -> view_add_day ( lang ( 'Sunday' ), $repeat_days );
}
}
if ( $repeat_days <> '' )
{
$str_extra .= lang ( 'days repeated' ) . ': ' . $repeat_days ;
}
}
2001-07-30 00:09:24 +02:00
if ( $event [ 'recur_interval' ])
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
$str_extra .= lang ( 'Interval' ) . ': ' . $event [ 'recur_interval' ];
2001-07-16 13:38:40 +02:00
}
if ( $str_extra )
{
$str .= ' (' . $str_extra . ')' ;
}
$var [] = Array (
'field' => lang ( 'Repetition' ),
'data' => $str
);
}
for ( $i = 0 ; $i < count ( $var ); $i ++ )
{
$this -> output_template_array ( $p , 'row' , 'list' , $var [ $i ]);
}
return $p -> fp ( 'out' , 'view_event' );
}
2001-07-18 19:32:10 +02:00
2001-08-13 16:11:07 +02:00
function print_day ( $params )
2001-07-18 19:32:10 +02:00
{
2001-08-13 16:11:07 +02:00
if ( ! is_array ( $params ))
2001-08-12 16:47:23 +02:00
{
$this -> index ();
}
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
$this -> bo -> store_to_cache (
Array (
2001-08-13 16:11:07 +02:00
'syear' => $params [ 'year' ],
'smomth' => $params [ 'month' ],
'sday' => $params [ 'day' ],
'eyear' => $params [ 'year' ],
'emonth' => $params [ 'month' ],
'eday' => $params [ 'day' ]
2001-08-13 03:34:32 +02:00
)
);
2001-07-18 19:32:10 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_unknowns ( 'keep' );
$templates = Array (
'day_cal' => 'day_cal.tpl'
);
$p -> set_file ( $templates );
$p -> set_block ( 'day_cal' , 'day' , 'day' );
$p -> set_block ( 'day_cal' , 'day_row' , 'day_row' );
$p -> set_block ( 'day_cal' , 'day_event' , 'day_event' );
$p -> set_block ( 'day_cal' , 'day_time' , 'day_time' );
if ( ! $this -> bo -> prefs [ 'calendar' ][ 'workdaystarts' ] &&
! $this -> bo -> prefs [ 'calendar' ][ 'workdayends' ])
{
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw' ] -> preferences -> add ( 'calendar' , 'workdaystarts' , 8 );
$GLOBALS [ 'phpgw' ] -> preferences -> add ( 'calendar' , 'workdayends' , 16 );
$GLOBALS [ 'phpgw' ] -> preferences -> save_repository ();
2001-07-18 19:32:10 +02:00
$this -> bo -> prefs [ 'calendar' ][ 'workdaystarts' ] = 8 ;
$this -> bo -> prefs [ 'calendar' ][ 'workdayends' ] = 16 ;
}
2001-08-13 06:49:19 +02:00
if ( ! isset ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ]))
{
$GLOBALS [ 'phpgw' ] -> preferences -> add ( 'calendar' , 'interval' , 60 );
$GLOBALS [ 'phpgw' ] -> preferences -> save_repository ();
$this -> bo -> prefs [ 'calendar' ][ 'interval' ] = 60 ;
}
2001-08-13 03:34:32 +02:00
if ( $this -> debug )
{
echo " Interval set to : " . intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ]) . " <br> \n " ;
}
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw' ] -> browser -> browser ();
if ( $GLOBALS [ 'phpgw' ] -> browser -> get_agent () == 'MOZILLA' )
2001-07-18 19:32:10 +02:00
{
2001-08-13 03:34:32 +02:00
$time_width = ( intval ( $this -> bo -> prefs [ 'common' ][ 'time_format' ]) == 12 ? 12 : 8 );
2001-07-18 19:32:10 +02:00
}
else
{
2001-08-13 03:34:32 +02:00
$time_width = ( intval ( $this -> bo -> prefs [ 'common' ][ 'time_format' ]) == 12 ? 10 : 7 );
2001-07-18 19:32:10 +02:00
}
$var = Array (
'time_width' => $time_width ,
2001-08-13 16:11:07 +02:00
'time_bgcolor' => $this -> theme [ 'navbar_bg' ],
'font_color' => $this -> theme [ 'bg_text' ],
'time_border_color' => $this -> theme [ 'navbar_text' ],
'font' => $this -> theme [ 'font' ]
2001-07-18 19:32:10 +02:00
);
$p -> set_var ( $var );
for ( $i = 0 ; $i < 24 ; $i ++ )
{
2001-08-13 03:34:32 +02:00
for ( $j = 0 ; $j < ( 60 / intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ])); $j ++ )
{
$rowspan_arr [ $i ][ $j ] = 0 ;
$time [ $ind ][ $j ] = '' ;
}
2001-07-18 19:32:10 +02:00
}
2001-08-13 16:11:07 +02:00
$date_to_eval = sprintf ( " %04d%02d%02d " , $params [ 'year' ], $params [ 'month' ], $params [ 'day' ]);
2001-07-18 19:32:10 +02:00
$time = Array ();
2001-08-13 16:11:07 +02:00
$daily = $this -> bo -> set_week_array ( $this -> bo -> datetime -> get_weekday_start ( $params [ 'year' ], $params [ 'month' ], $params [ 'day' ]), $this -> theme [ 'row_on' ], True );
2001-08-13 03:34:32 +02:00
if ( $this -> debug )
{
echo " Date to Eval : " . $date_to_eval . " <br> \n " ;
}
2001-07-22 01:35:22 +02:00
if ( $daily [ $date_to_eval ][ 'appts' ])
2001-07-18 19:32:10 +02:00
{
$events = $this -> bo -> cached_events [ $date_to_eval ];
$c_events = count ( $events );
2001-08-13 03:34:32 +02:00
if ( $this -> debug )
{
echo " Date : " . $date_to_eval . " Count : " . $c_events . " <br> \n " ;
}
2001-07-18 19:32:10 +02:00
for ( $i = 0 ; $i < $c_events ; $i ++ )
{
2001-08-12 16:47:23 +02:00
// $event = $events[$i];
if ( $events [ $i ][ 'recur_type' ] == MCAL_RECUR_NONE )
{
2001-08-13 16:11:07 +02:00
if ( $events [ $i ][ 'start' ][ 'mday' ] < $params [ 'day' ])
2001-08-12 16:47:23 +02:00
{
2001-08-13 16:11:07 +02:00
if ( $events [ $i ][ 'end' ][ 'mday' ] > $params [ 'day' ])
2001-08-12 16:47:23 +02:00
{
$ind = 99 ;
2001-08-13 03:34:32 +02:00
$interval_start = 0 ;
2001-08-12 16:47:23 +02:00
}
2001-08-13 16:11:07 +02:00
elseif ( $events [ $i ][ 'end' ][ 'mday' ] == $params [ 'day' ])
2001-08-12 16:47:23 +02:00
{
$ind = 0 ;
2001-08-13 03:34:32 +02:00
$interval_start = 0 ;
2001-08-12 16:47:23 +02:00
}
}
2001-08-13 16:11:07 +02:00
elseif ( $events [ $i ][ 'start' ][ 'mday' ] == $params [ 'day' ])
2001-08-12 16:47:23 +02:00
{
$ind = intval ( $events [ $i ][ 'start' ][ 'hour' ]);
2001-08-13 03:34:32 +02:00
$interval_start = intval ( $events [ $i ][ 'start' ][ 'min' ] / intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ]));
if ( $this -> debug )
{
echo 'Start Time Minutes : ' . $events [ $i ][ 'start' ][ 'min' ] . " <br> \n " ;
echo 'Interval : ' . $interval_start . " <br> \n " ;
}
2001-08-12 16:47:23 +02:00
}
}
else
{
$ind = intval ( $events [ $i ][ 'start' ][ 'hour' ]);
2001-08-13 03:34:32 +02:00
$interval_start = intval ( $events [ $i ][ 'start' ][ 'min' ] / intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ]));
2001-08-12 16:47:23 +02:00
}
2001-07-28 15:17:30 +02:00
if ( $ind < ( int ) $this -> bo -> prefs [ 'calendar' ][ 'workdaystarts' ] || $ind > ( int ) $this -> bo -> prefs [ 'calendar' ][ 'workdayends' ])
{
$ind = 99 ;
2001-08-13 03:34:32 +02:00
$interval_start = 0 ;
2001-07-28 15:17:30 +02:00
}
2001-08-13 16:11:07 +02:00
$time [ $ind ][ $interval_start ] .= $this -> link_to_entry ( $events [ $i ], $params [ 'month' ], $params [ 'day' ], $params [ 'year' ]);
2001-07-28 15:17:30 +02:00
2001-08-12 16:47:23 +02:00
$starttime = $this -> bo -> maketime ( $events [ $i ][ 'start' ]);
$endtime = $this -> bo -> maketime ( $events [ $i ][ 'end' ]);
2001-07-28 15:17:30 +02:00
if ( $starttime <> $endtime )
{
2001-08-13 03:34:32 +02:00
$rowspan = intval (( $endtime - $starttime ) / ( 60 * intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ])));
2001-07-28 15:17:30 +02:00
$mins = ( int )((( $endtime - $starttime ) / 60 ) % 60 );
2001-08-13 06:49:19 +02:00
if (( $mins <> 0 && $mins <= intval ( 60 / intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ]))) || ( $mins == 0 && date ( 'i' , $endtime ) > intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ])))
2001-07-28 15:17:30 +02:00
{
$rowspan += 1 ;
}
2001-08-13 03:34:32 +02:00
if ( $this -> debug )
2001-07-28 15:17:30 +02:00
{
2001-08-13 03:34:32 +02:00
echo " Rowspan being set to : " . $rowspan . " <br> \n " ;
}
if ( $rowspan > $rowspan_arr [ $ind ][ $interval_start ] && $rowspan > 1 )
{
$rowspan_arr [ $ind ][ $interval_start ] = $rowspan ;
2001-07-28 15:17:30 +02:00
}
}
2001-08-13 03:34:32 +02:00
if ( $this -> debug )
{
2001-08-13 16:11:07 +02:00
echo 'Time : ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $this -> bo -> maketime ( $events [ $i ][ 'start' ]) - $this -> tz_offset ) . ' - ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $this -> bo -> maketime ( $events [ $i ][ 'end' ]) - $this -> tz_offset ) . ' : Start : ' . $ind . ' : Interval # : ' . $interval_start . " <br> \n " ;
2001-08-13 03:34:32 +02:00
}
2001-07-18 19:32:10 +02:00
}
}
// squish events that use the same cell into the same cell.
// For example, an event from 8:00-9:15 and another from 9:30-9:45 both
// want to show up in the 8:00-9:59 cell.
2001-08-13 03:34:32 +02:00
// $rowspan = 0;
// $last_row = -1;
// for ($i=0;$i<24;$i++)
// {
// for($j=0;$j<(60 / intval($this->bo->prefs['calendar']['interval']));$j++)
// {
// if ($rowspan > 1)
// {
// if (isset($time[$i][$j]) && strlen($time[$i]) > 0)
// {
// $rowspan_arr[$last_row] += $rowspan_arr[$i];
// if ($rowspan_arr[$i] <> 0)
// {
// $rowspan_arr[$last_row] -= 1;
// }
// $time[$last_row] .= $time[$i];
// $time[$i] = '';
// $rowspan_arr[$i] = 0;
// }
// $rowspan--;
// }
// elseif ($rowspan_arr[$i] > 1)
// {
// $rowspan = $rowspan_arr[$i];
// $last_row = $i;
// }
// }
// }
2001-07-18 19:32:10 +02:00
$holiday_names = $daily [ $date_to_eval ][ 'holidays' ];
if ( ! $holiday_names )
{
2001-08-12 16:47:23 +02:00
$bgcolor = $GLOBALS [ 'phpgw' ] -> nextmatchs -> alternate_row_color ();
2001-07-18 19:32:10 +02:00
}
else
{
2001-08-13 16:11:07 +02:00
$bgcolor = $this -> theme [ 'bg04' ];
2001-07-18 19:32:10 +02:00
while ( list ( $index , $name ) = each ( $holiday_names ))
{
2001-08-13 03:34:32 +02:00
$time [ 99 ][ 0 ] = '<center>' . $name . '</center>' . $time [ 99 ][ 0 ];
2001-07-18 19:32:10 +02:00
}
}
2001-08-13 03:34:32 +02:00
// if (isset($time[99]) && strlen($time[99]) > 0)
if ( isset ( $time [ 99 ][ 0 ]))
2001-07-18 19:32:10 +02:00
{
$var = Array (
2001-08-13 03:34:32 +02:00
'event' => $time [ 99 ][ 0 ],
2001-07-18 19:32:10 +02:00
'bgcolor' => $bgcolor
);
2001-07-22 01:35:22 +02:00
$this -> output_template_array ( $p , 'item' , 'day_event' , $var );
2001-07-18 19:32:10 +02:00
$var = Array (
'open_link' => '' ,
'time' => ' ' ,
'close_link' => ''
);
2001-07-22 01:35:22 +02:00
$this -> output_template_array ( $p , 'item' , 'day_time' , $var );
2001-07-18 19:32:10 +02:00
$p -> parse ( 'row' , 'day_row' , True );
$p -> set_var ( 'item' , '' );
}
$rowspan = 0 ;
2001-07-22 01:35:22 +02:00
for ( $i = ( int ) $this -> bo -> prefs [ 'calendar' ][ 'workdaystarts' ]; $i <= ( int ) $this -> bo -> prefs [ 'calendar' ][ 'workdayends' ]; $i ++ )
2001-07-18 19:32:10 +02:00
{
2001-08-13 03:34:32 +02:00
for ( $j = 0 ; $j < ( 60 / intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ])); $j ++ )
2001-07-18 19:32:10 +02:00
{
2001-08-13 03:34:32 +02:00
$dtime = $this -> bo -> build_time_for_display (( $i * 10000 ) + (( $j * intval ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ])) * 100 ));
$p -> set_var ( 'extras' , '' );
$p -> set_var ( 'event' , ' ' );
if ( $rowspan > 1 )
2001-07-18 19:32:10 +02:00
{
2001-08-13 03:34:32 +02:00
// this might mean there's an overlap, or it could mean one event
// ends at 11:15 and another starts at 11:30.
// if (isset($time[$i]) && strlen($time[$i]))
if ( isset ( $time [ $i ][ $j ]))
{
$p -> set_var ( 'event' , $time [ $i ][ $j ]);
$p -> set_var ( 'bgcolor' , $GLOBALS [ 'phpgw' ] -> nextmatchs -> alternate_row_color ());
$p -> parse ( 'item' , 'day_event' , False );
}
$rowspan -- ;
}
// elseif (!isset($time[$i]) || !strlen($time[$i]))
elseif ( ! isset ( $time [ $i ][ $j ]))
{
$p -> set_var ( 'event' , ' ' );
2001-08-12 16:47:23 +02:00
$p -> set_var ( 'bgcolor' , $GLOBALS [ 'phpgw' ] -> nextmatchs -> alternate_row_color ());
2001-07-18 19:32:10 +02:00
$p -> parse ( 'item' , 'day_event' , False );
}
2001-08-13 03:34:32 +02:00
else
2001-07-18 19:32:10 +02:00
{
2001-08-13 03:34:32 +02:00
$rowspan = intval ( $rowspan_arr [ $i ][ $j ]);
if ( $rowspan > 1 )
{
$p -> set_var ( 'extras' , ' rowspan="' . $rowspan . '"' );
}
$p -> set_var ( 'event' , $time [ $i ][ $j ]);
$p -> set_var ( 'bgcolor' , $GLOBALS [ 'phpgw' ] -> nextmatchs -> alternate_row_color ());
$p -> parse ( 'item' , 'day_event' , False );
2001-07-18 19:32:10 +02:00
}
2001-08-13 03:34:32 +02:00
$open_link = ' - ' ;
$close_link = '' ;
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
if ( ! $this -> bo -> printer_friendly && $this -> bo -> check_perms ( PHPGW_ACL_ADD ))
2001-07-18 19:32:10 +02:00
{
2001-08-13 03:34:32 +02:00
$new_hour = intval ( substr ( $dtime , 0 , strpos ( $dtime , ':' )));
if ( $this -> bo -> prefs [ 'common' ][ 'timeformat' ] == '12' && $i > 12 )
{
$new_hour += 12 ;
}
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
$open_link .= '<a href="' . $this -> page ( 'add' , '&date=' . $date_to_eval . '&hour=' . $new_hour . '&minute=' . substr ( $dtime , strpos ( $dtime , ':' ) + 1 , 2 )) . '">' ;
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
$close_link = '</a>' ;
}
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
$var = Array (
'open_link' => $open_link ,
'time' => ( intval ( substr ( $dtime , 0 , strpos ( $dtime , ':' ))) < 10 ? '0' . $dtime : $dtime ),
'close_link' => $close_link
);
2001-07-18 19:32:10 +02:00
2001-08-13 03:34:32 +02:00
$this -> output_template_array ( $p , 'item' , 'day_time' , $var );
$p -> parse ( 'row' , 'day_row' , True );
$p -> set_var ( 'event' , '' );
$p -> set_var ( 'item' , '' );
}
2001-07-18 19:32:10 +02:00
} // end for
return $p -> fp ( 'out' , 'day' );
} // end function
2001-07-22 01:35:22 +02:00
2001-08-12 16:47:23 +02:00
function timematrix ( $param )
2001-07-22 01:35:22 +02:00
{
2001-08-12 16:47:23 +02:00
if ( ! is_array ( $param ))
{
$this -> index ();
}
$date = $param [ 'date' ];
$starttime = $param [ 'starttime' ];
$endtime = $param [ 'endtime' ];
$participants = $param [ 'participants' ];
2001-07-22 01:35:22 +02:00
if ( ! isset ( $this -> bo -> prefs [ 'calendar' ][ 'interval' ]))
{
$this -> bo -> prefs [ 'calendar' ][ 'interval' ] = 15 ;
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw' ] -> preferences -> add ( 'calendar' , 'interval' , 15 );
$GLOBALS [ 'phpgw' ] -> preferences -> save_repository ();
2001-07-22 01:35:22 +02:00
}
// $increment = $this->bo->prefs['calendar']['interval'];
$increment = 15 ;
$interval = ( int )( 60 / $increment );
2001-08-12 16:47:23 +02:00
$pix = $GLOBALS [ 'phpgw' ] -> common -> image ( 'calendar' , 'pix.gif' );
2001-07-28 15:17:30 +02:00
2001-08-12 16:47:23 +02:00
$str = '<center>' . lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'l' ))
. ', ' . lang ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'F' ))
. ' ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $date [ 'raw' ], 'd, Y' ) . '<br>'
2001-07-28 15:17:30 +02:00
. '<table width="85%" border="0" cellspacing="0" cellpadding="0" cols="' . (( 24 * $interval ) + 1 ) . '">'
. '<tr><td height="1" colspan="' . (( 24 * $interval ) + 1 ) . '" bgcolor="black"><img src="' . $pix . '"></td></tr>'
2001-08-13 16:11:07 +02:00
. '<tr><td width="15%"><font color="' . $this -> theme [ 'bg_text' ] . '" face="' . $this -> theme [ 'font' ] . '" size="-2">' . lang ( 'Participant' ) . '</font></td>' ;
2001-07-22 01:35:22 +02:00
for ( $i = 0 ; $i < 24 ; $i ++ )
{
for ( $j = 0 ; $j < $interval ; $j ++ )
{
switch ( $j )
{
case 0 :
case 1 :
switch ( $j )
{
case 0 :
$pre = '0' ;
break ;
case 1 :
$pre = substr ( strval ( $i ), 0 , 1 );
break ;
}
$k = ( $i <= 9 ? $pre : substr ( $i , $j , $j + 1 ));
if ( $increment == 60 )
{
$k .= substr ( strval ( $i ), strlen ( strval ( $i )) - 1 , 1 );
}
2001-08-13 16:11:07 +02:00
$str .= '<td align="left" bgcolor="' . $this -> theme [ 'bg_color' ] . '"><font color="' . $phpgw_info [ 'theme' ][ 'bg_text' ] . '" face="' . $this -> theme [ 'font' ] . '" size="-2">'
2001-07-28 15:17:30 +02:00
. '<a href="' . $this -> page ( 'add' , '&date=' . $date [ 'full' ] . '&hour=' . $i . '&minute=' . ( interval * $j )) . " \" onMouseOver= \" window.status=' " . $i . ':' . (( $increment * $j ) <= 9 ? '0' : '' ) . ( $increment * $j ) . " '; return true; \" > "
. $k . '</a></font></td>' ;
2001-07-22 01:35:22 +02:00
break ;
default :
2001-08-13 16:11:07 +02:00
$str .= '<td align="left" bgcolor="' . $this -> theme [ 'bg_color' ] . '"><font color="' . $phpgw_info [ 'theme' ][ 'bg_text' ] . '" face="' . $this -> theme [ 'font' ] . '" size="-2">'
2001-07-28 15:17:30 +02:00
. '<a href="' . $this -> page ( 'add' , '&date=' . $date [ 'full' ] . '&hour=' . $i . '&minute=' . ( interval * $j )) . " \" onMouseOver= \" window.status=' " . $i . ':' . ( $increment * $j ) . " '; return true; \" > "
. ' </a></font></td>' ;
2001-07-22 01:35:22 +02:00
break ;
}
}
}
2001-07-28 15:17:30 +02:00
$str .= '</tr>'
. '<tr><td height="1" colspan="' . (( 24 * $interval ) + 1 ) . '" bgcolor="black"><img src="' . $pix . '"></td></tr>' ;
2001-07-22 01:35:22 +02:00
if ( ! $endtime )
{
$endtime = $starttime ;
}
$owner = $this -> bo -> owner ;
while ( list ( $part , $status ) = each ( $participants ))
{
2001-07-28 15:17:30 +02:00
$str .= '<tr>'
2001-08-13 16:11:07 +02:00
. '<td width="15%"><font color="' . $this -> theme [ 'bg_text' ] . '" face="' . $this -> theme [ 'font' ] . '" size="-2">' . $this -> bo -> get_fullname ( $part ) . '</font></td>' ;
2001-07-22 01:35:22 +02:00
$this -> bo -> cached_events = Array ();
$this -> bo -> owner = $part ;
$this -> so -> owner = $part ;
2001-08-13 03:34:32 +02:00
$this -> bo -> store_to_cache (
Array (
'syear' => $date [ 'year' ],
'smonth' => $date [ 'month' ],
'sday' => $date [ 'day' ],
'eyear' => 0 ,
'emonth' => 0 ,
'eday' => $date [ 'day' ] + 1
)
);
2001-07-22 01:35:22 +02:00
if ( ! $this -> bo -> cached_events [ $date [ 'full' ]])
{
for ( $j = 0 ; $j < 24 ; $j ++ )
{
for ( $k = 0 ; $k < $interval ; $k ++ )
{
2001-08-13 16:11:07 +02:00
$str .= '<td height="1" align="left" bgcolor="' . $this -> theme [ 'bg_color' ] . '" color="#999999"> </td>' ;
2001-07-22 01:35:22 +02:00
}
}
}
else
{
$time_slice = $this -> bo -> prepare_matrix ( $interval , $increment , $part , $status , $date [ 'full' ]);
for ( $h = 0 ; $h < 24 ; $h ++ )
{
$hour = $h * 10000 ;
for ( $m = 0 ; $m < $interval ; $m ++ )
{
$index = ( $hour + (( $m * $increment ) * 100 ));
switch ( $time_slice [ $index ][ 'marker' ])
{
case ' ' :
2001-08-13 16:11:07 +02:00
$time_slice [ $index ][ 'color' ] = $this -> theme [ 'bg_color' ];
2001-07-22 01:35:22 +02:00
break ;
case '-' :
2001-08-13 16:11:07 +02:00
$time_slice [ $index ][ 'color' ] = $this -> theme [ 'bg01' ];
2001-07-22 01:35:22 +02:00
break ;
}
2001-08-13 16:11:07 +02:00
$str .= '<td height="1" align="left" bgcolor="' . $time_slice [ $index ][ 'color' ] . " \" color= \" #999999 \" onMouseOver= \" window.status=' " . $time_slice [ $index ][ 'description' ] . " '; return true; \" > " . '<font color="' . $this -> theme [ 'bg_text' ] . '" face="' . $this -> theme [ 'font' ] . '" size="-2">' . $time_slice [ $index ][ 'marker' ] . '</font></td>' ;
2001-07-22 01:35:22 +02:00
}
}
}
2001-07-28 15:17:30 +02:00
$str .= '</tr>'
. '<tr><td height="1" colspan="' . (( 24 * $interval ) + 1 ) . '" bgcolor="#999999"><img src="' . $pix . '"></td></tr>' ;
2001-07-22 01:35:22 +02:00
}
$this -> bo -> owner = $owner ;
$this -> so -> owner = $owner ;
2001-07-28 15:17:30 +02:00
return $str . '</table></center>' . " \n " ;
2001-07-22 01:35:22 +02:00
}
function get_response ( $cal_id )
{
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
2001-07-28 15:17:30 +02:00
$p -> set_file (
Array (
'form_button' => 'form_button_script.tpl'
)
2001-07-22 01:35:22 +02:00
);
$response_choices = Array (
ACCEPTED => lang ( 'Accept' ),
REJECTED => lang ( 'Reject' ),
TENTATIVE => lang ( 'Tentative' ),
NO_RESPONSE => lang ( 'No Response' )
);
2001-07-28 15:17:30 +02:00
$str = '' ;
2001-07-22 01:35:22 +02:00
while ( list ( $param , $text ) = each ( $response_choices ))
{
$var = Array (
2001-07-28 15:17:30 +02:00
'action_url_button' => $this -> page ( 'set_action' , Array ( 'cal_id' => $cal_id , 'action' => $param )),
2001-07-22 01:35:22 +02:00
'action_text_button' => ' ' . $text . ' ' ,
'action_confirm_button' => '' ,
'action_extra_field' => ''
);
$p -> set_var ( $var );
$str .= '<td>' . $p -> fp ( 'out' , 'form_button' ) . '</td>' . " \n " ;
}
2001-07-28 15:17:30 +02:00
return '<table width="100%" cols="4"><tr align="center">' . " \n " . $str . '</tr></table>' . " \n " ;
}
2001-08-12 16:47:23 +02:00
function edit_form ( $param )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
if ( ! is_array ( $param ))
{
$this - index ();
}
if ( isset ( $param [ 'event' ]))
{
$event = $param [ 'event' ];
}
2001-08-13 03:34:32 +02:00
2001-07-28 15:17:30 +02:00
$hourformat = substr ( $this -> bo -> users_timeformat , 0 , 1 );
$sb = CreateObject ( 'phpgwapi.sbox' );
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappheader' ] = True ;
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noappfooter' ] = True ;
$GLOBALS [ 'phpgw' ] -> common -> phpgw_header ();
2001-07-28 15:17:30 +02:00
$p = CreateObject ( 'phpgwapi.Template' , $this -> template_dir );
$p -> set_file (
Array (
'edit' => 'edit.tpl' ,
'form_button' => 'form_button_script.tpl'
)
);
$p -> set_block ( 'edit' , 'edit_entry' , 'edit_entry' );
$p -> set_block ( 'edit' , 'list' , 'list' );
$p -> set_block ( 'edit' , 'hr' , 'hr' );
$vars = Array (
2001-08-13 16:11:07 +02:00
'font' => $this -> theme [ 'font' ],
'bg_color' => $this -> theme [ 'bg_text' ],
2001-08-13 03:34:32 +02:00
'calendar_action' => ( $event [ 'id' ] ? lang ( 'Calendar - Edit' ) : lang ( 'Calendar - Add' )),
2001-08-13 16:11:07 +02:00
'action_url' => $GLOBALS [ 'phpgw' ] -> link ( '/index.php' , Array ( 'menuaction' => 'calendar.bocalendar.update' )),
2001-07-30 00:09:24 +02:00
'common_hidden' => '<input type="hidden" name="cal[id]" value="' . $event [ 'id' ] . '">' . " \n "
2001-07-28 15:17:30 +02:00
. '<input type="hidden" name="cal[owner]" value="' . $this -> bo -> owner . '">' . " \n " ,
2001-08-13 03:34:32 +02:00
'errormsg' => ( $params [ 'cd' ] ? $GLOBALS [ 'phpgw' ] -> common -> check_code ( $params [ 'cd' ]) : '' )
2001-07-28 15:17:30 +02:00
);
$p -> set_var ( $vars );
// Brief Description
$var [] = Array (
'field' => lang ( 'Title' ),
2001-07-30 00:09:24 +02:00
'data' => '<input name="cal[title]" size="25" maxlength="80" value="' . $event [ 'title' ] . '">'
2001-07-28 15:17:30 +02:00
);
// Full Description
$var [] = Array (
'field' => lang ( 'Full Description' ),
2001-07-30 00:09:24 +02:00
'data' => '<textarea name="cal[description]" rows="5" cols="40" wrap="virtual" maxlength="2048">' . $event [ 'description' ] . '</textarea>'
2001-07-28 15:17:30 +02:00
);
// Display Categories
$var [] = Array (
'field' => lang ( 'Category' ),
2001-07-30 00:09:24 +02:00
'data' => '<select name="cal[category]"><option value="">' . lang ( 'Choose the category' ) . '</option>' . $this -> cat -> formated_list ( 'select' , 'all' , $event [ 'category' ], True ) . '</select>'
2001-07-28 15:17:30 +02:00
);
// Date
2001-08-13 16:11:07 +02:00
$start = $this -> bo -> maketime ( $event [ 'start' ]) - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
$var [] = Array (
'field' => lang ( 'Start Date' ),
2001-08-12 16:47:23 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> dateformatorder (
$sb -> getYears ( 'start[year]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $start , 'Y' ))),
$sb -> getMonthText ( 'start[month]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $start , 'n' ))),
$sb -> getDays ( 'start[mday]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $start , 'd' )))
2001-07-28 15:17:30 +02:00
)
);
// Time
if ( $this -> bo -> prefs [ 'common' ][ 'timeformat' ] == '12' )
{
2001-08-06 04:41:36 +02:00
$str .= '<input type="radio" name="start[ampm]" value="am"' . ( $event [ 'start' ][ 'hour' ] >= 12 ? '' : ' checked' ) . '>am' . " \n "
. '<input type="radio" name="start[ampm]" value="pm"' . ( $event [ 'start' ][ 'hour' ] >= 12 ? ' checked' : '' ) . '>pm' . " \n " ;
2001-07-28 15:17:30 +02:00
}
$var [] = Array (
'field' => lang ( 'Start Time' ),
2001-08-12 16:47:23 +02:00
'data' => '<input name="start[hour]" size="2" VALUE="' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $start , $hourformat ) . '" maxlength="2">:<input name="start[min]" size="2" value="' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $start , 'i' ) . '" maxlength="2">' . " \n " . $str
2001-07-28 15:17:30 +02:00
);
// End Date
2001-08-13 16:11:07 +02:00
$end = $this -> bo -> maketime ( $event [ 'end' ]) - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
$var [] = Array (
'field' => lang ( 'End Date' ),
2001-08-12 16:47:23 +02:00
'data' => $GLOBALS [ 'phpgw' ] -> common -> dateformatorder (
$sb -> getYears ( 'end[year]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , 'Y' ))),
$sb -> getMonthText ( 'end[month]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , 'n' ))),
$sb -> getDays ( 'end[mday]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , 'd' )))
2001-07-28 15:17:30 +02:00
)
);
// End Time
if ( $this -> bo -> prefs [ 'common' ][ 'timeformat' ] == '12' )
{
2001-08-06 04:41:36 +02:00
$str = '<input type="radio" name="end[ampm]" value="am"' . ( $event [ 'end' ][ 'hour' ] >= 12 ? '' : ' checked' ) . '>am' . " \n "
. '<input type="radio" name="end[ampm]" value="pm"' . ( $event [ 'end' ][ 'hour' ] >= 12 ? ' checked' : '' ) . '>pm' . " \n " ;
2001-07-28 15:17:30 +02:00
}
$var [] = Array (
'field' => lang ( " End Time " ),
2001-08-12 16:47:23 +02:00
'data' => '<input name="end[hour]" size="2" VALUE="' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , $hourformat ) . '" maxlength="2">:<input name="end[min]" size="2" value="' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $end , 'i' ) . '" maxlength="2">' . " \n " . $str
2001-07-28 15:17:30 +02:00
);
// Priority
$var [] = Array (
'field' => lang ( 'Priority' ),
2001-07-30 00:09:24 +02:00
'data' => $sb -> getPriority ( 'cal[priority]' , $event [ 'priority' ])
2001-07-28 15:17:30 +02:00
);
// Access
$var [] = Array (
'field' => lang ( 'Private' ),
2001-07-30 00:09:24 +02:00
'data' => '<input type="checkbox" name="cal[private]" value="private"' . ( ! $event [ 'public' ] ? ' checked' : '' ) . '>'
2001-07-28 15:17:30 +02:00
);
// Participants
2001-08-12 16:47:23 +02:00
$accounts = $GLOBALS [ 'phpgw' ] -> acl -> get_ids_for_location ( 'run' , 1 , 'calendar' );
2001-07-28 15:17:30 +02:00
$users = Array ();
2001-08-06 04:41:36 +02:00
$this -> build_part_list ( $users , $accounts , $event [ 'owner' ]);
2001-07-28 15:17:30 +02:00
$str = '' ;
@ asort ( $users );
@ reset ( $users );
while ( list ( $id , $name ) = each ( $users ))
{
if ( intval ( $id ) != intval ( $this -> bo -> owner ))
{
2001-08-12 16:47:23 +02:00
$str .= ' <option value="' . $id . '"' . ( $event [ 'participants' ][ $id ] ? ' selected' : '' ) . '>(' . $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( $id ) . ') ' . $name . '</option>' . " \n " ;
2001-07-28 15:17:30 +02:00
}
}
$var [] = Array (
'field' => lang ( 'Participants' ),
'data' => " \n " . ' <select name="participants[]" multiple size="5">' . " \n " . $str . ' </select>'
);
// I Participate
2001-08-06 04:41:36 +02:00
if ((( $event [ 'id' ] > 0 ) && isset ( $event [ 'participants' ][ $this -> bo -> owner ])) || ! $event [ 'id' ])
2001-07-28 15:17:30 +02:00
{
$checked = ' checked' ;
}
else
{
$checked = '' ;
}
$var [] = Array (
2001-08-12 16:47:23 +02:00
'field' => $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $this -> bo -> owner ) . ' ' . lang ( 'Participates' ),
2001-07-28 15:17:30 +02:00
'data' => '<input type="checkbox" name="participants[]" value="' . $this -> bo -> owner . '"' . $checked . '>'
);
for ( $i = 0 ; $i < count ( $var ); $i ++ )
{
$this -> output_template_array ( $p , 'row' , 'list' , $var [ $i ]);
}
unset ( $var );
// Repeat Type
$p -> set_var ( 'hr_text' , '<hr>' );
$p -> parse ( 'row' , 'hr' , True );
$p -> set_var ( 'hr_text' , '<center><b>' . lang ( 'Repeating Event Information' ) . '</b></center><br>' );
$p -> parse ( 'row' , 'hr' , True );
$rpt_type = Array (
MCAL_RECUR_NONE ,
MCAL_RECUR_DAILY ,
MCAL_RECUR_WEEKLY ,
MCAL_RECUR_MONTHLY_WDAY ,
MCAL_RECUR_MONTHLY_MDAY ,
MCAL_RECUR_YEARLY
);
$rpt_type_out = Array (
MCAL_RECUR_NONE => 'None' ,
MCAL_RECUR_DAILY => 'Daily' ,
MCAL_RECUR_WEEKLY => 'Weekly' ,
MCAL_RECUR_MONTHLY_WDAY => 'Monthly (by day)' ,
MCAL_RECUR_MONTHLY_MDAY => 'Monthly (by date)' ,
MCAL_RECUR_YEARLY => 'Yearly'
);
$str = '' ;
for ( $l = 0 ; $l < count ( $rpt_type ); $l ++ )
{
2001-07-30 00:09:24 +02:00
$str .= '<option value="' . $rpt_type [ $l ] . '"' . ( $event [ 'recur_type' ] == $rpt_type [ $l ] ? ' selected' : '' ) . '>' . lang ( $rpt_type_out [ $rpt_type [ $l ]]) . '</option>' ;
2001-07-28 15:17:30 +02:00
}
$var [] = Array (
'field' => lang ( 'Repeat Type' ),
'data' => '<select name="cal[recur_type]">' . " \n " . $str . '</select>' . " \n "
);
2001-07-30 00:09:24 +02:00
if ( $event [ 'recur_enddate' ][ 'year' ] != 0 && $event [ 'recur_enddate' ][ 'month' ] != 0 && $event [ 'recur_enddate' ][ 'mday' ] != 0 )
2001-07-28 15:17:30 +02:00
{
$checked = ' checked' ;
2001-08-13 16:11:07 +02:00
$recur_end = $this -> bo -> maketime ( $event [ 'recur_enddate' ]) - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
}
else
{
$checked = '' ;
2001-08-13 16:11:07 +02:00
$recur_end = $this -> bo -> maketime ( $event [ 'start' ]) + 86400 - $this -> tz_offset ;
2001-07-28 15:17:30 +02:00
}
$var [] = Array (
'field' => lang ( 'Repeat End Date' ),
'data' => '<input type="checkbox" name="cal[rpt_use_end]" value="y"' . $checked . '>' . lang ( 'Use End Date' ) . ' '
2001-08-12 16:47:23 +02:00
. $GLOBALS [ 'phpgw' ] -> common -> dateformatorder (
$sb -> getYears ( 'recur_enddate[year]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $recur_end , 'Y' ))),
$sb -> getMonthText ( 'recur_enddate[month]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $recur_end , 'n' ))),
$sb -> getDays ( 'recur_enddate[mday]' , intval ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $recur_end , 'd' )))
2001-07-28 15:17:30 +02:00
)
);
$var [] = Array (
'field' => lang ( 'Repeat Day' ) . '<br>' . lang ( '(for weekly)' ),
2001-07-30 00:09:24 +02:00
'data' => '<input type="checkbox" name="cal[rpt_sun]" value="' . MCAL_M_SUNDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_SUNDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Sunday' ) . ' '
. '<input type="checkbox" name="cal[rpt_mon]" value="' . MCAL_M_MONDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_MONDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Monday' ) . ' '
. '<input type="checkbox" name="cal[rpt_tue]" value="' . MCAL_M_TUESDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_TUESDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Tuesday' ) . ' '
. '<input type="checkbox" name="cal[rpt_wed]" value="' . MCAL_M_WEDNESDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_WEDNESDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Wednesday' ) . ' <br>'
. '<input type="checkbox" name="cal[rpt_thu]" value="' . MCAL_M_THURSDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_THURSDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Thursday' ) . ' '
. '<input type="checkbox" name="cal[rpt_fri]" value="' . MCAL_M_FRIDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_FRIDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Friday' ) . ' '
. '<input type="checkbox" name="cal[rpt_sat]" value="' . MCAL_M_SATURDAY . '"' . (( $event [ 'recur_data' ] & MCAL_M_SATURDAY ) ? ' checked' : '' ) . '> ' . lang ( 'Saturday' ) . ' '
2001-07-28 15:17:30 +02:00
);
$var [] = Array (
'field' => lang ( 'Frequency' ),
2001-07-30 00:09:24 +02:00
'data' => '<input name="cal[recur_interval]" size="4" maxlength="4" value="' . $event [ 'recur_interval' ] . '">'
2001-07-28 15:17:30 +02:00
);
for ( $i = 0 ; $i < count ( $var ); $i ++ )
{
$this -> output_template_array ( $p , 'row' , 'list' , $var [ $i ]);
}
$p -> set_var ( 'submit_button' , lang ( 'Submit' ));
2001-08-15 04:25:26 +02:00
if ( $event [ 'id' ] > 0 )
2001-07-28 15:17:30 +02:00
{
$var = Array (
2001-08-15 04:25:26 +02:00
'action_url_button' => $this -> page ( 'delete' , '&cal_id=' . $event [ 'id' ]),
2001-07-28 15:17:30 +02:00
'action_text_button' => lang ( 'Delete' ),
'action_confirm_button' => " onClick= \" return confirm(' " . lang ( " Are you sure \\ nyou want to \\ ndelete this entry? \\ n \\ nThis will delete \\ nthis entry for all users. " ) . " ') \" " ,
'action_extra_field' => ''
);
$p -> set_var ( $var );
$p -> parse ( 'delete_button' , 'form_button' );
}
else
{
$p -> set_var ( 'delete_button' , '' );
}
$p -> pparse ( 'out' , 'edit_entry' );
}
function build_part_list ( & $users , $accounts , $owner )
{
if ( $accounts == False )
{
return ;
}
while ( list ( $index , $id ) = each ( $accounts ))
{
if ( intval ( $id ) == $owner )
{
continue ;
}
if ( ! isset ( $users [ intval ( $id )]))
{
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw' ] -> accounts -> exists ( intval ( $id )) == True )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
$users [ intval ( $id )] = $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( intval ( $id ));
2001-07-28 15:17:30 +02:00
}
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( intval ( $id )) == 'g' )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
$this -> build_part_list ( $users , $GLOBALS [ 'phpgw' ] -> acl -> get_ids_for_location ( intval ( $id ), 1 , 'phpgw_group' ), $owner );
2001-07-28 15:17:30 +02:00
}
}
}
2001-07-22 01:35:22 +02:00
}
2001-07-16 13:38:40 +02:00
}
?>