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 processing a case
40 class CRM_Grant_Form_Grant
extends CRM_Core_Form
{
43 * The id of the case that we are proceessing.
50 * The id of the contact associated with this contribution.
54 protected $_contactID;
59 * Explicitly declare the entity api name.
61 public function getDefaultEntity() {
66 * Set variables up before form is built.
70 public function preProcess() {
72 $this->_contactID
= CRM_Utils_Request
::retrieve('cid', 'Positive', $this);
73 $this->_id
= CRM_Utils_Request
::retrieve('id', 'Positive', $this);
74 $this->_grantType
= NULL;
76 $this->_grantType
= CRM_Core_DAO
::getFieldValue('CRM_Grant_DAO_Grant', $this->_id
, 'grant_type_id');
78 $this->_context
= CRM_Utils_Request
::retrieve('context', 'String', $this);
80 $this->assign('action', $this->_action
);
81 $this->assign('context', $this->_context
);
83 //check permission for action.
84 if (!CRM_Core_Permission
::checkActionPermission('CiviGrant', $this->_action
)) {
85 CRM_Core_Error
::fatal(ts('You do not have permission to access this page.'));
88 $this->setPageTitle(ts('Grant'));
90 if ($this->_action
& CRM_Core_Action
::DELETE
) {
94 $this->_noteId
= NULL;
96 $noteDAO = new CRM_Core_BAO_Note();
97 $noteDAO->entity_table
= 'civicrm_grant';
98 $noteDAO->entity_id
= $this->_id
;
99 if ($noteDAO->find(TRUE)) {
100 $this->_noteId
= $noteDAO->id
;
104 // when custom data is included in this page
105 if (!empty($_POST['hidden_custom'])) {
106 $this->set('type', 'Grant');
107 $this->set('subType', CRM_Utils_Array
::value('grant_type_id', $_POST));
108 $this->set('entityId', $this->_id
);
109 CRM_Custom_Form_CustomData
::preProcess($this);
110 CRM_Custom_Form_CustomData
::buildQuickForm($this);
111 CRM_Custom_Form_CustomData
::setDefaultValues($this);
118 public function setDefaultValues() {
120 $defaults = parent
::setDefaultValues();
122 if ($this->_action
& CRM_Core_Action
::DELETE
) {
126 $params['id'] = $this->_id
;
127 if ($this->_noteId
) {
128 $defaults['note'] = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_Note', $this->_noteId
, 'note');
131 CRM_Grant_BAO_Grant
::retrieve($params, $defaults);
133 // fix the display of the monetary value, CRM-4038
134 if (isset($defaults['amount_total'])) {
135 $defaults['amount_total'] = CRM_Utils_Money
::format($defaults['amount_total'], NULL, '%a');
137 if (isset($defaults['amount_requested'])) {
138 $defaults['amount_requested'] = CRM_Utils_Money
::format($defaults['amount_requested'], NULL, '%a');
140 if (isset($defaults['amount_granted'])) {
141 $defaults['amount_granted'] = CRM_Utils_Money
::format($defaults['amount_granted'], NULL, '%a');
145 'application_received_date',
147 'money_transfer_date',
151 foreach ($dates as $key) {
152 if (!empty($defaults[$key])) {
153 list($defaults[$key]) = CRM_Utils_Date
::setDateDefaults($defaults[$key]);
158 list($defaults['application_received_date']) = CRM_Utils_Date
::setDateDefaults();
165 * Build the form object.
169 public function buildQuickForm() {
171 if ($this->_action
& CRM_Core_Action
::DELETE
) {
172 $this->addButtons(array(
175 'name' => ts('Delete'),
176 'spacing' => ' ',
181 'name' => ts('Cancel'),
188 $attributes = CRM_Core_DAO
::getAttribute('CRM_Grant_DAO_Grant');
189 $this->addSelect('grant_type_id', array('onChange' => "CRM.buildCustomData( 'Grant', this.value );"), TRUE);
191 //need to assign custom data type and subtype to the template
192 $this->assign('customDataType', 'Grant');
193 $this->assign('customDataSubType', $this->_grantType
);
194 $this->assign('entityID', $this->_id
);
196 $this->addSelect('status_id', array(), TRUE);
198 $this->addDate('application_received_date', ts('Application Received'), FALSE, array('formatType' => 'custom'));
199 $this->addDate('decision_date', ts('Grant Decision'), FALSE, array('formatType' => 'custom'));
200 $this->addDate('money_transfer_date', ts('Money Transferred'), FALSE, array('formatType' => 'custom'));
201 $this->addDate('grant_due_date', ts('Grant Report Due'), FALSE, array('formatType' => 'custom'));
203 $this->addElement('checkbox', 'grant_report_received', ts('Grant Report Received?'), NULL);
204 $this->add('textarea', 'rationale', ts('Rationale'), $attributes['rationale']);
205 $this->add('text', 'amount_total', ts('Amount Requested'), NULL, TRUE);
206 $this->addRule('amount_total', ts('Please enter a valid amount.'), 'money');
208 $this->add('text', 'amount_granted', ts('Amount Granted'));
209 $this->addRule('amount_granted', ts('Please enter a valid amount.'), 'money');
211 $this->add('text', 'amount_requested', ts('Amount Requested<br />(original currency)'));
212 $this->addRule('amount_requested', ts('Please enter a valid amount.'), 'money');
214 $noteAttrib = CRM_Core_DAO
::getAttribute('CRM_Core_DAO_Note');
215 $this->add('textarea', 'note', ts('Notes'), $noteAttrib['note']);
217 // add attachments part
218 CRM_Core_BAO_File
::buildAttachment($this,
223 // make this form an upload since we dont know if the custom data injected dynamically
224 // is of type file etc $uploadNames = $this->get( 'uploadNames' );
225 $this->addButtons(array(
228 'name' => ts('Save'),
233 'name' => ts('Save and New'),
234 'js' => array('onclick' => "return verify( );"),
239 'name' => ts('Cancel'),
244 if ($this->_context
== 'standalone') {
245 $this->addEntityRef('contact_id', ts('Applicant'), array('create' => TRUE), TRUE);
250 * Process the form submission.
255 public function postProcess() {
256 if ($this->_action
& CRM_Core_Action
::DELETE
) {
257 CRM_Grant_BAO_Grant
::del($this->_id
);
261 if ($this->_action
& CRM_Core_Action
::UPDATE
) {
262 $ids['grant_id'] = $this->_id
;
265 // get the submitted form values.
266 $params = $this->controller
->exportValues($this->_name
);
268 if (empty($params['grant_report_received'])) {
269 $params['grant_report_received'] = "null";
272 // set the contact, when contact is selected
273 if ($this->_context
== 'standalone') {
274 $this->_contactID
= $params['contact_id'];
277 $params['contact_id'] = $this->_contactID
;
278 $ids['note'] = array();
279 if ($this->_noteId
) {
280 $ids['note']['id'] = $this->_noteId
;
283 // build custom data getFields array
284 $customFieldsGrantType = CRM_Core_BAO_CustomField
::getFields('Grant', FALSE, FALSE,
285 CRM_Utils_Array
::value('grant_type_id', $params)
287 $customFields = CRM_Utils_Array
::crmArrayMerge($customFieldsGrantType,
288 CRM_Core_BAO_CustomField
::getFields('Grant', FALSE, FALSE, NULL, NULL, TRUE)
290 $params['custom'] = CRM_Core_BAO_CustomField
::postProcess($params,
295 // add attachments as needed
296 CRM_Core_BAO_File
::formatAttachment($params,
302 $grant = CRM_Grant_BAO_Grant
::create($params, $ids);
304 $buttonName = $this->controller
->getButtonName();
305 $session = CRM_Core_Session
::singleton();
306 if ($this->_context
== 'standalone') {
307 if ($buttonName == $this->getButtonName('upload', 'new')) {
308 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/grant/add',
309 'reset=1&action=add&context=standalone'
313 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/contact/view',
314 "reset=1&cid={$this->_contactID}&selectedChild=grant"
318 elseif ($buttonName == $this->getButtonName('upload', 'new')) {
319 $session->replaceUserContext(CRM_Utils_System
::url('civicrm/contact/view/grant',
320 "reset=1&action=add&context=grant&cid={$this->_contactID}"