3 +--------------------------------------------------------------------+
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2019 |
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-2019
35 * Page for displaying list of financial type accounts
37 class CRM_Financial_Page_FinancialTypeAccount
extends CRM_Core_Page
{
39 * The action links that we need to display for the browse screen.
43 public static $_links = NULL;
46 * The account id that we need to display for the browse screen.
50 protected $_aid = NULL;
58 public function getBAOName() {
59 return 'CRM_Financial_BAO_FinancialTypeAccount';
66 * (reference) of action links
68 public function &links() {
69 if (!(self
::$_links)) {
71 CRM_Core_Action
::UPDATE
=> [
73 'url' => 'civicrm/admin/financial/financialType/accounts',
74 'qs' => 'action=update&id=%%id%%&aid=%%aid%%&reset=1',
75 'title' => ts('Edit Financial Type Account'),
77 CRM_Core_Action
::DELETE
=> [
78 'name' => ts('Delete'),
79 'url' => 'civicrm/admin/financial/financialType/accounts',
80 'qs' => 'action=delete&id=%%id%%&aid=%%aid%%',
81 'title' => ts('Delete Financial Type Account'),
91 * This method is called after the page is created. It checks for the
92 * type of action and executes that action.
93 * Finally it calls the parent's run method.
95 public function run() {
96 // get the requested action
97 // default to 'browse'
98 $action = CRM_Utils_Request
::retrieve('action', 'String', $this, FALSE, 'browse');
100 // assign vars to templates
101 $this->assign('action', $action);
102 $id = CRM_Utils_Request
::retrieve('id', 'Positive', $this, FALSE, 0);
103 $this->_aid
= CRM_Utils_Request
::retrieve('aid', 'Positive', $this, FALSE, 0);
105 // what action to take ?
106 if ($action & (CRM_Core_Action
::UPDATE | CRM_Core_Action
::ADD | CRM_Core_Action
::DELETE
)) {
107 $this->edit($action, $id);
110 $this->browse($action, $id);
114 return parent
::run();
118 * Browse all Financial Type Account data.
120 public function browse() {
121 // get all Financial Type Account data sorted by weight
124 $dao = new CRM_Financial_DAO_EntityFinancialAccount();
125 $params['entity_id'] = $this->_aid
;
126 $params['entity_table'] = 'civicrm_financial_type';
128 $relationTypeId = key(CRM_Core_PseudoConstant
::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
129 $this->_title
= CRM_Core_DAO
::getFieldValue('CRM_Financial_DAO_FinancialType', $this->_aid
, 'name');
130 CRM_Utils_System
::setTitle($this->_title
. ' - ' . ts('Assigned Financial Accounts'));
131 $financialAccountType = CRM_Core_PseudoConstant
::get('CRM_Financial_DAO_FinancialAccount', 'financial_account_type_id');
132 $accountRelationship = CRM_Core_PseudoConstant
::get('CRM_Financial_DAO_EntityFinancialAccount', 'account_relationship');
133 $dao->copyValues($params);
135 while ($dao->fetch()) {
136 $financialType[$dao->id
] = [];
137 CRM_Core_DAO
::storeValues($dao, $financialType[$dao->id
]);
139 $params = ['id' => $dao->financial_account_id
];
141 $financialAccount = CRM_Financial_BAO_FinancialAccount
::retrieve($params, $defaults);
142 if (!empty($financialAccount)) {
143 $financialType[$dao->id
]['financial_account'] = $financialAccount->name
;
144 $financialType[$dao->id
]['accounting_code'] = $financialAccount->accounting_code
;
145 $financialType[$dao->id
]['account_type_code'] = $financialAccount->account_type_code
;
146 $financialType[$dao->id
]['is_active'] = $financialAccount->is_active
;
147 if (!empty($financialAccount->contact_id
)) {
148 $financialType[$dao->id
]['owned_by'] = CRM_Contact_BAO_Contact
::displayName($financialAccount->contact_id
);
150 if (!empty($financialAccount->financial_account_type_id
)) {
151 $optionGroupName = 'financial_account_type';
152 $financialType[$dao->id
]['financial_account_type'] = CRM_Utils_Array
::value($financialAccount->financial_account_type_id
, $financialAccountType);
155 if (!empty($dao->account_relationship
)) {
156 $optionGroupName = 'account_relationship';
157 $financialType[$dao->id
]['account_relationship'] = CRM_Utils_Array
::value($dao->account_relationship
, $accountRelationship);
160 // form all action links
161 $action = array_sum(array_keys($this->links()));
162 $links = self
::links();
165 if ($dao->account_relationship
== $relationTypeId) {
166 unset($links[CRM_Core_Action
::DELETE
]);
168 $financialType[$dao->id
]['action'] = CRM_Core_Action
::formLink($links, $action,
171 'aid' => $dao->entity_id
,
175 'financialTypeAccount.manage.action',
176 'FinancialTypeAccount',
180 $this->assign('rows', $financialType);
181 $this->assign('aid', $this->_aid
);
182 $this->assign('financialTypeTitle', $this->_title
);
185 CRM_Core_Error
::fatal();
191 * Edit CiviCRM Financial Type Account data.
193 * editing would involved modifying existing financial Account Type + adding data
194 * to new financial Account Type.
196 * @param string $action
197 * The action to be invoked.
199 public function edit($action) {
200 // create a simple controller for editing CiviCRM Profile data
201 $controller = new CRM_Core_Controller_Simple('CRM_Financial_Form_FinancialTypeAccount', ts('Financial Account Types'), $action);
203 // set the userContext stack
204 $session = CRM_Core_Session
::singleton();
205 $session->pushUserContext(CRM_Utils_System
::url('civicrm/admin/financial/financialType/accounts',
206 'reset=1&action=browse&aid=' . $this->_aid
));
207 $controller->set('aid', $this->_aid
);
209 $controller->setEmbedded(TRUE);
210 $controller->process();