3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.5 |
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 build form elements for select exitsing or create new soft block
39 class CRM_Contribute_Form_SoftCredit
{
42 * Function to set variables up before form is built
49 static function preProcess(&$form) {
50 $contriDAO = new CRM_Contribute_DAO_Contribution();
51 $contriDAO->id
= $form->_id
;
52 $contriDAO->find(TRUE);
53 if ($contriDAO->contribution_page_id
) {
54 $ufJoinParams = array(
55 'module' => 'soft_credit',
56 'entity_table' => 'civicrm_contribution_page',
57 'entity_id' => $contriDAO->contribution_page_id
,
59 $profileId = CRM_Core_BAO_UFJoin
::getUFGroupIds($ufJoinParams);
61 //check if any honree profile is enabled if yes then assign its profile type to $_honoreeProfileType
62 // which will be used to constraint soft-credit contact type in formRule, CRM-13981
64 $form->_honoreeProfileType
= CRM_Core_BAO_UFGroup
::getContactType($profileId[0]);
71 * Function used to build form element for soft credit block
73 * @param CRM_Core_Form $form
78 static function buildQuickForm(&$form) {
79 if ($form->_mode
== 'live' && !empty($form->_honor_block_is_active
)) {
80 $ufJoinDAO = new CRM_Core_DAO_UFJoin();
81 $ufJoinDAO->module
= 'soft_credit';
82 $ufJoinDAO->entity_id
= $form->_id
;
83 if ($ufJoinDAO->find(TRUE)) {
84 $jsonData = CRM_Contribute_BAO_ContributionPage
::formatMultilingualHonorParams($ufJoinDAO->module_data
, TRUE);
86 foreach (array('honor_block_title', 'honor_block_text') as $name) {
87 $form->assign($name, $jsonData[$name]);
90 $softCreditTypes = CRM_Core_OptionGroup
::values("soft_credit_type", FALSE);
92 // radio button for Honor Type
93 foreach ($jsonData['soft_credit_types'] as $value) {
94 $honorTypes[$value] = $form->createElement('radio', NULL, NULL, $softCreditTypes[$value], $value);
96 $form->addGroup($honorTypes, 'soft_credit_type_id', NULL)->setAttribute('allowClear', TRUE);
102 // by default generate 5 blocks
105 $showSoftCreditRow = 2;
106 if ($form->getAction() & CRM_Core_Action
::UPDATE
) {
107 $form->_softCreditInfo
= CRM_Contribute_BAO_ContributionSoft
::getSoftContribution($form->_id
, TRUE);
109 elseif ($form->_pledgeID
) {
110 //Check and select most recent completed contrubtion and use it to retrieve
111 //soft-credit information to use as default for current pledge payment, CRM-13981
112 $pledgePayments = CRM_Pledge_BAO_PledgePayment
::getPledgePayments($form->_pledgeID
);
113 foreach ($pledgePayments as $id => $record) {
114 if ($record['contribution_id']) {
115 $softCredits = CRM_Contribute_BAO_ContributionSoft
::getSoftContribution($record['contribution_id'], TRUE);
116 if ($record['status'] == 'Completed' && count($softCredits) > 0) {
117 $form->_softCreditInfo
= $softCredits;
123 if (property_exists($form, "_softCreditInfo")) {
124 if (!empty($form->_softCreditInfo
['soft_credit'])) {
125 $showSoftCreditRow = count($form->_softCreditInfo
['soft_credit']);
126 $showSoftCreditRow++
;
130 for ($rowNumber = 1; $rowNumber <= $item_count; $rowNumber++
) {
131 $form->addEntityRef("soft_credit_contact_id[{$rowNumber}]", ts('Contact'), array('create' => TRUE));
133 $form->addMoney("soft_credit_amount[{$rowNumber}]", ts('Amount'), FALSE, NULL, FALSE);
135 $form->addSelect("soft_credit_type[{$rowNumber}]", array('entity' => 'contribution_soft', 'field' => 'soft_credit_type_id', 'label' => ts('Type')));
136 if (!empty($form->_softCreditInfo
['soft_credit'][$rowNumber]['soft_credit_id'])) {
137 $form->add('hidden', "soft_credit_id[{$rowNumber}]",
138 $form->_softCreditInfo
['soft_credit'][$rowNumber]['soft_credit_id']);
142 // CRM-7368 allow user to set or edit PCP link for contributions
143 $siteHasPCPs = CRM_Contribute_PseudoConstant
::pcPage();
144 if (!CRM_Utils_Array
::crmIsEmptyArray($siteHasPCPs)) {
145 $form->assign('siteHasPCPs', 1);
146 $form->add('hidden', 'pcp_made_through'); // stores the label
147 $form->add('text', 'pcp_made_through_id', ts('Credit to a Personal Campaign Page'), array('class' => 'twenty'));
148 $form->addElement('checkbox', 'pcp_display_in_roll', ts('Display in Honor Roll?'), NULL);
149 $form->addElement('text', 'pcp_roll_nickname', ts('Name (for Honor Roll)'));
150 $form->addElement('textarea', 'pcp_personal_note', ts('Personal Note (for Honor Roll)'));
152 $form->assign('showSoftCreditRow', $showSoftCreditRow);
153 $form->assign('rowCount', $item_count);
154 $form->addElement('hidden', 'sct_default_id',
155 CRM_Core_OptionGroup
::getDefaultValue("soft_credit_type"),
156 array('id' => 'sct_default_id')
161 * Function used to set defaults for soft credit block
163 static function setDefaultValues(&$defaults, &$form) {
164 //Used to hide/unhide PCP and/or Soft-credit Panes
165 $noPCP = $noSoftCredit = TRUE;
166 if (!empty($form->_softCreditInfo
['soft_credit'])) {
167 $noSoftCredit = FALSE;
168 foreach ($form->_softCreditInfo
['soft_credit'] as $key => $value) {
169 $defaults["soft_credit_amount[$key]"] = CRM_Utils_Money
::format($value['amount'], NULL, '%a');
170 $defaults["soft_credit_contact_id[$key]"] = $value['contact_id'];
171 $defaults["soft_credit_type[$key]"] = $value['soft_credit_type'];
174 if (!empty($form->_softCreditInfo
['pcp_id'])) {
176 $pcpInfo = $form->_softCreditInfo
;
177 $pcpId = CRM_Utils_Array
::value('pcp_id', $pcpInfo);
178 $pcpTitle = CRM_Core_DAO
::getFieldValue('CRM_PCP_DAO_PCP', $pcpId, 'title');
179 $contributionPageTitle = CRM_PCP_BAO_PCP
::getPcpPageTitle($pcpId, 'contribute');
180 $defaults['pcp_made_through'] = CRM_Utils_Array
::value('sort_name', $pcpInfo) . " :: " . $pcpTitle . " :: " . $contributionPageTitle;
181 $defaults['pcp_made_through_id'] = CRM_Utils_Array
::value('pcp_id', $pcpInfo);
182 $defaults['pcp_display_in_roll'] = CRM_Utils_Array
::value('pcp_display_in_roll', $pcpInfo);
183 $defaults['pcp_roll_nickname'] = CRM_Utils_Array
::value('pcp_roll_nickname', $pcpInfo);
184 $defaults['pcp_personal_note'] = CRM_Utils_Array
::value('pcp_personal_note', $pcpInfo);
187 $form->assign('noSoftCredit', $noSoftCredit);
188 $form->assign('noPCP', $noPCP);
194 * @param array $fields the input form values
199 * @return true if no errors, else array of errors
203 static function formRule($fields, $errors, $self) {
206 // if honor roll fields are populated but no PCP is selected
207 if (empty($fields['pcp_made_through_id'])) {
208 if (!empty($fields['pcp_display_in_roll']) ||
!empty($fields['pcp_roll_nickname']) ||
209 CRM_Utils_Array
::value('pcp_personal_note', $fields)
211 $errors['pcp_made_through_id'] = ts('Please select a Personal Campaign Page, OR uncheck Display in Honor Roll and clear both the Honor Roll Name and the Personal Note field.');
215 if (!empty($fields['soft_credit_amount'])) {
216 $repeat = array_count_values($fields['soft_credit_contact_id']);
217 foreach ($fields['soft_credit_amount'] as $key => $val) {
218 if (!empty($fields['soft_credit_contact_id'][$key])) {
219 if ($repeat[$fields['soft_credit_contact_id'][$key]] > 1) {
220 $errors["soft_credit_contact[$key]"] = ts('You cannot enter multiple soft credits for the same contact.');
222 if ($self->_action
== CRM_Core_Action
::ADD
&& $fields['soft_credit_amount'][$key]
223 && (CRM_Utils_Rule
::cleanMoney($fields['soft_credit_amount'][$key]) > CRM_Utils_Rule
::cleanMoney($fields['total_amount']))) {
224 $errors["soft_credit_amount[$key]"] = ts('Soft credit amount cannot be more than the total amount.');
226 if (empty($fields['soft_credit_amount'][$key])) {
227 $errors["soft_credit_amount[$key]"] = ts('Please enter the soft credit amount.');
229 $contactType = CRM_Contact_BAO_Contact
::getContactType($fields['soft_credit_contact_id'][$key]);
230 if ($self->_honoreeProfileType
&& $self->_honoreeProfileType
!= $contactType) {
231 $errors["soft_credit_contact[$key]"] = ts('Please choose a contact of type %1', array(1 => $self->_honoreeProfileType
));