3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.7 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2016 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
10 | CiviCRM is free software; you can copy, modify, and distribute it |
11 | under the terms of the GNU Affero General Public License |
12 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
14 | CiviCRM is distributed in the hope that it will be useful, but |
15 | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
17 | See the GNU Affero General Public License for more details. |
19 | You should have received a copy of the GNU Affero General Public |
20 | License and the CiviCRM Licensing Exception along |
21 | with this program; if not, contact CiviCRM LLC |
22 | at info[AT]civicrm[DOT]org. If you have questions about the |
23 | GNU Affero General Public License or the licensing of CiviCRM, |
24 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
25 +--------------------------------------------------------------------+
32 * @copyright CiviCRM LLC (c) 2004-2016
36 * This class generates form components for processing Entity.
38 class CRM_Core_Form_RecurringEntity
{
42 protected static $_entityId = NULL;
45 * Schedule Reminder ID
47 protected static $_scheduleReminderID = NULL;
50 * Schedule Reminder data
52 protected static $_scheduleReminderDetails = array();
57 protected static $_parentEntityId = NULL;
60 * Exclude date information
62 public static $_excludeDateInfo = array();
67 public static $_entityTable;
70 * Checks current entityID has parent
72 public static $_hasParent = FALSE;
77 public static function preProcess($entityTable) {
78 self
::$_entityId = (int) CRM_Utils_Request
::retrieve('id', 'Positive');
79 self
::$_entityTable = $entityTable;
81 if (self
::$_entityId && $entityTable) {
82 $checkParentExistsForThisId = CRM_Core_BAO_RecurringEntity
::getParentFor(self
::$_entityId, $entityTable);
83 if ($checkParentExistsForThisId) {
84 self
::$_hasParent = TRUE;
85 self
::$_parentEntityId = $checkParentExistsForThisId;
86 self
::$_scheduleReminderDetails = CRM_Core_BAO_RecurringEntity
::getReminderDetailsByEntityId($checkParentExistsForThisId, $entityTable);
89 self
::$_parentEntityId = self
::$_entityId;
90 self
::$_scheduleReminderDetails = CRM_Core_BAO_RecurringEntity
::getReminderDetailsByEntityId(self
::$_entityId, $entityTable);
92 if (property_exists(self
::$_scheduleReminderDetails, 'id')) {
93 self
::$_scheduleReminderID = self
::$_scheduleReminderDetails->id
;
96 CRM_Core_OptionValue
::getValues(array('name' => $entityTable . '_repeat_exclude_dates_' . self
::$_parentEntityId), $optionValue);
97 $excludeOptionValues = array();
98 if (!empty($optionValue)) {
99 foreach ($optionValue as $key => $val) {
100 $excludeOptionValues[$val['value']] = substr(CRM_Utils_Date
::mysqlToIso($val['value']), 0, 10);
102 self
::$_excludeDateInfo = $excludeOptionValues;
106 $entityType = CRM_Core_DAO_AllCoreTables
::getBriefName(CRM_Core_DAO_AllCoreTables
::getClassForTable($entityTable));
107 $tpl = CRM_Core_Smarty
::singleton();
108 $tpl->assign('recurringEntityType', ts($entityType));
109 $tpl->assign('currentEntityId', self
::$_entityId);
110 $tpl->assign('entityTable', self
::$_entityTable);
111 $tpl->assign('scheduleReminderId', self
::$_scheduleReminderID);
112 $tpl->assign('hasParent', self
::$_hasParent);
116 * Set default values for the form. For edit/view mode
117 * the default values are retrieved from the database
122 public static function setDefaultValues() {
123 // Defaults for new entity
125 'repetition_frequency_unit' => 'week',
128 // Default for existing entity
129 if (self
::$_scheduleReminderID) {
130 $defaults['repetition_frequency_unit'] = self
::$_scheduleReminderDetails->repetition_frequency_unit
;
131 $defaults['repetition_frequency_interval'] = self
::$_scheduleReminderDetails->repetition_frequency_interval
;
132 $defaults['start_action_condition'] = array_flip(explode(",", self
::$_scheduleReminderDetails->start_action_condition
));
133 foreach ($defaults['start_action_condition'] as $key => $val) {
135 $defaults['start_action_condition'][$key] = $val;
137 $defaults['start_action_offset'] = self
::$_scheduleReminderDetails->start_action_offset
;
138 if (self
::$_scheduleReminderDetails->start_action_offset
) {
139 $defaults['ends'] = 1;
141 list($defaults['repeat_absolute_date']) = CRM_Utils_Date
::setDateDefaults(self
::$_scheduleReminderDetails->absolute_date
);
142 if (self
::$_scheduleReminderDetails->absolute_date
) {
143 $defaults['ends'] = 2;
145 $defaults['limit_to'] = self
::$_scheduleReminderDetails->limit_to
;
146 if (self
::$_scheduleReminderDetails->limit_to
) {
147 $defaults['repeats_by'] = 1;
149 if (self
::$_scheduleReminderDetails->entity_status
) {
150 $explodeStartActionCondition = explode(" ", self
::$_scheduleReminderDetails->entity_status
);
151 $defaults['entity_status_1'] = $explodeStartActionCondition[0];
152 $defaults['entity_status_2'] = $explodeStartActionCondition[1];
154 if (self
::$_scheduleReminderDetails->entity_status
) {
155 $defaults['repeats_by'] = 2;
157 if (self
::$_excludeDateInfo) {
158 $defaults['exclude_date_list'] = implode(',', self
::$_excludeDateInfo);
167 * @param CRM_Core_Form $form
169 public static function buildQuickForm(&$form) {
170 // FIXME: this is using the following as keys rather than the standard numeric keys returned by CRM_Utils_Date
171 $dayOfTheWeek = array();
181 foreach (CRM_Utils_Date
::getAbbrWeekdayNames() as $k => $label) {
182 $dayOfTheWeek[$dayKeys[$k]] = $label;
184 $form->add('select', 'repetition_frequency_unit', ts('Repeats every'), CRM_Core_SelectValues
::getRecurringFrequencyUnits(), FALSE, array('class' => 'required'));
185 $numericOptions = CRM_Core_SelectValues
::getNumericOptions(1, 30);
186 $form->add('select', 'repetition_frequency_interval', NULL, $numericOptions, FALSE, array('class' => 'required'));
187 $form->addDateTime('repetition_start_date', ts('Repetition Start Date'), FALSE, array('formatType' => 'activityDateTime'));
188 foreach ($dayOfTheWeek as $key => $val) {
189 $startActionCondition[] = $form->createElement('checkbox', $key, NULL, $val);
191 $form->addGroup($startActionCondition, 'start_action_condition', ts('Repeats on'));
192 $roptionTypes = array(
193 '1' => ts('day of the month'),
194 '2' => ts('day of the week'),
196 $form->addRadio('repeats_by', ts("Repeats by"), $roptionTypes, array('required' => TRUE), NULL);
197 $form->add('select', 'limit_to', '', CRM_Core_SelectValues
::getNumericOptions(1, 31));
198 $dayOfTheWeekNo = array(
199 'first' => ts('First'),
200 'second' => ts('Second'),
201 'third' => ts('Third'),
202 'fourth' => ts('Fourth'),
203 'last' => ts('Last'),
205 $form->add('select', 'entity_status_1', '', $dayOfTheWeekNo);
206 $form->add('select', 'entity_status_2', '', $dayOfTheWeek);
207 $eoptionTypes = array(
211 $form->addRadio('ends', ts("Ends"), $eoptionTypes, array('class' => 'required'), NULL);
212 // Offset options gets key=>val pairs like 1=>2 because the BAO wants to know the number of
213 // children while it makes more sense to the user to see the total number including the parent.
214 $offsetOptions = range(1, 30);
215 unset($offsetOptions[0]);
216 $form->add('select', 'start_action_offset', NULL, $offsetOptions, FALSE);
217 $form->addFormRule(array('CRM_Core_Form_RecurringEntity', 'formRule'));
218 $form->addDate('repeat_absolute_date', ts('On'), FALSE, array('formatType' => 'mailing'));
219 $form->add('text', 'exclude_date_list', ts('Exclude Dates'), array(
222 $form->addElement('hidden', 'allowRepeatConfigToSubmit', '', array('id' => 'allowRepeatConfigToSubmit'));
223 $form->addButtons(array(
226 'name' => ts('Save'),
231 'name' => ts('Cancel'),
235 // For client-side pluralization
236 $form->assign('recurringFrequencyOptions', array(
237 'single' => CRM_Utils_Array
::makeNonAssociative(CRM_Core_SelectValues
::getRecurringFrequencyUnits()),
238 'plural' => CRM_Utils_Array
::makeNonAssociative(CRM_Core_SelectValues
::getRecurringFrequencyUnits(2)),
243 * Global validation rules for the form.
245 * @param array $values
246 * Posted values of the form.
249 * list of errors to be posted back to the form
251 public static function formRule($values) {
253 //Process this function only when you get this variable
254 if ($values['allowRepeatConfigToSubmit'] == 1) {
255 $dayOfTheWeek = array('monday', 'tuesday', 'wednesday', 'thursday', 'friday', 'saturday', 'sunday');
257 if (empty($values['repetition_frequency_unit'])) {
258 $errors['repetition_frequency_unit'] = ts('This is a required field');
261 if (empty($values['repetition_frequency_interval'])) {
262 $errors['repetition_frequency_interval'] = ts('This is a required field');
265 if (!empty($values['ends'])) {
266 if ($values['ends'] == 1) {
267 if (empty($values['start_action_offset'])) {
268 $errors['start_action_offset'] = ts('This is a required field');
270 elseif ($values['start_action_offset'] > 30) {
271 $errors['start_action_offset'] = ts('Occurrences should be less than or equal to 30');
274 if ($values['ends'] == 2) {
275 if (!empty($values['repeat_absolute_date'])) {
276 $entityStartDate = CRM_Utils_Date
::processDate($values['repetition_start_date']);
277 $end = CRM_Utils_Date
::processDate($values['repeat_absolute_date']);
278 if (($end < $entityStartDate) && ($end != 0)) {
279 $errors['repeat_absolute_date'] = ts('End date should be after current entity\'s start date');
283 $errors['repeat_absolute_date'] = ts('This is a required field');
288 $errors['ends'] = ts('This is a required field');
292 if (!empty($values['repeats_by'])) {
293 if ($values['repeats_by'] == 1) {
294 if (!empty($values['limit_to'])) {
295 if ($values['limit_to'] < 1 && $values['limit_to'] > 31) {
296 $errors['limit_to'] = ts('Invalid day of the month');
300 $errors['limit_to'] = ts('Invalid day of the month');
303 if ($values['repeats_by'] == 2) {
304 if (!empty($values['entity_status_1'])) {
305 $dayOfTheWeekNo = array('first', 'second', 'third', 'fourth', 'last');
306 if (!in_array($values['entity_status_1'], $dayOfTheWeekNo)) {
307 $errors['entity_status_1'] = ts('Invalid option');
311 $errors['entity_status_1'] = ts('Invalid option');
313 if (!empty($values['entity_status_2'])) {
314 if (!in_array($values['entity_status_2'], $dayOfTheWeek)) {
315 $errors['entity_status_2'] = ts('Invalid day name');
319 $errors['entity_status_2'] = ts('Invalid day name');
328 * Process the form submission.
330 * @param array $params
331 * @param string $type
332 * @param array $linkedEntities
334 * @throws \CiviCRM_API3_Exception
336 public static function postProcess($params = array(), $type, $linkedEntities = array()) {
337 //Check entity_id not present in params take it from class variable
338 if (empty($params['entity_id'])) {
339 $params['entity_id'] = self
::$_entityId;
341 //Process this function only when you get this variable
342 if ($params['allowRepeatConfigToSubmit'] == 1) {
343 if (!empty($params['entity_table']) && !empty($params['entity_id']) && $type) {
344 $params['used_for'] = $type;
345 if (empty($params['parent_entity_id'])) {
346 $params['parent_entity_id'] = self
::$_parentEntityId;
348 if (!empty($params['schedule_reminder_id'])) {
349 $params['id'] = $params['schedule_reminder_id'];
352 $params['id'] = self
::$_scheduleReminderID;
355 //Save post params to the schedule reminder table
356 $recurobj = new CRM_Core_BAO_RecurringEntity();
357 $dbParams = $recurobj->mapFormValuesToDB($params);
359 //Delete repeat configuration and rebuild
360 if (!empty($params['id'])) {
361 CRM_Core_BAO_ActionSchedule
::del($params['id']);
362 unset($params['id']);
364 $actionScheduleObj = CRM_Core_BAO_ActionSchedule
::add($dbParams);
367 $excludeDateList = array();
368 if (CRM_Utils_Array
::value('exclude_date_list', $params) && CRM_Utils_Array
::value('parent_entity_id', $params) && $actionScheduleObj->entity_value
) {
369 //Since we get comma separated values lets get them in array
370 $excludeDates = explode(",", $params['exclude_date_list']);
372 //Check if there exists any values for this option group
373 $optionGroupIdExists = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_OptionGroup',
374 $type . '_repeat_exclude_dates_' . $params['parent_entity_id'],
378 if ($optionGroupIdExists) {
379 CRM_Core_BAO_OptionGroup
::del($optionGroupIdExists);
381 $optionGroupParams = array(
382 'name' => $type . '_repeat_exclude_dates_' . $actionScheduleObj->entity_value
,
383 'title' => $type . ' recursion',
387 $opGroup = CRM_Core_BAO_OptionGroup
::add($optionGroupParams);
390 $fieldValues = array('option_group_id' => $opGroup->id
);
391 foreach ($excludeDates as $val) {
392 $optionGroupValue = array(
393 'option_group_id' => $opGroup->id
,
394 'label' => CRM_Utils_Date
::processDate($val),
395 'value' => CRM_Utils_Date
::processDate($val),
396 'name' => $opGroup->name
,
397 'description' => 'Used for recurring ' . $type,
398 'weight' => CRM_Utils_Weight
::updateOtherWeights('CRM_Core_DAO_OptionValue', $oldWeight, CRM_Utils_Array
::value('weight', $params), $fieldValues),
401 $excludeDateList[] = $optionGroupValue['value'];
402 CRM_Core_BAO_OptionValue
::create($optionGroupValue);
408 $apiEntityType = explode("_", $type);
409 if (!empty($apiEntityType[1])) {
410 $apiType = $apiEntityType[1];
412 //Delete relations if any from recurring entity tables before inserting new relations for this entity id
413 if ($params['entity_id']) {
414 //If entity has any pre delete function, consider that first
415 if (CRM_Utils_Array
::value('pre_delete_func', CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']]) &&
416 CRM_Utils_Array
::value('helper_class', CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']])
418 $preDeleteResult = call_user_func_array(CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']]['pre_delete_func'], array($params['entity_id']));
419 if (!empty($preDeleteResult)) {
420 call_user_func(array(CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']]['helper_class'], $preDeleteResult));
423 //Ready to execute delete on entities if it has delete function set
424 if (CRM_Utils_Array
::value('delete_func', CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']]) &&
425 CRM_Utils_Array
::value('helper_class', CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']])
427 //Check if pre delete function has some ids to be deleted
428 if (!empty(CRM_Core_BAO_RecurringEntity
::$_entitiesToBeDeleted)) {
429 foreach (CRM_Core_BAO_RecurringEntity
::$_entitiesToBeDeleted as $eid) {
430 $result = civicrm_api3(
431 ucfirst(strtolower($apiType)),
432 CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']]['delete_func'],
438 if ($result['error']) {
439 CRM_Core_Error
::statusBounce('Error creating recurring list');
444 $getRelatedEntities = CRM_Core_BAO_RecurringEntity
::getEntitiesFor($params['entity_id'], $params['entity_table'], FALSE);
445 foreach ($getRelatedEntities as $key => $value) {
446 $result = civicrm_api3(
447 ucfirst(strtolower($apiType)),
448 CRM_Core_BAO_RecurringEntity
::$_recurringEntityHelper[$params['entity_table']]['delete_func'],
451 'id' => $value['id'],
454 if ($result['error']) {
455 CRM_Core_Error
::statusBounce('Error creating recurring list');
461 // find all entities from the recurring set. At this point we 'll get entities which were not deleted
462 // for e.g due to participants being present. We need to delete them from recurring tables anyway.
463 $pRepeatingEntities = CRM_Core_BAO_RecurringEntity
::getEntitiesFor($params['entity_id'], $params['entity_table']);
464 foreach ($pRepeatingEntities as $val) {
465 CRM_Core_BAO_RecurringEntity
::delEntity($val['id'], $val['table'], TRUE);
469 $recursion = new CRM_Core_BAO_RecurringEntity();
470 $recursion->dateColumns
= $params['dateColumns'];
471 $recursion->scheduleId
= $actionScheduleObj->id
;
473 if (!empty($excludeDateList)) {
474 $recursion->excludeDates
= $excludeDateList;
475 $recursion->excludeDateRangeColumns
= $params['excludeDateRangeColumns'];
477 if (!empty($params['intervalDateColumns'])) {
478 $recursion->intervalDateColumns
= $params['intervalDateColumns'];
480 $recursion->entity_id
= $params['entity_id'];
481 $recursion->entity_table
= $params['entity_table'];
482 if (!empty($linkedEntities)) {
483 $recursion->linkedEntities
= $linkedEntities;
486 $recursion->generate();
488 $status = ts('Repeat Configuration has been saved');
489 CRM_Core_Session
::setStatus($status, ts('Saved'), 'success');
495 * Return a descriptive name for the page, used in wizard header
499 public function getTitle() {
500 return ts('Repeat Entity');