3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.6 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
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-2014
37 * This class generates form components for processing a pledge payment
40 class CRM_Pledge_Form_Payment
extends CRM_Core_Form
{
43 * The id of the pledge payment that we are proceessing.
50 * Set variables up before form is built.
54 public function preProcess() {
55 // check for edit permission
56 if (!CRM_Core_Permission
::check('edit pledges')) {
57 CRM_Core_Error
::fatal(ts('You do not have permission to access this page.'));
60 $this->_id
= CRM_Utils_Request
::retrieve('ppId', 'Positive', $this);
62 CRM_Utils_System
::setTitle(ts('Edit Scheduled Pledge Payment'));
66 * Set default values for the form.
67 * the default values are retrieved from the database
72 public function setDefaultValues() {
75 $params['id'] = $this->_id
;
76 CRM_Pledge_BAO_PledgePayment
::retrieve($params, $defaults);
77 list($defaults['scheduled_date']) = CRM_Utils_Date
::setDateDefaults($defaults['scheduled_date']);
78 if (isset($defaults['contribution_id'])) {
79 $this->assign('pledgePayment', TRUE);
81 $status = CRM_Contribute_PseudoConstant
::contributionStatus($defaults['status_id']);
82 $this->assign('status', $status);
84 $defaults['option_type'] = 1;
89 * Build the form object.
93 public function buildQuickForm() {
95 $this->addDate('scheduled_date', ts('Scheduled Date'), TRUE);
97 $this->addMoney('scheduled_amount',
98 ts('Scheduled Amount'), TRUE,
99 array('readonly' => TRUE),
106 $optionTypes = array(
107 '1' => ts('Adjust Pledge Payment Schedule?'),
108 '2' => ts('Adjust Total Pledge Amount?'),
110 $element = $this->addRadio('option_type',
116 $this->addButtons(array(
119 'name' => ts('Save'),
120 'spacing' => ' ',
125 'name' => ts('Cancel'),
132 * Process the form submission.
137 public function postProcess() {
138 //get the submitted form values.
139 $formValues = $this->controller
->exportValues($this->_name
);
141 $formValues['scheduled_date'] = CRM_Utils_Date
::processDate($formValues['scheduled_date']);
142 $params['scheduled_date'] = CRM_Utils_Date
::format($formValues['scheduled_date']);
143 $params['currency'] = CRM_Utils_Array
::value('currency', $formValues);
145 $contributionStatus = CRM_Contribute_PseudoConstant
::contributionStatus(NULL, 'name');
147 if (CRM_Utils_Date
::overdue(CRM_Utils_Date
::customFormat($params['scheduled_date'], '%Y%m%d'), $now)) {
148 $params['status_id'] = array_search('Overdue', $contributionStatus);
151 $params['status_id'] = array_search('Pending', $contributionStatus);
154 $params['id'] = $this->_id
;
155 $pledgeId = CRM_Core_DAO
::getFieldValue('CRM_Pledge_DAO_PledgePayment', $params['id'], 'pledge_id');
157 CRM_Pledge_BAO_PledgePayment
::add($params);
158 $adjustTotalAmount = FALSE;
159 if (CRM_Utils_Array
::value('option_type', $formValues) == 2) {
160 $adjustTotalAmount = TRUE;
163 $pledgeScheduledAmount = CRM_Core_DAO
::getFieldValue('CRM_Pledge_DAO_PledgePayment',
169 $oldestPaymentAmount = CRM_Pledge_BAO_PledgePayment
::getOldestPledgePayment($pledgeId, 2);
170 if (($oldestPaymentAmount['count'] != 1) && ($oldestPaymentAmount['id'] == $params['id'])) {
171 $oldestPaymentAmount = CRM_Pledge_BAO_PledgePayment
::getOldestPledgePayment($pledgeId);
173 if (($formValues['scheduled_amount'] - $pledgeScheduledAmount) >= $oldestPaymentAmount['amount']) {
174 $adjustTotalAmount = TRUE;
176 //update pledge status
177 CRM_Pledge_BAO_PledgePayment
::updatePledgePaymentStatus($pledgeId,
178 array($params['id']),
179 $params['status_id'],
181 $formValues['scheduled_amount'],
185 $statusMsg = ts('Pledge Payment Schedule has been updated.');
186 CRM_Core_Session
::setStatus($statusMsg, ts('Saved'), 'success');