Commit | Line | Data |
---|---|---|
6a488035 TO |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
39de6fd5 | 4 | | CiviCRM version 4.6 | |
6a488035 | 5 | +--------------------------------------------------------------------+ |
06b69b18 | 6 | | Copyright CiviCRM LLC (c) 2004-2014 | |
6a488035 TO |
7 | +--------------------------------------------------------------------+ |
8 | | This file is a part of CiviCRM. | | |
9 | | | | |
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. | | |
13 | | | | |
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. | | |
18 | | | | |
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 | +--------------------------------------------------------------------+ | |
26 | */ | |
27 | ||
28 | /** | |
29 | * | |
30 | * @package CRM | |
06b69b18 | 31 | * @copyright CiviCRM LLC (c) 2004-2014 |
6a488035 TO |
32 | * $Id$ |
33 | * | |
34 | */ | |
35 | ||
36 | /** | |
37 | * Choose include / exclude groups and mailings | |
38 | * | |
39 | */ | |
40 | class CRM_Mailing_Form_Group extends CRM_Contact_Form_Task { | |
41 | ||
42 | /** | |
100fef9d | 43 | * The mailing ID of the mailing if we are resuming a mailing |
6a488035 TO |
44 | * |
45 | * @var integer | |
46 | */ | |
47 | protected $_mailingID; | |
48 | ||
49 | /** | |
100fef9d | 50 | * Set variables up before form is built |
6a488035 TO |
51 | * |
52 | * @return void | |
6a488035 TO |
53 | */ |
54 | public function preProcess() { | |
55 | if (CRM_Core_BAO_MailSettings::defaultDomain() == "EXAMPLE.ORG") { | |
353ffa53 TO |
56 | CRM_Core_Error::fatal(ts('The <a href="%1">default mailbox</a> has not been configured. You will find <a href="%2">more info in our online user and administrator guide.</a>', array( |
57 | 1 => CRM_Utils_System::url('civicrm/admin/mailSettings', 'reset=1'), | |
58 | 2 => "http://book.civicrm.org/user/advanced-configuration/email-system-configuration/" | |
59 | ))); | |
6a488035 TO |
60 | } |
61 | ||
62 | $this->_mailingID = CRM_Utils_Request::retrieve('mid', 'Integer', $this, FALSE, NULL); | |
63 | ||
64 | // when user come from search context. | |
65 | $this->_searchBasedMailing = CRM_Contact_Form_Search::isSearchContext($this->get('context')); | |
66 | if ($this->_searchBasedMailing) { | |
67 | $searchParams = $this->controller->exportValues(); | |
68 | // number of records that were selected - All or Few. | |
69 | $this->_resultSelectOption = $searchParams['radio_ts']; | |
70 | if (CRM_Utils_Array::value('task', $searchParams) == 20) { | |
71 | parent::preProcess(); | |
72 | } | |
73 | } | |
74 | ||
75 | $session = CRM_Core_Session::singleton(); | |
76 | if ($this->_searchBasedMailing) { | |
77 | $config = CRM_Core_Config::singleton(); | |
78 | $path = CRM_Utils_Array::value($config->userFrameworkURLVar, $_GET); | |
79 | $qfKey = CRM_Utils_Array::value('qfKey', $_GET); | |
80 | if ($qfKey) { | |
81 | $session->pushUserContext(CRM_Utils_System::url($path, "qfKey=$qfKey")); | |
82 | } | |
83 | else { | |
84 | $session->pushUserContext(CRM_Utils_System::url('civicrm/mailing', 'reset=1')); | |
85 | } | |
86 | } | |
87 | elseif (strpos($session->readUserContext(), 'civicrm/mailing') === FALSE) { | |
88 | // use previous context unless mailing is not schedule, CRM-4290 | |
89 | $session->pushUserContext(CRM_Utils_System::url('civicrm/mailing', 'reset=1')); | |
90 | } | |
91 | } | |
92 | ||
93 | /** | |
c490a46a | 94 | * Set default values for the form. |
6a488035 TO |
95 | * the default values are retrieved from the database |
96 | * | |
6a488035 | 97 | * |
355ba699 | 98 | * @return void |
6a488035 | 99 | */ |
00be9182 | 100 | public function setDefaultValues() { |
6a488035 TO |
101 | $continue = CRM_Utils_Request::retrieve('continue', 'String', $this, FALSE, NULL); |
102 | ||
103 | $defaults = array(); | |
9d76357a DG |
104 | $defaults['dedupe_email'] = CRM_Core_BAO_Setting::getItem(CRM_Core_BAO_Setting::MAILING_PREFERENCES_NAME, |
105 | 'dedupe_email_default', NULL, FALSE | |
106 | ); | |
6a488035 TO |
107 | if ($this->_mailingID) { |
108 | // check that the user has permission to access mailing id | |
109 | CRM_Mailing_BAO_Mailing::checkPermission($this->_mailingID); | |
110 | ||
111 | $mailing = new CRM_Mailing_DAO_Mailing(); | |
112 | $mailing->id = $this->_mailingID; | |
113 | $mailing->addSelect('name', 'campaign_id'); | |
114 | $mailing->find(TRUE); | |
115 | ||
116 | $defaults['name'] = $mailing->name; | |
117 | if (!$continue) { | |
118 | $defaults['name'] = ts('Copy of %1', array(1 => $mailing->name)); | |
119 | } | |
120 | else { | |
121 | // CRM-7590, reuse same mailing ID if we are continuing | |
122 | $this->set('mailing_id', $this->_mailingID); | |
123 | } | |
124 | ||
125 | $defaults['campaign_id'] = $mailing->campaign_id; | |
126 | $defaults['dedupe_email'] = $mailing->dedupe_email; | |
bac4cd35 | 127 | $defaults['location_type_id'] = $mailing->location_type_id; |
128 | $defaults['email_selection_method'] = $mailing->email_selection_method; | |
6a488035 | 129 | |
04124b30 | 130 | $dao = new CRM_Mailing_DAO_MailingGroup(); |
6a488035 TO |
131 | |
132 | $mailingGroups = array( | |
35f7561f | 133 | 'civicrm_group' => array(), |
21dfd5f5 | 134 | 'civicrm_mailing' => array(), |
6a488035 TO |
135 | ); |
136 | $dao->mailing_id = $this->_mailingID; | |
137 | $dao->find(); | |
138 | while ($dao->fetch()) { | |
139 | // account for multi-lingual | |
140 | // CRM-11431 | |
141 | $entityTable = 'civicrm_group'; | |
142 | if (substr($dao->entity_table, 0, 15) == 'civicrm_mailing') { | |
143 | $entityTable = 'civicrm_mailing'; | |
144 | } | |
145 | $mailingGroups[$entityTable][$dao->group_type][] = $dao->entity_id; | |
146 | } | |
147 | ||
f0bdcffd | 148 | $defaults['includeGroups'] = CRM_Utils_Array::value('include', $mailingGroups['civicrm_group']); |
345f886d | 149 | $defaults['excludeGroups'] = CRM_Utils_Array::value('exclude', $mailingGroups['civicrm_group']); |
6a488035 TO |
150 | |
151 | if (!empty($mailingGroups['civicrm_mailing'])) { | |
575ff9b8 | 152 | $defaults['includeMailings'] = CRM_Utils_Array::value('include', $mailingGroups['civicrm_mailing']); |
153 | $defaults['excludeMailings'] = CRM_Utils_Array::value('exclude', $mailingGroups['civicrm_mailing']); | |
6a488035 TO |
154 | } |
155 | } | |
156 | ||
157 | //when the context is search hide the mailing recipients. | |
158 | $showHide = new CRM_Core_ShowHideBlocks(); | |
159 | $showGroupSelector = TRUE; | |
160 | if ($this->_searchBasedMailing) { | |
161 | $showGroupSelector = FALSE; | |
353ffa53 TO |
162 | $formElements = array('includeGroups', 'excludeGroups', 'includeMailings', 'excludeMailings'); |
163 | $formValues = $this->controller->exportValues($this->_name); | |
6a488035 TO |
164 | foreach ($formElements as $element) { |
165 | if (!empty($formValues[$element])) { | |
166 | $showGroupSelector = TRUE; | |
167 | break; | |
168 | } | |
169 | } | |
170 | } | |
171 | ||
172 | if ($showGroupSelector) { | |
173 | $showHide->addShow("id-additional"); | |
174 | $showHide->addHide("id-additional-show"); | |
175 | } | |
176 | else { | |
177 | $showHide->addShow("id-additional-show"); | |
178 | $showHide->addHide("id-additional"); | |
179 | } | |
180 | $showHide->addToTemplate(); | |
181 | ||
182 | return $defaults; | |
183 | } | |
184 | ||
185 | /** | |
c490a46a | 186 | * Build the form object |
6a488035 | 187 | * |
355ba699 | 188 | * @return void |
6a488035 TO |
189 | */ |
190 | public function buildQuickForm() { | |
191 | ||
192 | //get the context | |
193 | $context = $this->get('context'); | |
194 | if ($this->_searchBasedMailing) { | |
195 | $context = 'search'; | |
196 | } | |
197 | $this->assign('context', $context); | |
198 | ||
199 | $this->add('text', 'name', ts('Name Your Mailing'), | |
200 | CRM_Core_DAO::getAttribute('CRM_Mailing_DAO_Mailing', 'name'), | |
201 | TRUE | |
202 | ); | |
203 | ||
204 | $hiddenMailingGroup = NULL; | |
205 | $campaignId = NULL; | |
206 | ||
207 | //CRM-7362 --add campaigns. | |
208 | if ($this->_mailingID) { | |
209 | $campaignId = CRM_Core_DAO::getFieldValue('CRM_Mailing_DAO_Mailing', $this->_mailingID, 'campaign_id'); | |
210 | $hiddenMailingGroup = CRM_Mailing_BAO_Mailing::hiddenMailingGroup($this->_mailingID); | |
211 | } | |
212 | CRM_Campaign_BAO_Campaign::addCampaign($this, $campaignId); | |
213 | ||
214 | //dedupe on email option | |
215 | $this->addElement('checkbox', 'dedupe_email', ts('Remove duplicate emails?')); | |
216 | ||
bac4cd35 | 217 | // location types |
218 | $locationTypes = CRM_Core_PseudoConstant::get('CRM_Core_DAO_Address', 'location_type_id', array('id' => 'display_name')); | |
f008d1d2 | 219 | $this->addElement('select', 'location_type_id', ts("Location Type"), array('' => ts('Automatic')) + $locationTypes); |
bac4cd35 | 220 | |
221 | $methods = CRM_Core_SelectValues::emailSelectMethods(); | |
222 | $this->addElement('select', 'email_selection_method', ts("Email Selection Method"), $methods); | |
223 | ||
6a488035 | 224 | //get the mailing groups. |
24431f7b | 225 | $groups = CRM_Core_PseudoConstant::nestedGroup('Mailing'); |
6a488035 TO |
226 | if ($hiddenMailingGroup) { |
227 | $groups[$hiddenMailingGroup] = | |
228 | CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Group', $hiddenMailingGroup, 'title'); | |
229 | } | |
230 | ||
231 | $mailings = CRM_Mailing_PseudoConstant::completed(); | |
232 | if (!$mailings) { | |
233 | $mailings = array(); | |
234 | } | |
235 | ||
236 | // run the groups through a hook so users can trim it if needed | |
237 | CRM_Utils_Hook::mailingGroups($this, $groups, $mailings); | |
238 | ||
239 | //when the context is search add base group's. | |
240 | if ($this->_searchBasedMailing) { | |
241 | //get the static groups | |
242 | $staticGroups = CRM_Core_PseudoConstant::staticGroup(FALSE, 'Mailing'); | |
243 | $this->add('select', 'baseGroup', | |
244 | ts('Unsubscription Group'), | |
245 | array( | |
353ffa53 TO |
246 | '' => ts('- select -') |
247 | ) + CRM_Contact_BAO_Group::getGroupsHierarchy($staticGroups, NULL, ' ', TRUE), | |
3e8871b9 CW |
248 | TRUE, |
249 | array('class' => 'crm-select2 huge') | |
6a488035 TO |
250 | ); |
251 | } | |
252 | ||
1e5616ba CW |
253 | $select2style = array( |
254 | 'multiple' => TRUE, | |
255 | 'style' => 'width: 100%; max-width: 60em;', | |
256 | 'class' => 'crm-select2', | |
257 | 'placeholder' => ts('- select -'), | |
6a488035 TO |
258 | ); |
259 | ||
1e5616ba CW |
260 | $this->add('select', 'includeGroups', |
261 | ts('Include Group(s)'), | |
6a488035 | 262 | $groups, |
1e5616ba CW |
263 | !$this->_searchBasedMailing, |
264 | $select2style | |
6a488035 TO |
265 | ); |
266 | ||
1e5616ba CW |
267 | $this->add('select', 'excludeGroups', |
268 | ts('Exclude Group(s)'), | |
269 | $groups, | |
270 | FALSE, | |
271 | $select2style | |
272 | ); | |
6a488035 | 273 | |
1e5616ba | 274 | $this->add('select', 'includeMailings', |
6a488035 TO |
275 | ts('INCLUDE Recipients of These Mailing(s)') . ' ', |
276 | $mailings, | |
1e5616ba CW |
277 | FALSE, |
278 | $select2style | |
6a488035 | 279 | ); |
1e5616ba | 280 | $this->add('select', 'excludeMailings', |
6a488035 TO |
281 | ts('EXCLUDE Recipients of These Mailing(s)') . ' ', |
282 | $mailings, | |
1e5616ba CW |
283 | FALSE, |
284 | $select2style | |
6a488035 TO |
285 | ); |
286 | ||
6a488035 TO |
287 | $this->addFormRule(array('CRM_Mailing_Form_Group', 'formRule')); |
288 | ||
289 | $buttons = array( | |
35f7561f | 290 | array( |
f212d37d CW |
291 | 'type' => 'next', |
292 | 'name' => ts('Next'), | |
6a488035 TO |
293 | 'spacing' => ' ', |
294 | 'isDefault' => TRUE, | |
295 | ), | |
296 | array( | |
297 | 'type' => 'submit', | |
298 | 'name' => ts('Save & Continue Later'), | |
299 | ), | |
300 | array( | |
301 | 'type' => 'cancel', | |
302 | 'name' => ts('Cancel'), | |
303 | ), | |
304 | ); | |
305 | ||
306 | $this->addButtons($buttons); | |
307 | ||
308 | $this->assign('groupCount', count($groups)); | |
309 | $this->assign('mailingCount', count($mailings)); | |
22e263ad | 310 | if (count($groups) == 0 && count($mailings) == 0 && !$this->_searchBasedMailing) { |
f598ae72 E |
311 | CRM_Core_Error::statusBounce("To send a mailing, you must have a valid group of recipients - either at least one group that's a Mailing List or at least one previous mailing or start from a search"); |
312 | } | |
6a488035 TO |
313 | } |
314 | ||
315 | public function postProcess() { | |
316 | $values = $this->controller->exportValues($this->_name); | |
317 | ||
318 | //build hidden smart group. when user want to send mailing | |
319 | //through search contact-> more action -> send Mailing. CRM-3711 | |
320 | $groups = array(); | |
321 | if ($this->_searchBasedMailing && $this->_contactIds) { | |
322 | $session = CRM_Core_Session::singleton(); | |
323 | ||
324 | if ($this->_resultSelectOption == 'ts_sel') { | |
325 | // create a static grp if only a subset of result set was selected: | |
326 | ||
353ffa53 | 327 | $randID = md5(time()); |
6a488035 | 328 | $grpTitle = "Hidden Group {$randID}"; |
353ffa53 | 329 | $grpID = CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Group', $grpTitle, 'id', 'title'); |
6a488035 TO |
330 | |
331 | if (!$grpID) { | |
332 | $groupParams = array( | |
333 | 'title' => $grpTitle, | |
334 | 'is_active' => 1, | |
335 | 'is_hidden' => 1, | |
336 | 'group_type' => array('2' => 1), | |
337 | ); | |
338 | ||
339 | $group = CRM_Contact_BAO_Group::create($groupParams); | |
340 | $grpID = $group->id; | |
341 | ||
342 | CRM_Contact_BAO_GroupContact::addContactsToGroup($this->_contactIds, $group->id); | |
343 | ||
344 | $newGroupTitle = "Hidden Group {$grpID}"; | |
345 | $groupParams = array( | |
353ffa53 TO |
346 | 'id' => $grpID, |
347 | 'name' => CRM_Utils_String::titleToVar($newGroupTitle), | |
6a488035 TO |
348 | 'title' => $newGroupTitle, |
349 | 'group_type' => array('2' => 1), | |
350 | ); | |
351 | $group = CRM_Contact_BAO_Group::create($groupParams); | |
352 | } | |
353 | ||
354 | // note at this point its a static group | |
355 | $smartGroupId = $grpID; | |
356 | } | |
357 | else { | |
358 | //get the hidden smart group id. | |
359 | $ssId = $this->get('ssID'); | |
35f7561f | 360 | $hiddenSmartParams = array( |
353ffa53 | 361 | 'group_type' => array('2' => 1), |
6a488035 TO |
362 | 'form_values' => $this->get('formValues'), |
363 | 'saved_search_id' => $ssId, | |
364 | 'search_custom_id' => $this->get('customSearchID'), | |
365 | 'search_context' => $this->get('context'), | |
366 | ); | |
367 | ||
368 | list($smartGroupId, $savedSearchId) = CRM_Contact_BAO_Group::createHiddenSmartGroup($hiddenSmartParams); | |
369 | ||
370 | //set the saved search id. | |
371 | if (!$ssId) { | |
372 | if ($savedSearchId) { | |
373 | $this->set('ssID', $savedSearchId); | |
374 | } | |
375 | else { | |
376 | CRM_Core_Error::fatal(); | |
377 | } | |
378 | } | |
379 | } | |
380 | ||
381 | //get the base group for this mailing, CRM-3711 | |
382 | $groups['base'] = array($values['baseGroup']); | |
383 | $values['includeGroups'][] = $smartGroupId; | |
384 | } | |
385 | ||
386 | foreach ( | |
353ffa53 TO |
387 | array( |
388 | 'name', | |
389 | 'group_id', | |
390 | 'search_id', | |
391 | 'search_args', | |
392 | 'campaign_id', | |
393 | 'dedupe_email', | |
394 | 'location_type_id', | |
395 | 'email_selection_method' | |
396 | ) as $n | |
6a488035 | 397 | ) { |
a7488080 | 398 | if (!empty($values[$n])) { |
6a488035 TO |
399 | $params[$n] = $values[$n]; |
400 | } | |
401 | } | |
402 | ||
6a488035 TO |
403 | $qf_Group_submit = $this->controller->exportValue($this->_name, '_qf_Group_submit'); |
404 | $this->set('name', $params['name']); | |
405 | ||
353ffa53 TO |
406 | $inGroups = $values['includeGroups']; |
407 | $outGroups = $values['excludeGroups']; | |
408 | $inMailings = $values['includeMailings']; | |
6a488035 TO |
409 | $outMailings = $values['excludeMailings']; |
410 | ||
411 | if (is_array($inGroups)) { | |
412 | foreach ($inGroups as $key => $id) { | |
413 | if ($id) { | |
414 | $groups['include'][] = $id; | |
415 | } | |
416 | } | |
417 | } | |
418 | if (is_array($outGroups)) { | |
419 | foreach ($outGroups as $key => $id) { | |
420 | if ($id) { | |
421 | $groups['exclude'][] = $id; | |
422 | } | |
423 | } | |
424 | } | |
425 | ||
426 | $mailings = array(); | |
427 | if (is_array($inMailings)) { | |
428 | foreach ($inMailings as $key => $id) { | |
429 | if ($id) { | |
430 | $mailings['include'][] = $id; | |
431 | } | |
432 | } | |
433 | } | |
434 | if (is_array($outMailings)) { | |
435 | foreach ($outMailings as $key => $id) { | |
436 | if ($id) { | |
437 | $mailings['exclude'][] = $id; | |
438 | } | |
439 | } | |
440 | } | |
441 | ||
353ffa53 TO |
442 | $session = CRM_Core_Session::singleton(); |
443 | $params['groups'] = $groups; | |
6a488035 TO |
444 | $params['mailings'] = $mailings; |
445 | $ids = array(); | |
446 | if ($this->get('mailing_id')) { | |
447 | ||
448 | // don't create a new mailing if already exists | |
449 | $ids['mailing_id'] = $this->get('mailing_id'); | |
450 | ||
451 | $groupTableName = CRM_Contact_BAO_Group::getTableName(); | |
452 | $mailingTableName = CRM_Mailing_BAO_Mailing::getTableName(); | |
453 | ||
454 | // delete previous includes/excludes, if mailing already existed | |
455 | foreach (array('groups', 'mailings') as $entity) { | |
353ffa53 TO |
456 | $mg = new CRM_Mailing_DAO_MailingGroup(); |
457 | $mg->mailing_id = $ids['mailing_id']; | |
6a488035 TO |
458 | $mg->entity_table = ($entity == 'groups') ? $groupTableName : $mailingTableName; |
459 | $mg->find(); | |
460 | while ($mg->fetch()) { | |
461 | $mg->delete(); | |
462 | } | |
463 | } | |
464 | } | |
465 | else { | |
466 | // new mailing, so lets set the created_id | |
467 | $session = CRM_Core_Session::singleton(); | |
468 | $params['created_id'] = $session->get('userID'); | |
469 | $params['created_date'] = date('YmdHis'); | |
470 | } | |
6a488035 TO |
471 | $mailing = CRM_Mailing_BAO_Mailing::create($params, $ids); |
472 | $this->set('mailing_id', $mailing->id); | |
473 | ||
474 | $dedupeEmail = FALSE; | |
475 | if (isset($params['dedupe_email'])) { | |
476 | $dedupeEmail = $params['dedupe_email']; | |
477 | } | |
478 | ||
1365ea2f BS |
479 | // mailing id should be added to the form object |
480 | $this->_mailingID = $mailing->id; | |
481 | ||
6a488035 TO |
482 | // also compute the recipients and store them in the mailing recipients table |
483 | CRM_Mailing_BAO_Mailing::getRecipients( | |
484 | $mailing->id, | |
485 | $mailing->id, | |
486 | NULL, | |
487 | NULL, | |
488 | TRUE, | |
489 | $dedupeEmail | |
490 | ); | |
491 | ||
492 | $count = CRM_Mailing_BAO_Recipients::mailingSize($mailing->id); | |
493 | $this->set('count', $count); | |
494 | $this->assign('count', $count); | |
495 | $this->set('groups', $groups); | |
496 | $this->set('mailings', $mailings); | |
497 | ||
498 | if ($qf_Group_submit) { | |
499 | //when user perform mailing from search context | |
500 | //redirect it to search result CRM-3711. | |
501 | $ssID = $this->get('ssID'); | |
502 | $context = $this->get('context'); | |
503 | if ($ssID && $this->_searchBasedMailing) { | |
504 | if ($this->_action == CRM_Core_Action::BASIC) { | |
505 | $fragment = 'search'; | |
506 | } | |
507 | elseif ($this->_action == CRM_Core_Action::PROFILE) { | |
508 | $fragment = 'search/builder'; | |
509 | } | |
510 | elseif ($this->_action == CRM_Core_Action::ADVANCED) { | |
511 | $fragment = 'search/advanced'; | |
512 | } | |
513 | else { | |
514 | $fragment = 'search/custom'; | |
515 | } | |
516 | ||
517 | $context = $this->get('context'); | |
518 | if (!CRM_Contact_Form_Search::isSearchContext($context)) { | |
519 | $context = 'search'; | |
520 | } | |
521 | $urlParams = "force=1&reset=1&ssID={$ssID}&context={$context}"; | |
522 | ||
523 | $qfKey = CRM_Utils_Request::retrieve('qfKey', 'String', $this); | |
524 | if (CRM_Utils_Rule::qfKey($qfKey)) { | |
525 | $urlParams .= "&qfKey=$qfKey"; | |
526 | } | |
527 | ||
528 | $draftURL = CRM_Utils_System::url('civicrm/mailing/browse/unscheduled', 'scheduled=false&reset=1'); | |
529 | $status = ts("You can continue later by clicking the 'Continue' action to resume working on it.<br />From <a href='%1'>Draft and Unscheduled Mailings</a>.", array(1 => $draftURL)); | |
530 | ||
531 | // Redirect user to search. | |
532 | $url = CRM_Utils_System::url('civicrm/contact/' . $fragment, $urlParams); | |
533 | } | |
534 | else { | |
535 | $status = ts("Click the 'Continue' action to resume working on it."); | |
536 | $url = CRM_Utils_System::url('civicrm/mailing/browse/unscheduled', 'scheduled=false&reset=1'); | |
537 | } | |
538 | CRM_Core_Session::setStatus($status, ts('Mailing Saved'), 'success'); | |
539 | return $this->controller->setDestination($url); | |
540 | } | |
541 | } | |
542 | ||
543 | /** | |
544 | * Display Name of the form | |
545 | * | |
6a488035 TO |
546 | * |
547 | * @return string | |
548 | */ | |
549 | public function getTitle() { | |
550 | return ts('Select Recipients'); | |
551 | } | |
552 | ||
553 | /** | |
100fef9d | 554 | * Global validation rules for the form |
6a488035 | 555 | * |
90c8230e TO |
556 | * @param array $fields |
557 | * Posted values of the form. | |
6a488035 | 558 | * |
a6c01b45 CW |
559 | * @return array |
560 | * list of errors to be posted back to the form | |
6a488035 | 561 | */ |
00be9182 | 562 | public static function formRule($fields) { |
6a488035 TO |
563 | $errors = array(); |
564 | if (isset($fields['includeGroups']) && | |
565 | is_array($fields['includeGroups']) && | |
566 | isset($fields['excludeGroups']) && | |
567 | is_array($fields['excludeGroups']) | |
568 | ) { | |
569 | $checkGroups = array(); | |
570 | $checkGroups = array_intersect($fields['includeGroups'], $fields['excludeGroups']); | |
571 | if (!empty($checkGroups)) { | |
572 | $errors['excludeGroups'] = ts('Cannot have same groups in Include Group(s) and Exclude Group(s).'); | |
573 | } | |
574 | } | |
575 | ||
576 | if (isset($fields['includeMailings']) && | |
577 | is_array($fields['includeMailings']) && | |
578 | isset($fields['excludeMailings']) && | |
579 | is_array($fields['excludeMailings']) | |
580 | ) { | |
581 | $checkMailings = array(); | |
582 | $checkMailings = array_intersect($fields['includeMailings'], $fields['excludeMailings']); | |
583 | if (!empty($checkMailings)) { | |
584 | $errors['excludeMailings'] = ts('Cannot have same mail in Include mailing(s) and Exclude mailing(s).'); | |
585 | } | |
586 | } | |
587 | ||
588 | if (!empty($fields['search_id']) && | |
589 | empty($fields['group_id']) | |
590 | ) { | |
591 | $errors['group_id'] = ts('You must select a group to filter on'); | |
592 | } | |
593 | ||
594 | if (empty($fields['search_id']) && | |
595 | !empty($fields['group_id']) | |
596 | ) { | |
597 | $errors['search_id'] = ts('You must select a search to filter'); | |
598 | } | |
599 | ||
bac4cd35 | 600 | if (!empty($fields['location_type_id'])) { |
601 | if ($fields['email_selection_method'] == 'automatic') { | |
602 | $errors['location_type_id'] = ts("If 'Email Selection Method' is automatic, you are not allowed to choose any 'Location Type'"); | |
603 | } | |
604 | } | |
605 | elseif ($fields['email_selection_method'] != 'automatic') { | |
606 | $errors['email_selection_method'] = ts("If 'Location Type' is not selected, you must set the 'Email Selection Method' to automatic as well."); | |
607 | } | |
608 | ||
6a488035 TO |
609 | return empty($errors) ? TRUE : $errors; |
610 | } | |
611 | } |