public function applet($conf, &$opts)
{
$opts['go'] = false;
$this->date = $this->get_module_variable_or_unique_href_variable('date');
if ($this->date == null) {
$this->date = date('Y-m-15');
}
$this->set_module_variable('date', $this->date);
$this->date = strtotime($this->date);
$theme = $this->pack_module('Base/Theme');
$theme->assign('nextyear_href', $this->create_unique_href(array('date' => date('Y-m-15', $this->date + 30 * 24 * 60 * 60))));
$theme->assign('today_href', $this->create_unique_href(array('date' => date('Y-m-d'))));
$theme->assign('prevyear_href', $this->create_unique_href(array('date' => date('Y-m-15', $this->date - 30 * 24 * 60 * 60))));
$link_text = $this->create_unique_href_js(array('date' => '__YEAR__-__MONTH__-__DAY__'));
$theme->assign('popup_calendar', Utils_PopupCalendarCommon::show('week_selector', $link_text, 'month', null, null, ''));
$day_headers = array();
$day = strtotime('Sun');
$day = strtotime('+' . Utils_PopupCalendarCommon::get_first_day_of_week() . ' days', $day);
for ($i = 0; $i < 7; $i++) {
$day_headers[] = __date('D', $day);
$day = strtotime('+1 day', $day);
}
$year = array();
$me = CRM_ContactsCommon::get_my_record();
CRM_Calendar_EventCommon::$filter = '(' . $me['id'] . ')';
$ret = call_user_func(array('CRM_Calendar_EventCommon', 'get_event_days'), date('Y-m-01', $this->date), date('Y-m-d', strtotime(date('Y-m-t', $this->date)) + 86400));
$month = $this->month_array($this->date, $ret);
$year[] = array('month' => $month, 'month_link' => Base_BoxCommon::create_href($this, 'CRM_Calendar', null, null, null, array('jump_to_date' => $this->date, 'switch_to_tab' => 'Month')), 'month_label' => __date('F', $this->date), 'year_label' => date('Y', $this->date));
$theme->assign('year', $year);
$theme->assign('day_headers', $day_headers);
$theme->display('year');
}
public static function get_all($start, $end, $filter = null)
{
if ($filter === null) {
$filter = self::$filter;
}
$custom_handlers = DB::GetAssoc('SELECT id, handler_callback FROM crm_calendar_custom_events_handlers');
$result = array();
if (self::$events_handlers === null) {
self::$events_handlers = array_keys($custom_handlers);
}
$count = 0;
foreach (self::$events_handlers as $handler) {
$callback = explode('::', $custom_handlers[$handler]);
$result_ext = call_user_func($callback, 'get_all', $start, $end, $filter);
foreach ($result_ext as $v) {
if ($v !== null) {
$v['id'] = $handler . '#' . $v['id'];
$v['custom_agenda_col_0'] = isset($v['type']) ? $v['type'] : '---';
if (isset($v['description'])) {
$v['custom_agenda_col_1'] = $v['description'];
}
if (isset($v['employees'])) {
$emps = array();
if (is_array($v['employees'])) {
foreach ($v['employees'] as $e) {
$emps[] = CRM_ContactsCommon::contact_format_no_company($e);
}
}
$v['custom_agenda_col_2'] = implode('<br>', $emps);
}
if (isset($v['customers'])) {
$cuss = array();
if (is_array($v['customers'])) {
foreach ($v['customers'] as $c) {
$cuss[] = CRM_ContactsCommon::display_company_contact(array('customers' => $c), true, array('id' => 'customers'));
}
}
$v['custom_agenda_col_3'] = implode('<br>', $cuss);
}
$result[] = $v;
$count++;
if ($count == CRM_CalendarCommon::$events_limit) {
break;
}
}
}
if ($count == CRM_CalendarCommon::$events_limit) {
break;
}
}
if ($count == CRM_CalendarCommon::$events_limit) {
print '<b>There were too many events to display on the Calendar, please change CRM Filter</b>';
}
return $result;
}
public static function submit_meeting($values, $mode)
{
$me = CRM_ContactsCommon::get_my_record();
switch ($mode) {
case 'delete':
Utils_MessengerCommon::delete_by_id('CRM_Calendar_Event:' . $values['id']);
break;
case 'display':
$pdf = Utils_RecordBrowser::$rb_obj->pack_module('Libs/TCPDF', 'L');
if ($pdf->prepare()) {
$pdf->set_title($values['title']);
$pdf->set_subject('');
$pdf->prepare_header();
$pdf->AddPage();
$v = CRM_Calendar_EventCommon::get(DB::GetOne('SELECT id FROM crm_calendar_custom_events_handlers WHERE group_name=%s', array('Meetings')) . '#' . $values['id']);
$ev_mod = Utils_RecordBrowser::$rb_obj->init_module('CRM/Calendar/Event');
$ev_mod->make_event_PDF($pdf, $v, true, 'view');
}
$pdf->add_actionbar_icon('Print');
if (isset($_REQUEST['day'])) {
$values['date'] = $_REQUEST['day'];
}
$ret = array();
if ($values['time']) {
// normal event
$start = $values['time'];
// time in unix timestamp UTC
$start_disp = strtotime(Base_RegionalSettingsCommon::time2reg($start, true, true, true, false));
} else {
// when event is timeless - all day event
$time = $values['date'] . ' 00:00:01';
$start = Base_RegionalSettingsCommon::reg2time($time);
$start_disp = strtotime($time);
}
$end = strtotime('+' . $values['duration'] . ' seconds', $start);
$ret['day_details'] = array('start' => array('day' => '<a ' . Base_BoxCommon::create_href(null, 'CRM/Calendar', 'body', array(array('default_view' => 'day', 'default_date' => strtotime($values['date']))), array()) . '>' . date('j', $start_disp) . '</a>', 'month' => '<a ' . Base_BoxCommon::create_href(null, 'CRM/Calendar', 'body', array(array('default_view' => 'month', 'default_date' => strtotime($values['date']))), array()) . '>' . __date('F', $start_disp) . '</a>', 'year' => '<a ' . Base_BoxCommon::create_href(null, 'CRM/Calendar', 'body', array(array('default_view' => 'year', 'default_date' => strtotime($values['date']))), array()) . '>' . date('Y', $start_disp) . '</a>', 'weekday' => '<a ' . Base_BoxCommon::create_href(null, 'CRM/Calendar', 'body', array(array('default_view' => 'week', 'default_date' => strtotime($values['date']))), array()) . '>' . __date('l', $start_disp) . '</a>'));
if (!isset($values['timeless']) || !$values['timeless']) {
$ret['event_info'] = array('start_time' => Base_RegionalSettingsCommon::time2reg($start, 2, false), 'end_time' => Base_RegionalSettingsCommon::time2reg($end, 2, false), 'duration' => Base_RegionalSettingsCommon::seconds_to_words($values['duration']), 'start_date' => '-', 'end_date' => '-');
}
$ret['form_data']['timeless'] = array('label' => __('Timeless'), 'html' => 'value');
$ret['toggle_duration'] = 'tog';
$ret['duration_block_id'] = '1';
$ret['event_end_block_id'] = '2';
$values['title'] = __('Follow-up') . ': ' . $values['title'];
$values['status'] = 0;
$cus = reset($values['customers']);
if (ModuleManager::is_installed('CRM/Meeting') >= 0) {
$ret['new']['event'] = '<a ' . Utils_TooltipCommon::open_tag_attrs(__('New Meeting')) . ' ' . Utils_RecordBrowserCommon::create_new_record_href('crm_meeting', array('title' => $values['title'], 'permission' => $values['permission'], 'priority' => $values['priority'], 'description' => $values['description'], 'date' => date('Y-m-d'), 'time' => date('H:i:s'), 'duration' => 3600, 'employees' => $values['employees'], 'customers' => $values['customers'], 'status' => 0), 'none', false) . '><img border="0" src="' . Base_ThemeCommon::get_template_file('CRM_Calendar', 'icon-small.png') . '" /></a>';
}
if (ModuleManager::is_installed('CRM/Tasks') >= 0) {
$ret['new']['task'] = '<a ' . Utils_TooltipCommon::open_tag_attrs(__('New Task')) . ' ' . Utils_RecordBrowserCommon::create_new_record_href('task', array('title' => $values['title'], 'permission' => $values['permission'], 'priority' => $values['priority'], 'description' => $values['description'], 'employees' => $values['employees'], 'customers' => $values['customers'], 'status' => 0, 'deadline' => date('Y-m-d', strtotime('+1 day')))) . '><img border="0" src="' . Base_ThemeCommon::get_template_file('CRM_Tasks', 'icon-small.png') . '"></a>';
}
if (ModuleManager::is_installed('CRM/PhoneCall') >= 0) {
$ret['new']['phonecall'] = '<a ' . Utils_TooltipCommon::open_tag_attrs(__('New Phonecall')) . ' ' . Utils_RecordBrowserCommon::create_new_record_href('phonecall', array('subject' => $values['title'], 'permission' => $values['permission'], 'priority' => $values['priority'], 'description' => $values['description'], 'date_and_time' => date('Y-m-d H:i:s'), 'employees' => $values['employees'], 'customer' => $cus, 'status' => 0), 'none', false) . '><img border="0" src="' . Base_ThemeCommon::get_template_file('CRM_PhoneCall', 'icon-small.png') . '" /></a>';
}
$ret['new']['note'] = Utils_RecordBrowser::$rb_obj->add_note_button('crm_meeting/' . $values['id']);
return $ret;
case 'edit':
self::subscribed_employees($values);
$alarms = Utils_MessengerCommon::get_alarms('CRM_Calendar_Event:' . $values['id']);
$old = Utils_RecordBrowserCommon::get_record('crm_meeting', $values['id']);
$old_time = strtotime($old['date'] . ' ' . date('H:i:s', strtotime($old['time'])));
$new_time = strtotime($values['date'] . ' ' . date('H:i:s', strtotime($values['time'])));
foreach ($alarms as $id => $time) {
$time = strtotime($time);
$diff = $old_time - $time;
Utils_MessengerCommon::update_time($id, $new_time - $diff);
}
case 'add':
if (isset($values['duration_switch']) && !$values['duration_switch']) {
$values['duration'] = strtotime($values['end_time']) - strtotime($values['time']);
if ($values['duration'] < 0) {
$values['duration'] += 60 * 60 * 24;
}
// failsafe
}
if (isset($values['timeless']) && $values['timeless']) {
$values['duration'] = -1;
}
$new = '';
foreach (array(0 => 'Mon', 1 => 'Tue', 2 => 'Wed', 3 => 'Thu', 4 => 'Fri', 5 => 'Sat', 6 => 'Sun') as $k => $v) {
if (isset($values['recurrence_hash_' . $k]) && $values['recurrence_hash_' . $k]) {
$new .= '1';
} else {
$new .= '0';
}
}
if ($new != '0000000') {
$values['recurrence_hash'] = $new;
}
if ($values['duration'] != -1) {
if (isset($values['modded'])) {
$time = Base_RegionalSettingsCommon::time2reg($values['time'], true, true, true, false);
$reg_timestamp = $values['date'] . ' ' . date('H:i:s', strtotime($time));
$timestamp = Base_RegionalSettingsCommon::reg2time($reg_timestamp);
$values['date'] = date('Y-m-d', $timestamp);
$values['time'] = date('Y-m-d H:i:s', $timestamp);
if (isset($values['recurrence_end']) && $values['recurrence_end']) {
$values['recurrence_end'] = date('Y-m-d', Base_RegionalSettingsCommon::reg2time($values['recurrence_end'] . ' ' . date('H:i:s', strtotime($time))));
if ($values['recurrence_end'] < $values['date']) {
$values['recurrence_end'] = $values['date'];
}
if ($values['recurrence_type'] == 8) {
$date = date('Y-m-d', strtotime('+6 days', strtotime($values['date'])));
if ($values['recurrence_end'] < $date) {
$values['recurrence_end'] = $date;
}
}
}
}
} else {
$values['time'] = '';
}
break;
case 'adding':
$values['permission'] = Base_User_SettingsCommon::get('CRM_Common', 'default_record_permission');
case 'editing':
case 'view':
$values['modded'] = 1;
if (!isset($values['date'])) {
$values['date'] = date('Y-m-d');
}
if (!isset($values['time'])) {
$values['time'] = time();
}
if (!isset($values['duration'])) {
$values['duration'] = 3600;
}
if (!is_numeric($values['time'])) {
$values['time'] = strtotime($values['time']);
}
if ($values['duration'] != -1) {
if (isset($values['date']) && $values['date']) {
$values['date'] = Base_RegionalSettingsCommon::time2reg($values['date'] . ' ' . date('H:i:s', $values['time']), false, true, true, false);
$values['time'] = Base_RegionalSettingsCommon::time2reg($values['date'] . ' ' . date('H:i:s', $values['time']), true, false, true, false);
$values['time'] = Base_RegionalSettingsCommon::reg2time($values['date'] . ' ' . $values['time']);
}
if (isset($values['recurrence_end']) && $values['recurrence_end']) {
$values['recurrence_end'] = Base_RegionalSettingsCommon::time2reg($values['recurrence_end'] . ' ' . date('H:i:s', $values['time']), false, true, true, false);
}
}
break;
case 'added':
if (isset($values['follow_up'])) {
CRM_FollowupCommon::add_tracing_notes($values['follow_up'][0], $values['follow_up'][1], $values['follow_up'][2], 'meeting', $values['id'], $values['title']);
}
self::subscribed_employees($values);
$related = array_merge($values['employees'], $values['customers']);
foreach ($related as $v) {
if ($mode === 'edit' && in_array($v, $old_related)) {
continue;
}
if (!is_numeric($v)) {
list($t, $id) = explode(':', $v);
} else {
$t = 'P';
$id = $v;
}
if ($t == 'P') {
$t = 'contact';
} else {
$t = 'company';
}
$subs = Utils_WatchdogCommon::get_subscribers($t, $id);
foreach ($subs as $s) {
Utils_WatchdogCommon::user_subscribe($s, 'crm_meeting', $values['id']);
}
}
if (isset($values['messenger_on']) && $values['messenger_on'] != 'none') {
$start = strtotime($values['date'] . ' ' . date('H:i:s', strtotime($values['time'])));
if ($values['messenger_on'] == 'me') {
Utils_MessengerCommon::add('CRM_Calendar_Event:' . $values['id'], 'CRM_Meeting', $values['messenger_message'], $start - $values['messenger_before'], array('CRM_MeetingCommon', 'get_alarm'), array($values['id']));
} else {
$eee = array();
foreach ($values['employees'] as $v) {
$c = CRM_ContactsCommon::get_contact($v);
if (isset($c['login'])) {
$eee[] = $c['login'];
}
}
Utils_MessengerCommon::add('CRM_Calendar_Event:' . $values['id'], 'CRM_Meeting', $values['messenger_message'], $start - $values['messenger_before'], array('CRM_MeetingCommon', 'get_alarm'), array($values['id']), $eee);
}
}
break;
}
return $values;
}
public function applet($conf, &$opts)
{
$opts['go'] = true;
$gb = $this->init_module(Utils_GenericBrowser::module_name(), null, 'agendaX');
$columns = array(array('name' => __('Start'), 'order' => 'e.starts', 'width' => 25, 'wrapmode' => 'nowrap'), array('name' => __('Title'), 'order' => 'e.title', 'width' => 50));
$gb->set_table_columns($columns);
$start = date('Y-m-d', time());
$end = date('Y-m-d', time() + $conf['days'] * 24 * 60 * 60);
$gb->set_default_order(array(__('Start') => 'ASC'));
CRM_Calendar_EventCommon::$filter = '(' . CRM_FiltersCommon::get_my_profile() . ')';
$data = array();
Base_ThemeCommon::load_css('CRM_Calendar', 'agenda');
$custom_events = DB::GetAssoc('SELECT id, handler_callback FROM crm_calendar_custom_events_handlers ORDER BY group_name');
$ret = array();
if (!empty($custom_events)) {
$c = 0;
foreach ($custom_events as $id => $cb) {
if ($conf['events_handlers__' . $id]) {
$cb = explode('::', $cb);
if (!is_callable($cb)) {
continue;
}
$add = call_user_func($cb, 'get_all', $start, $end, CRM_Calendar_EventCommon::$filter);
foreach ($add as $v) {
$ret[str_pad($v['start'], 16, '0', STR_PAD_LEFT) . '__' . $c] = $v;
$c++;
}
}
}
}
ksort($ret);
foreach ($ret as $row) {
if (isset($row['status']) && $row['status'] == 'closed') {
continue;
}
if (!isset($row['view_action'])) {
$ex = Utils_CalendarCommon::process_event($row);
$view_action = '<a ' . $this->create_callback_href(array($this, 'view_event'), $row['id']) . '>';
$ev_id = explode('_', $row['id'], 2);
$ev_id = $ev_id[0];
} else {
$tmp = Utils_CalendarCommon::process_event($row);
$ex = $row;
$ex['start'] = $tmp['start'];
$view_action = '<a ' . $row['view_action'] . '>';
}
//////////////////////////
// left column
$date = $ex['start'];
///////////////////
// right column
$title = Utils_TooltipCommon::create($row['title'], $row['custom_tooltip']);
$day = isset($row['timeless']) && $row['timeless'] ? $row['timeless'] : Base_RegionalSettingsCommon::time2reg($row['start'], false, true, true, false);
if ($day < date('Y-m-d')) {
$class = 'past';
} elseif ($day == date('Y-m-d')) {
$class = 'today';
} elseif ($day == date('Y-m-d', strtotime('+1 day'))) {
$class = 'tomorrow';
} else {
$class = 'other';
}
$gb_row = $gb->get_new_row();
$gb_row->set_attrs('class="CRM_Calendar_applet__' . $class . '"');
$gb_row->add_data(array('value' => $date, 'order_value' => isset($row['timeless']) && $row['timeless'] ? strtotime($row['timeless']) : $row['start']), array('value' => $view_action . $title . '</a>'));
}
$this->display_module($gb, array(false), 'automatic_display');
}
public function get_navigation_bar_additions()
{
$custom_handlers = CRM_CalendarCommon::get_event_handlers();
if (empty($custom_handlers)) {
return '';
}
$form = $this->init_module('Libs/QuickForm');
$elements_name = array();
$default = array();
foreach ($custom_handlers as $k => $v) {
$form->addElement('checkbox', 'events_handlers__' . $k, $v, null, array('onclick' => 'calendar_event_handlers_changed=1;'));
$elements_name[$k] = 'events_handlers__' . $k;
$default[] = $k;
}
$form->addElement('hidden', 'event_handlers_changed', '', array('id' => 'event_handlers_changed'));
eval_js('calendar_event_handlers_changed=0;');
eval_js('hide_calendar_event_handlers_popup = function() {' . 'if(var_hide_calendar_event_handlers_popup==1){' . '$("calendar_event_handlers_popup").style.display="none";' . '$("calendar_event_handlers_trigger").innerHTML=calendar_event_handlers_message_default;' . 'if(calendar_event_handlers_changed==1){' . $form->get_submit_form_js() . '$("calendar_event_handlers_trigger").innerHTML=calendar_event_handlers_message_processing;' . '}' . '}' . '}');
eval_js('show_calendar_event_handlers_popup = function() {' . '$("calendar_event_handlers_popup").style.display="";' . '$("calendar_event_handlers_trigger").innerHTML=calendar_event_handlers_message_confirm;' . '}');
$selected = $this->get_module_variable('events_handlers', $default);
if ($form->validate()) {
$vals = $form->exportValues();
$selected = array();
foreach ($elements_name as $k => $e) {
if (isset($vals[$e]) && $vals[$e]) {
$selected[] = $k;
}
}
$this->set_module_variable('events_handlers', $selected);
}
CRM_Calendar_EventCommon::$events_handlers = $selected;
foreach ($selected as $k => $e) {
if (isset($elements_name[$e])) {
$form->setDefaults(array($elements_name[$e] => true));
}
}
$label = 'Filter: Error';
$select_count = count($selected);
if ($select_count == count($custom_handlers)) {
$label = __('All');
} else {
$label = __('Selection (%d)', array($select_count));
}
if ($select_count == 1) {
$label = $custom_handlers[reset($selected)];
}
if ($select_count == 0) {
$label = __('None');
}
$theme = $this->init_module('Base/Theme');
$theme->assign('elements_name', $elements_name);
$theme->assign('label', $label);
eval_js('calendar_event_handlers_message_default="' . $label . '";');
eval_js('calendar_event_handlers_message_processing="' . __('Processing...') . '";');
eval_js('calendar_event_handlers_message_confirm="' . __('Save selection') . '";');
$form->assign_theme('form', $theme);
ob_start();
$theme->display('custom_event_handlers_form');
$handlers_form = ob_get_clean();
return $handlers_form;
}
public function month_array($date, $mark = array()) {
$first_day_of_month = strtotime(date('Y-m-', $date).'01');
$diff = date('w', $first_day_of_month)-$this->settings['first_day_of_week'];
if ($diff<0) $diff += 7;
$currday = strtotime('-'.$diff.' days',$first_day_of_month);
$curmonth = date('m', $date);
$month = array();
$today = Base_RegionalSettingsCommon::time2reg(null,false,true,true,false);
$colors = CRM_Calendar_EventCommon::get_available_colors();
while (date('m', $currday) != ($curmonth)%12+1) {
$week = array();
$weekno = date('W',$currday);
$link = $this->create_unique_href(array('action'=>'switch','time'=>$currday, 'tab'=>'Week'));
for ($i=0; $i<7; $i++) {
$main_month = date('m', $currday)==$curmonth;
$next = array(
'day'=>date('j', $currday),
'day_link' => $this->create_unique_href(array('action'=>'switch', 'time'=>$currday, 'tab'=>'Day')),
'style'=>($main_month?(date('Y-m-d',$currday)==$today?'today':'current'):'other').(date('N',$currday)>=6?'_weekend':''),
'time'=>Base_RegionalSettingsCommon::reg2time(date('Y-m-d',$currday).' 00:00:00')
);
if ($main_month && isset($mark[date('Y-m-d',$currday)])) {
$next['style'].= ' event-'.$colors[$mark[date('Y-m-d',$currday)]];
}
$week[] = $next;
$currday = strtotime('+1 day', $currday);
}
$month[] = array(
'week_label'=>$weekno,
'week_link' => $link,
'days'=>$week);
}
return $month;
}
public static function mobile_view_event($id)
{
$row = CRM_Calendar_EventCommon::get($id);
$ex = Utils_CalendarCommon::process_event($row);
print '<ul class="field">';
print '<li>' . __('Title') . ': ' . $row['title'] . '</li>';
print '<li>' . __('Starts') . ': ' . $ex['start'] . '</li>';
print '<li>' . __('Duration') . ': ' . $ex['duration'] . '</li>';
print '<li>' . __('Ends') . ': ' . $ex['end'] . '</li>';
print '<li>' . __('Description') . ': ' . $row['description'] . '</li>';
print '</ul>';
}
