4 +--------------------------------------------------------------------+
5 | CiviCRM version 4.5 |
6 +--------------------------------------------------------------------+
7 | Copyright CiviCRM LLC (c) 2004-2014 |
8 +--------------------------------------------------------------------+
9 | This file is a part of CiviCRM. |
11 | CiviCRM is free software; you can copy, modify, and distribute it |
12 | under the terms of the GNU Affero General Public License |
13 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
15 | CiviCRM is distributed in the hope that it will be useful, but |
16 | WITHOUT ANY WARRANTY; without even the implied warranty of |
17 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
18 | See the GNU Affero General Public License for more details. |
20 | You should have received a copy of the GNU Affero General Public |
21 | License and the CiviCRM Licensing Exception along |
22 | with this program; if not, contact CiviCRM LLC |
23 | at info[AT]civicrm[DOT]org. If you have questions about the |
24 | GNU Affero General Public License or the licensing of CiviCRM, |
25 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
26 +--------------------------------------------------------------------+
32 * @copyright CiviCRM LLC (c) 2004-2014
38 * This class generates form components for Financial Type
41 class CRM_Financial_Form_FinancialType
extends CRM_Contribute_Form
{
44 * Build the form object
49 public function buildQuickForm() {
50 parent
::buildQuickForm();
51 $this->setPageTitle(ts('Financial Type'));
53 $this->_id
= CRM_Utils_Request
::retrieve('id' , 'Positive', $this);
55 $this->_title
= CRM_Core_DAO
::getFieldValue('CRM_Financial_DAO_FinancialType', $this->_id
, 'name');
57 if ($this->_action
& CRM_Core_Action
::DELETE
) {
60 $this->applyFilter('__ALL__', 'trim');
61 $this->add('text', 'name', ts('Name'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'name'), TRUE);
63 $this->add('text', 'description', ts('Description'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'description'));
65 $this->add('checkbox', 'is_deductible', ts('Tax-Deductible?'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'is_deductible'));
66 $this->add('checkbox', 'is_active', ts('Enabled?'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'is_active'));
67 $this->add('checkbox', 'is_reserved', ts('Reserved?'), CRM_Core_DAO
::getAttribute('CRM_Financial_DAO_FinancialType', 'is_reserved'));
68 if ($this->_action
== CRM_Core_Action
::UPDATE
) {
69 $this->assign('aid', $this->_id
);
71 if ($this->_action
== CRM_Core_Action
::UPDATE
&& CRM_Core_DAO
::getFieldValue('CRM_Financial_DAO_FinancialType', $this->_id
, 'is_reserved','vid')) {
72 $this->freeze(array('is_active'));
75 $this->addRule('name', ts('A financial type with this name already exists. Please select another name.'),'objectExists',
76 array('CRM_Financial_DAO_FinancialType', $this->_id
)
81 * Process the form submission
86 public function postProcess() {
87 if ($this->_action
& CRM_Core_Action
::DELETE
) {
88 $errors = CRM_Financial_BAO_FinancialType
::del($this->_id
);
89 if (!empty($errors)) {
90 CRM_Core_Error
::statusBounce($errors['error_message'], CRM_Utils_System
::url('civicrm/admin/financial/financialType', "reset=1&action=browse"), ts('Cannot Delete'));
92 CRM_Core_Session
::setStatus(ts('Selected financial type has been deleted.'), ts('Record Deleted'), 'success');
95 $params = $ids = array( );
96 // store the submitted values in an array
97 $params = $this->exportValues();
99 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
100 $ids['financialType'] = $this->_id
;
103 $financialType = CRM_Financial_BAO_FinancialType
::add($params, $ids);
104 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
105 $url = CRM_Utils_System
::url('civicrm/admin/financial/financialType', 'reset=1&action=browse');
106 CRM_Core_Session
::setStatus(ts('The financial type "%1" has been updated.', array( 1 => $financialType->name
)), ts('Saved'), 'success');
109 $url = CRM_Utils_System
::url('civicrm/admin/financial/financialType/accounts', 'reset=1&action=browse&aid=' . $financialType->id
);
110 $statusArray = array(
111 1 => $financialType->name
,
112 2 => $financialType->name
,
113 3 => CRM_Utils_Array
::value(0, $financialType->titles
),
114 4 => CRM_Utils_Array
::value(1, $financialType->titles
),
115 5 => CRM_Utils_Array
::value(2, $financialType->titles
),
117 if (empty($financialType->titles
)) {
118 $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);
121 $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);
123 CRM_Core_Session
::setStatus($text, ts('Saved'), 'success', array('expires' => 0));
126 $session = CRM_Core_Session
::singleton();
127 $session->replaceUserContext($url);