2000-08-18 05:24:22 +02:00
< ? php
/************************************************************************** \
* phpGroupWare - Calendar *
* http :// www . phpgroupware . org *
* Based on Webcalendar by Craig Knudsen < cknudsen @ radix . net > *
* http :// www . radix . net /~ cknudsen *
2001-01-17 13:35:43 +01:00
* Modified by Mark Peters < skeeter @ phpgroupware . org > *
2000-08-18 05:24:22 +02:00
* -------------------------------------------- *
* 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$ */
2001-02-18 23:33:10 +01:00
$phpgw_flags = Array (
'currentapp' => 'calendar' ,
'noheader' => True ,
'nonavbar' => True ,
'enable_nextmatchs_class' => True
);
$phpgw_info [ 'flags' ] = $phpgw_flags ;
include ( '../header.inc.php' );
$sb = CreateObject ( 'phpgwapi.sbox' );
$cal_info = CreateObject ( 'calendar.calendar_item' );
function display_item ( $field , $data )
{
global $p ;
$p -> set_var ( 'field' , $field );
$p -> set_var ( 'data' , $data );
$p -> parse ( 'output' , 'list' , True );
}
if ( $phpgw_info [ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] == '12' )
{
$hourformat = 'h' ;
}
else
{
$hourformat = 'H' ;
}
if ( $id > 0 )
{
$cal = $phpgw -> calendar -> getevent ( intval ( $id ));
$cal_info = $cal [ 0 ];
$can_edit = False ;
if (( $cal_info -> owner == $owner ) || ( $phpgw -> calendar -> check_perms ( PHPGW_ACL_EDIT ) == True ))
{
$can_edit = True ;
}
if ( $can_edit == False )
{
header ( 'Location: ' . $phpgw -> link ( 'view.php' , 'id=' . $id . '&owner=' . $owner ));
}
if ( $cal_info -> rpt_end_use == False )
{
$cal_info -> rpt_end = $cal_info -> datetime + 86400 ;
}
}
elseif ( isset ( $readsess ))
{
$data = $phpgw -> session -> appsession ( 'entry' , 'calendar' );
$cal_info = unserialize ( $data );
if ( $cal_info -> owner == 0 )
{
$cal_info -> owner = $owner ;
}
$can_edit = True ;
}
else
{
if ( $phpgw -> calendar -> check_perms ( PHPGW_ACL_ADD ) == False )
{
header ( 'Location: ' . $phpgw -> link ( 'view.php' , 'id=' . $id . '&owner=' . $owner ));
}
$cal_info -> id = 0 ;
$cal_info -> owner = $owner ;
$can_edit = True ;
if ( ! isset ( $hour ))
{
$thishour = 0 ;
}
else
{
$thishour = ( int ) $hour ;
}
if ( ! isset ( $minute ))
{
$thisminute = 00 ;
}
else
{
$thisminute = ( int ) $minute ;
}
$datetime = $phpgw -> calendar -> makegmttime ( $thishour , $thisminute , 0 , $thismonth , $thisday , $thisyear );
$cal_info -> datetime = $datetime [ 'raw' ];
$cal_info -> edatetime = $cal_info -> datetime ;
$cal_info -> name = " " ;
$cal_info -> description = " " ;
$cal_info -> priority = 2 ;
$cal_info -> rpt_end = $cal_info -> datetime + 86400 ;
}
$phpgw -> common -> phpgw_header ();
echo parse_navbar ();
$p = CreateObject ( 'phpgwapi.Template' , $phpgw -> common -> get_tpl_dir ( 'calendar' ));
$templates = Array (
'edit_entry_begin' => 'edit.tpl' ,
'list' => 'list.tpl' ,
'hr' => 'hr.tpl' ,
'edit_entry_end' => 'edit.tpl' ,
'form_button' => 'form_button_script.tpl'
);
$p -> set_file ( $templates );
// $p->set_block('edit_entry_begin','list','hr','edit_entry_end','form_button');
if ( $id > 0 )
{
$action = lang ( 'Calendar - Edit' );
}
else
{
$action = lang ( 'Calendar - Add' );
}
$common_hidden = '<input type="hidden" name="cal[id]" value="' . $cal_info -> id . '">' . " \n "
. '<input type="hidden" name="cal[owner]" value="' . $owner . '">' . " \n "
. '<input type="hidden" name="owner" value="' . $owner . '">' . " \n " ;
$vars = Array (
'bg_color' => $phpgw_info [ 'theme' ][ 'bg_text' ],
'calendar_action' => $action ,
'action_url' => $phpgw -> link ( 'edit_entry_handler.php' ),
'common_hidden' => $common_hidden
);
$p -> set_var ( $vars );
$p -> parse ( 'out' , 'edit_entry_begin' );
2000-08-18 05:24:22 +02:00
2000-11-26 21:10:35 +01:00
// Brief Description
2001-02-18 23:33:10 +01:00
display_item ( lang ( 'Brief Description' ), '<input name="cal[name]" size="25" value="' . $cal_info -> name . '">' );
2000-11-26 21:10:35 +01:00
// Full Description
2001-02-18 23:33:10 +01:00
display_item ( lang ( 'Full Description' ), '<textarea name="cal[description]" rows="5" cols="40" wrap="virtual">' . $cal_info -> description . '</textarea>' );
2000-08-18 05:24:22 +02:00
2000-11-26 21:10:35 +01:00
// Date
2001-02-18 23:33:10 +01:00
$day_html = $sb -> getDays ( 'cal[day]' , intval ( $phpgw -> common -> show_date ( $cal_info -> datetime , 'd' )));
$month_html = $sb -> getMonthText ( 'cal[month]' , intval ( $phpgw -> common -> show_date ( $cal_info -> datetime , 'n' )));
$year_html = $sb -> getYears ( 'cal[year]' , intval ( $phpgw -> common -> show_date ( $cal_info -> datetime , 'Y' )), intval ( $phpgw -> common -> show_date ( $cal_info -> datetime , 'Y' )));
display_item ( lang ( 'Start Date' ), $phpgw -> common -> dateformatorder ( $year_html , $month_html , $day_html ));
2000-08-18 05:24:22 +02:00
2000-11-26 21:10:35 +01:00
// Time
2001-02-18 23:33:10 +01:00
$amsel = ' checked' ; $pmsel = '' ;
if ( $phpgw_info [ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] == '12' )
{
if ( $cal_info -> ampm == 'pm' )
{
$amsel = '' ; $pmsel = ' checked' ;
}
}
$str = '<input name="cal[hour]" size="2" VALUE="' . $phpgw -> common -> show_date ( $cal_info -> datetime , $hourformat ) . '" maxlength="2">:<input name="cal[minute]" size="2" value="' . $phpgw -> common -> show_date ( $cal_info -> datetime , 'i' ) . '" maxlength="2">' ;
if ( $phpgw_info [ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] == '12' )
{
$str .= '<input type="radio" name="cal[ampm]" value="am"' . $amsel . '>am' ;
$str .= '<input type="radio" name="cal[ampm]" value="pm"' . $pmsel . '>pm' ;
}
2000-12-04 02:11:53 +01:00
2001-02-18 23:33:10 +01:00
display_item ( lang ( 'Start Time' ), $str );
2000-12-04 02:11:53 +01:00
2001-02-18 23:33:10 +01:00
// End Date
$day_html = $sb -> getDays ( 'cal[end_day]' , intval ( $phpgw -> common -> show_date ( $cal_info -> edatetime , 'd' )));
$month_html = $sb -> getMonthText ( 'cal[end_month]' , intval ( $phpgw -> common -> show_date ( $cal_info -> edatetime , 'n' )));
$year_html = $sb -> getYears ( 'cal[end_year]' , intval ( $phpgw -> common -> show_date ( $cal_info -> edatetime , 'Y' )), intval ( $phpgw -> common -> show_date ( $cal_info -> edatetime , 'Y' )));
display_item ( lang ( 'End Date' ), $phpgw -> common -> dateformatorder ( $year_html , $month_html , $day_html ));
2000-12-04 02:11:53 +01:00
// End Time
2001-02-18 23:33:10 +01:00
$amsel = ' checked' ; $pmsel = '' ;
if ( $phpgw_info [ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] == '12' )
{
if ( $cal_info -> end_ampm == 'pm' )
{
$amsel = '' ; $pmsel = ' checked' ;
}
}
$str = '<input name="cal[end_hour]" size="2" VALUE="' . $phpgw -> common -> show_date ( $cal_info -> edatetime , $hourformat ) . '" maxlength="2">:<input name="cal[end_minute]" size="2" value="' . $phpgw -> common -> show_date ( $cal_info -> edatetime , 'i' ) . '" maxlength="2">' ;
if ( $phpgw_info [ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] == '12' )
{
$str .= '<input type="radio" name="cal[end_ampm]" value="am"' . $amsel . '>am' ;
$str .= '<input type="radio" name="cal[end_ampm]" value="pm"' . $pmsel . '>pm' ;
}
2000-12-04 02:11:53 +01:00
2000-12-23 17:33:22 +01:00
display_item ( lang ( " End Time " ), $str );
2000-11-23 02:37:50 +01:00
2000-11-26 21:10:35 +01:00
// Priority
2001-02-18 23:33:10 +01:00
display_item ( lang ( 'Priority' ), $sb -> getPriority ( 'cal[priority]' , $cal_info -> priority ));
2000-11-23 02:37:50 +01:00
2000-12-23 17:33:22 +01:00
// Access
2001-02-18 23:33:10 +01:00
$str = '<input type="checkbox" name="cal[access]" value="private"' ;
if ( $cal_info -> access == 'private' )
{
$str .= ' checked' ;
}
$str .= '>' ;
display_item ( lang ( 'Private' ), $str );
2000-11-23 02:37:50 +01:00
2000-11-26 21:10:35 +01:00
// Groups
2001-02-18 23:33:10 +01:00
// $user_groups = $phpgw->accounts->memberships(intval($owner));
// display_item(lang('Groups'),$sb->getGroups($user_groups,$cal_info->groups,'cal[groups][]'));
2000-11-23 02:37:50 +01:00
2000-11-26 19:03:20 +01:00
// Participants
2001-02-18 23:33:10 +01:00
// Start Here.....
$accounts = $phpgw -> acl -> get_ids_for_location ( 'run' , 1 , 'calendar' );
$users = Array ();
for ( $i = 0 ; $i < count ( $accounts ); $i ++ )
{
$user = $accounts [ $i ];
if ( $user != $owner && ! isset ( $users [ $user ]))
{
$users [ $user ] = $phpgw -> common -> grab_owner_name ( $user );
if ( $phpgw -> accounts -> get_type ( $user ) == 'g' )
{
$group_members = $phpgw -> acl -> get_ids_for_location ( $user , 1 , 'phpgw_group' );
if ( $group_members != False )
{
for ( $j = 0 ; $j < count ( $group_members ); $j ++ )
{
if ( $group_members [ $j ] != $owner && ! isset ( $users [ $group_members [ $j ]]))
{
$users [ $group_members [ $j ]] = $phpgw -> common -> grab_owner_name ( $group_members [ $j ]);
}
}
}
}
}
}
if ( $num_users > 50 )
{
$size = 15 ;
}
elseif ( $num_users > 5 )
{
$size = 5 ;
}
else
{
$size = $num_users ;
}
$str = " \n " . ' <select name="cal[participants][]" multiple size="5">' . " \n " ;
for ( $l = 0 ; $l < count ( $cal_info -> participants ); $l ++ )
{
$parts [ $cal_info -> participants [ $l ]] = ' selected' ;
}
2001-02-11 03:38:50 +01:00
2001-02-18 23:33:10 +01:00
@ asort ( $users );
@ reset ( $users );
while ( $user = each ( $users ))
{
if ( $user [ 0 ] != $owner && $phpgw -> accounts -> exists ( $user [ 0 ]) == True )
{
$str .= ' <option value="' . $user [ 0 ] . '"' . $parts [ $user [ 0 ]] . '>(' . $phpgw -> accounts -> get_type ( $user [ 0 ]) . ') ' . $user [ 1 ] . '</option>' . " \n " ;
}
}
$str .= ' </select>' ;
display_item ( lang ( 'Participants' ), $str );
2000-11-23 02:37:50 +01:00
2000-11-26 19:03:20 +01:00
// I Participate
2001-02-18 23:33:10 +01:00
$participate = False ;
if ( $id )
{
for ( $i = 0 ; $i < count ( $cal_info -> participants ); $i ++ )
{
if ( $cal_info -> participants [ $i ] == $owner )
{
$participate = True ;
}
}
2000-11-26 19:03:20 +01:00
}
2001-02-18 23:33:10 +01:00
$str = '<input type="checkbox" name="cal[participants][]" value="' . $owner . '"' ;
if ((( $id > 0 ) && ( $participate == True )) || ! isset ( $id ))
{
$str .= ' checked' ;
}
$str .= '>' ;
display_item ( $phpgw -> common -> grab_owner_name ( $owner ) . ' ' . lang ( 'Participates' ), $str );
2000-11-26 19:03:20 +01:00
// Repeat Type
2001-02-18 23:33:10 +01:00
$p -> set_var ( 'hr_text' , '<hr>' );
$p -> parse ( 'output' , 'hr' , True );
$p -> set_var ( 'hr_text' , '<center><b>' . lang ( 'Repeating Event Information' ) . '</b></center><br>' );
$p -> parse ( 'output' , 'hr' , True );
$str = '<select name="cal[rpt_type]">' ;
$rpt_type_str = Array (
'none' ,
'daily' ,
'weekly' ,
'monthlybyday' ,
'monthlybydate' ,
'yearly'
);
$rpt_type_out = Array (
'none' => 'None' ,
'daily' => 'Daily' ,
'weekly' => 'Weekly' ,
'monthlybyday' => 'Monthly (by day)' ,
'monthlybydate' => 'Monthly (by date)' ,
'yearly' => 'Yearly'
);
for ( $l = 0 ; $l < count ( $rpt_type_str ); $l ++ )
{
$str .= '<option value="' . $rpt_type_str [ $l ] . '"' ;
if ( ! strcmp ( $cal_info -> rpt_type , $rpt_type_str [ $l ]))
{
$str .= ' selected' ;
}
$str .= '>' . lang ( $rpt_type_out [ $rpt_type_str [ $l ]]) . '</option>' ;
}
$str .= '</select>' ;
display_item ( lang ( 'Repeat Type' ), $str );
$p -> set_var ( 'field' , lang ( 'Repeat End Date' ));
$str = '<input type="checkbox" name="cal[rpt_use_end]" value="y"' ;
if ( $cal_info -> rpt_use_end )
{
$str .= ' checked' ;
}
$str .= '>' . lang ( 'Use End Date' ) . ' ' ;
$day_html = $sb -> getDays ( 'cal[rpt_day]' , intval ( $phpgw -> common -> show_date ( $cal_info -> rpt_end , 'd' )));
$month_html = $sb -> getMonthText ( 'cal[rpt_month]' , intval ( $phpgw -> common -> show_date ( $cal_info -> rpt_end , 'n' )));
$year_html = $sb -> getYears ( 'cal[rpt_year]' , intval ( $phpgw -> common -> show_date ( $cal_info -> rpt_end , 'Y' )), intval ( $phpgw -> common -> show_date ( $cal_info -> rpt_end , 'Y' )));
$str .= $phpgw -> common -> dateformatorder ( $year_html , $month_html , $day_html );
display_item ( lang ( 'Repeat End Date' ), $str );
$str = '<input type="checkbox" name="cal[rpt_sun]" value="1"' . ( $cal_info -> rpt_sun ? ' checked' : '' ) . '> ' . lang ( 'Sunday' ) . ' ' ;
$str .= '<input type="checkbox" name="cal[rpt_mon]" value="1"' . ( $cal_info -> rpt_mon ? ' checked' : '' ) . '> ' . lang ( 'Monday' ) . ' ' ;
$str .= '<input type="checkbox" name="cal[rpt_tue]" value="1"' . ( $cal_info -> rpt_tue ? ' checked' : '' ) . '> ' . lang ( 'Tuesday' ) . ' ' ;
$str .= '<input type="checkbox" name="cal[rpt_wed]" value="1"' . ( $cal_info -> rpt_wed ? ' checked' : '' ) . '> ' . lang ( 'Wednesday' ) . ' ' ;
$str .= '<input type="checkbox" name="cal[rpt_thu]" value="1"' . ( $cal_info -> rpt_thu ? ' checked' : '' ) . '> ' . lang ( 'Thursday' ) . ' ' ;
$str .= '<input type="checkbox" name="cal[rpt_fri]" value="1"' . ( $cal_info -> rpt_fri ? ' checked' : '' ) . '> ' . lang ( 'Friday' ) . ' ' ;
$str .= '<input type="checkbox" name="cal[rpt_sat]" value="1"' . ( $cal_info -> rpt_sat ? ' checked' : '' ) . '> ' . lang ( 'Saturday' ) . ' ' ;
display_item ( lang ( 'Repeat Day' ) . '<br>' . lang ( '(for weekly)' ), $str );
display_item ( lang ( 'Frequency' ), '<input name="cal[rpt_freq]" size="4" maxlength="4" value="' . $cal_info -> rpt_freq . '">' );
$p -> set_var ( 'submit_button' , lang ( 'Submit' ));
if ( $id > 0 )
{
$p -> set_var ( 'action_url_button' , $phpgw -> link ( 'delete.php' , 'id=' . $id ));
$p -> set_var ( 'action_text_button' , lang ( 'Delete' ));
$p -> set_var ( '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. " ) . " ') \" " );
$p -> parse ( 'delete_button' , 'form_button' );
$p -> pparse ( 'out' , 'edit_entry_end' );
}
else
{
$p -> set_var ( 'delete_button' , '' );
$p -> pparse ( 'out' , 'edit_entry_end' );
}
$phpgw -> common -> phpgw_footer ();
2000-08-18 05:24:22 +02:00
?>