3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.7 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2015 |
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 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2015
37 * This class generates form components for Financial Type
40 class CRM_Financial_Form_FinancialType
extends CRM_Contribute_Form
{
43 * Build the form object.
47 public function buildQuickForm() {
48 parent
::buildQuickForm();
49 $this->setPageTitle(ts('Financial Type'));
51 $this->_id
= CRM_Utils_Request
::retrieve('id', 'Positive', $this);
53 $this->_title
= CRM_Core_DAO
::getFieldValue('CRM_Financial_DAO_FinancialType', $this->_id
, 'name');
55 if ($this->_action
& CRM_Core_Action
::DELETE
) {
58 $this->applyFilter('__ALL__', 'trim');
59 $this->add('text', 'name', ts('Name'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'name'), TRUE);
61 $this->add('text', 'description', ts('Description'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'description'));
63 $this->add('checkbox', 'is_deductible', ts('Tax-Deductible?'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'is_deductible'));
64 $this->add('checkbox', 'is_active', ts('Enabled?'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'is_active'));
65 $this->add('checkbox', 'is_reserved', ts('Reserved?'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'is_reserved'));
66 if ($this->_action
== CRM_Core_Action
::UPDATE
) {
67 $this->assign('aid', $this->_id
);
69 if ($this->_action
== CRM_Core_Action
::UPDATE
&& CRM_Core_DAO
::getFieldValue('CRM_Financial_DAO_FinancialType', $this->_id
, 'is_reserved', 'vid')) {
70 $this->freeze(array('is_active'));
73 $this->addRule('name', ts('A financial type with this name already exists. Please select another name.'), 'objectExists',
74 array('CRM_Financial_DAO_FinancialType', $this->_id
)
79 * Process the form submission.
83 public function postProcess() {
84 if ($this->_action
& CRM_Core_Action
::DELETE
) {
85 $errors = CRM_Financial_BAO_FinancialType
::del($this->_id
);
86 if (!empty($errors)) {
87 CRM_Core_Error
::statusBounce($errors['error_message'], CRM_Utils_System
::url('civicrm/admin/financial/financialType', "reset=1&action=browse"), ts('Cannot Delete'));
89 CRM_Core_Session
::setStatus(ts('Selected financial type has been deleted.'), ts('Record Deleted'), 'success');
92 $params = $ids = array();
93 // store the submitted values in an array
94 $params = $this->exportValues();
96 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
97 $ids['financialType'] = $this->_id
;
100 $financialType = CRM_Financial_BAO_FinancialType
::add($params, $ids);
101 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
102 $url = CRM_Utils_System
::url('civicrm/admin/financial/financialType', 'reset=1&action=browse');
103 CRM_Core_Session
::setStatus(ts('The financial type "%1" has been updated.', array(1 => $financialType->name
)), ts('Saved'), 'success');
106 $url = CRM_Utils_System
::url('civicrm/admin/financial/financialType/accounts', 'reset=1&action=browse&aid=' . $financialType->id
);
107 $statusArray = array(
108 1 => $financialType->name
,
109 2 => $financialType->name
,
110 3 => CRM_Utils_Array
::value(0, $financialType->titles
),
111 4 => CRM_Utils_Array
::value(1, $financialType->titles
),
112 5 => CRM_Utils_Array
::value(2, $financialType->titles
),
114 if (empty($financialType->titles
)) {
115 $text = ts('Your Financial "%1" Type has been created and assigned to an existing financial account with the same title. You should review the assigned account and determine whether additional account relationships are needed.', $statusArray);
118 $text = ts('Your Financial "%1" Type has been created, along with a corresponding income account "%2". That income account, along with standard financial accounts "%3", "%4" and "%5" have been linked to the financial type. You may edit or replace those relationships here.', $statusArray);
120 CRM_Core_Session
::setStatus($text, ts('Saved'), 'success', array('expires' => 0));
123 $session = CRM_Core_Session
::singleton();
124 $session->replaceUserContext($url);