CRM/Contribute/BAO/Contribution.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.7                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2015                                |
   7  +--------------------------------------------------------------------+
   8  | This file is a part of CiviCRM.                                    |
   9  |                                                                    |
  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.   |
  13  |                                                                    |
  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.        |
  18  |                                                                    |
  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  +--------------------------------------------------------------------+
  26  */
  27
  28 /**
  29  *
  30  * @package CRM
  31  * @copyright CiviCRM LLC (c) 2004-2015
  32  */
  33 class CRM_Contribute_BAO_Contribution extends CRM_Contribute_DAO_Contribution {
  34
  35   /**
  36    * Static field for all the contribution information that we can potentially import
  37    *
  38    * @var array
  39    */
  40   static $_importableFields = NULL;
  41
  42   /**
  43    * Static field for all the contribution information that we can potentially export
  44    *
  45    * @var array
  46    */
  47   static $_exportableFields = NULL;
  48
  49   /**
  50    * Field for all the objects related to this contribution
  51    * @var array of objects (e.g membership object, participant object)
  52    */
  53   public $_relatedObjects = array();
  54
  55   /**
  56    * Field for the component - either 'event' (participant) or 'contribute'
  57    * (any item related to a contribution page e.g. membership, pledge, contribution)
  58    * This is used for composing messages because they have dependency on the
  59    * contribution_page or event page - although over time we may eliminate that
  60    *
  61    * @var string component or event
  62    */
  63   public $_component = NULL;
  64
  65   /**
  66    * Possibly obsolete variable.
  67    *
  68    * If you use it please explain why it is set in the create function here.
  69    *
  70    * @var string
  71    */
  72   public $trxn_result_code;
  73
  74   /**
  75    * Class constructor.
  76    */
  77   public function __construct() {
  78     parent::__construct();
  79   }
  80
  81   /**
  82    * Takes an associative array and creates a contribution object.
  83    *
  84    * the function extract all the params it needs to initialize the create a
  85    * contribution object. the params array could contain additional unused name/value
  86    * pairs
  87    *
  88    * @param array $params
  89    *   (reference ) an assoc array of name/value pairs.
  90    * @param array $ids
  91    *   The array that holds all the db ids.
  92    *
  93    * @return CRM_Contribute_BAO_Contribution|void
  94    */
  95   public static function add(&$params, $ids = array()) {
  96     if (empty($params)) {
  97       return NULL;
  98     }
  99     //per http://wiki.civicrm.org/confluence/display/CRM/Database+layer we are moving away from $ids array
 100     $contributionID = CRM_Utils_Array::value('contribution', $ids, CRM_Utils_Array::value('id', $params));
 101     $duplicates = array();
 102     if (self::checkDuplicate($params, $duplicates, $contributionID)) {
 103       $error = CRM_Core_Error::singleton();
 104       $d = implode(', ', $duplicates);
 105       $error->push(CRM_Core_Error::DUPLICATE_CONTRIBUTION,
 106         'Fatal',
 107         array($d),
 108         "Duplicate error - existing contribution record(s) have a matching Transaction ID or Invoice ID. Contribution record ID(s) are: $d"
 109       );
 110       return $error;
 111     }
 112
 113     // first clean up all the money fields
 114     $moneyFields = array(
 115       'total_amount',
 116       'net_amount',
 117       'fee_amount',
 118       'non_deductible_amount',
 119     );
 120
 121     //if priceset is used, no need to cleanup money
 122     if (!empty($params['skipCleanMoney'])) {
 123       unset($moneyFields[0]);
 124     }
 125
 126     foreach ($moneyFields as $field) {
 127       if (isset($params[$field])) {
 128         $params[$field] = CRM_Utils_Rule::cleanMoney($params[$field]);
 129       }
 130     }
 131
 132     //set defaults in create mode
 133     if (!$contributionID) {
 134       CRM_Core_DAO::setCreateDefaults($params, self::getDefaults());
 135     }
 136
 137     //if contribution is created with cancelled or refunded status, add credit note id
 138     if (!empty($params['contribution_status_id'])) {
 139       $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
 140       // @todo - should we include Chargeback? If so use self::isContributionStatusNegative($params['contribution_status_id'])
 141       if (($params['contribution_status_id'] == array_search('Refunded', $contributionStatus)
 142         || $params['contribution_status_id'] == array_search('Cancelled', $contributionStatus))
 143       ) {
 144         if (empty($params['creditnote_id']) || $params['creditnote_id'] == "null") {
 145           $params['creditnote_id'] = self::createCreditNoteId();
 146         }
 147       }
 148     }
 149     else {
 150       // Since the fee amount is expecting this (later on) ensure it is always set.
 151       // It would only not be set for an update where it is unchanged.
 152       $params['contribution_status_id'] = civicrm_api3('Contribution', 'getvalue', array('id' => $contributionID, 'return' => 'contribution_status_id'));
 153     }
 154
 155     self::calculateMissingAmountParams($params, $contributionID);
 156
 157     if (!empty($params['payment_instrument_id'])) {
 158       $paymentInstruments = CRM_Contribute_PseudoConstant::paymentInstrument('name');
 159       if ($params['payment_instrument_id'] != array_search('Check', $paymentInstruments)) {
 160         $params['check_number'] = 'null';
 161       }
 162     }
 163
 164     $setPrevContribution = TRUE;
 165     // CRM-13964 partial payment
 166     if (!empty($params['partial_payment_total']) && !empty($params['partial_amount_pay'])) {
 167       $partialAmtTotal = $params['partial_payment_total'];
 168       $partialAmtPay = $params['partial_amount_pay'];
 169       $params['total_amount'] = $partialAmtTotal;
 170       if ($partialAmtPay < $partialAmtTotal) {
 171         $params['contribution_status_id'] = CRM_Core_OptionGroup::getValue('contribution_status', 'Partially paid', 'name');
 172         $params['is_pay_later'] = 0;
 173         $setPrevContribution = FALSE;
 174       }
 175     }
 176     if ($contributionID && $setPrevContribution) {
 177       $params['prevContribution'] = self::getValues(array('id' => $contributionID), CRM_Core_DAO::$_nullArray, CRM_Core_DAO::$_nullArray);
 178     }
 179
 180     if ($contributionID) {
 181       CRM_Utils_Hook::pre('edit', 'Contribution', $contributionID, $params);
 182     }
 183     else {
 184       CRM_Utils_Hook::pre('create', 'Contribution', NULL, $params);
 185     }
 186     $contribution = new CRM_Contribute_BAO_Contribution();
 187     $contribution->copyValues($params);
 188
 189     $contribution->id = $contributionID;
 190
 191     if (empty($contribution->id)) {
 192       // (only) on 'create', make sure that a valid currency is set (CRM-16845)
 193       if (!CRM_Utils_Rule::currencyCode($contribution->currency)) {
 194         $contribution->currency = CRM_Core_Config::singleton()->defaultCurrency;
 195       }
 196     }
 197
 198     $result = $contribution->save();
 199
 200     // Add financial_trxn details as part of fix for CRM-4724
 201     $contribution->trxn_result_code = CRM_Utils_Array::value('trxn_result_code', $params);
 202     $contribution->payment_processor = CRM_Utils_Array::value('payment_processor', $params);
 203
 204     //add Account details
 205     $params['contribution'] = $contribution;
 206     self::recordFinancialAccounts($params);
 207
 208     if (self::isUpdateToRecurringContribution($params)) {
 209       CRM_Contribute_BAO_ContributionRecur::updateOnNewPayment(
 210         (!empty($params['contribution_recur_id']) ? $params['contribution_recur_id'] : $params['prevContribution']->contribution_recur_id),
 211         $contributionStatus[$params['contribution_status_id']]
 212       );
 213     }
 214
 215     // reset the group contact cache for this group
 216     CRM_Contact_BAO_GroupContactCache::remove();
 217
 218     if ($contributionID) {
 219       CRM_Utils_Hook::post('edit', 'Contribution', $contribution->id, $contribution);
 220     }
 221     else {
 222       CRM_Utils_Hook::post('create', 'Contribution', $contribution->id, $contribution);
 223     }
 224
 225     return $result;
 226   }
 227
 228   /**
 229    * Is this contribution updating an existing recurring contribution.
 230    *
 231    * We need to upd the status of the linked recurring contribution if we have a new payment against it, or the initial
 232    * pending payment is being confirmed (or failing).
 233    *
 234    * @param array $params
 235    *
 236    * @return bool
 237    */
 238   public static function isUpdateToRecurringContribution($params) {
 239     if (!empty($params['contribution_recur_id']) && empty($params['id'])) {
 240       return TRUE;
 241     }
 242     if (empty($params['prevContribution']) || empty($params['contribution_status_id'])) {
 243       return FALSE;
 244     }
 245     if (empty($params['contribution_recur_id']) && empty($params['prevContribution']->contribution_recur_id)) {
 246       return FALSE;
 247     }
 248     $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
 249     if ($params['prevContribution']->contribution_status_id == array_search('Pending', $contributionStatus)) {
 250       return TRUE;
 251     }
 252     return FALSE;
 253   }
 254
 255   /**
 256    * Get defaults for new entity.
 257    * @return array
 258    */
 259   public static function getDefaults() {
 260     return array(
 261       'payment_instrument_id' => key(CRM_Core_OptionGroup::values('payment_instrument',
 262           FALSE, FALSE, FALSE, 'AND is_default = 1')
 263       ),
 264       'contribution_status_id' => CRM_Core_OptionGroup::getValue('contribution_status', 'Completed', 'name'),
 265     );
 266   }
 267
 268   /**
 269    * Fetch the object and store the values in the values array.
 270    *
 271    * @param array $params
 272    *   Input parameters to find object.
 273    * @param array $values
 274    *   Output values of the object.
 275    * @param array $ids
 276    *   The array that holds all the db ids.
 277    *
 278    * @return CRM_Contribute_BAO_Contribution|null
 279    *   The found object or null
 280    */
 281   public static function getValues($params, &$values, &$ids) {
 282     if (empty($params)) {
 283       return NULL;
 284     }
 285     $contribution = new CRM_Contribute_BAO_Contribution();
 286
 287     $contribution->copyValues($params);
 288
 289     if ($contribution->find(TRUE)) {
 290       $ids['contribution'] = $contribution->id;
 291
 292       CRM_Core_DAO::storeValues($contribution, $values);
 293
 294       return $contribution;
 295     }
 296     $null = NULL; // return by reference
 297     return $null;
 298   }
 299
 300   /**
 301    * Get the values and resolve the most common mappings.
 302    *
 303    * Since contribution status is resolved in almost every function that calls getValues it makes
 304    * sense to have an extra function to resolve it rather than repeat the code.
 305    *
 306    * Think carefully before adding more mappings to be resolved as there could be performance implications
 307    * if this function starts to be called from more iterative functions.
 308    *
 309    * @param array $params
 310    *   Input parameters to find object.
 311    *
 312    * @return array
 313    *   Array of the found contribution.
 314    * @throws CRM_Core_Exception
 315    */
 316   public static function getValuesWithMappings($params) {
 317     $values = $ids = array();
 318     $contribution = self::getValues($params, $values, $ids);
 319     if (is_null($contribution)) {
 320       throw new CRM_Core_Exception('No contribution found');
 321     }
 322     $values['contribution_status'] = CRM_Core_PseudoConstant::getName('CRM_Contribute_BAO_Contribution', 'contribution_status_id', $values['contribution_status_id']);
 323     return $values;
 324   }
 325
 326   /**
 327    * Calculate net_amount & fee_amount if they are not set.
 328    *
 329    * Net amount should be total - fee.
 330    * This should only be called for new contributions.
 331    *
 332    * @param array $params
 333    *   Params for a new contribution before they are saved.
 334    * @param int|null $contributionID
 335    *   Contribution ID if we are dealing with an update.
 336    *
 337    * @throws \CiviCRM_API3_Exception
 338    */
 339   public static function calculateMissingAmountParams(&$params, $contributionID) {
 340     if (!$contributionID && !isset($params['fee_amount'])) {
 341       if (isset($params['total_amount']) && isset($params['net_amount'])) {
 342         $params['fee_amount'] = $params['total_amount'] - $params['net_amount'];
 343       }
 344       else {
 345         $params['fee_amount'] = 0;
 346       }
 347     }
 348     if (!isset($params['net_amount'])) {
 349       if (!$contributionID) {
 350         $params['net_amount'] = $params['total_amount'] - $params['fee_amount'];
 351       }
 352       else {
 353         if (isset($params['fee_amount']) || isset($params['total_amount'])) {
 354           // We have an existing contribution and fee_amount or total_amount has been passed in but not net_amount.
 355           // net_amount may need adjusting.
 356           $contribution = civicrm_api3('Contribution', 'getsingle', array(
 357             'id' => $contributionID,
 358             'return' => array('total_amount', 'net_amount'),
 359           ));
 360           $totalAmount = isset($params['total_amount']) ? $params['total_amount'] : CRM_Utils_Array::value('total_amount', $contribution);
 361           $feeAmount = isset($params['fee_amount']) ? $params['fee_amount'] : CRM_Utils_Array::value('fee_amount', $contribution);
 362           $params['net_amount'] = $totalAmount - $feeAmount;
 363         }
 364       }
 365     }
 366   }
 367
 368   /**
 369    * @param $params
 370    * @param $billingLocationTypeID
 371    *
 372    * @return array
 373    */
 374   protected static function getBillingAddressParams($params, $billingLocationTypeID) {
 375     $hasBillingField = FALSE;
 376     $billingFields = array(
 377       'street_address',
 378       'city',
 379       'state_province_id',
 380       'postal_code',
 381       'country_id',
 382     );
 383
 384     //build address array
 385     $addressParams = array();
 386     $addressParams['location_type_id'] = $billingLocationTypeID;
 387     $addressParams['is_billing'] = 1;
 388
 389     $billingFirstName = CRM_Utils_Array::value('billing_first_name', $params);
 390     $billingMiddleName = CRM_Utils_Array::value('billing_middle_name', $params);
 391     $billingLastName = CRM_Utils_Array::value('billing_last_name', $params);
 392     $addressParams['address_name'] = "{$billingFirstName}" . CRM_Core_DAO::VALUE_SEPARATOR . "{$billingMiddleName}" . CRM_Core_DAO::VALUE_SEPARATOR . "{$billingLastName}";
 393
 394     foreach ($billingFields as $value) {
 395       $addressParams[$value] = CRM_Utils_Array::value("billing_{$value}-{$billingLocationTypeID}", $params);
 396       if (!empty($addressParams[$value])) {
 397         $hasBillingField = TRUE;
 398       }
 399     }
 400     return array($hasBillingField, $addressParams);
 401   }
 402
 403   /**
 404    * Get address params ready to be passed to the payment processor.
 405    *
 406    * We need address params in a couple of formats. For the payment processor we wan state_province_id-5.
 407    * To create an address we need state_province_id.
 408    *
 409    * @param array $params
 410    * @param int $billingLocationTypeID
 411    *
 412    * @return array
 413    */
 414   public static function getPaymentProcessorReadyAddressParams($params, $billingLocationTypeID) {
 415     list($hasBillingField, $addressParams) = self::getBillingAddressParams($params, $billingLocationTypeID);
 416     foreach ($addressParams as $name => $field) {
 417       if (substr($name, 0, 8) == 'billing_') {
 418         $addressParams[substr($name, 9)] = $addressParams[$field];
 419       }
 420     }
 421     return array($hasBillingField, $addressParams);
 422   }
 423
 424   /**
 425    * Get the number of terms for this contribution for a given membership type
 426    * based on querying the line item table and relevant price field values
 427    * Note that any one contribution should only be able to have one line item relating to a particular membership
 428    * type
 429    *
 430    * @param int $membershipTypeID
 431    *
 432    * @param int $contributionID
 433    *
 434    * @return int
 435    */
 436   public function getNumTermsByContributionAndMembershipType($membershipTypeID, $contributionID) {
 437     $numTerms = CRM_Core_DAO::singleValueQuery("
 438       SELECT membership_num_terms FROM civicrm_line_item li
 439       LEFT JOIN civicrm_price_field_value v ON li.price_field_value_id = v.id
 440       WHERE contribution_id = %1 AND membership_type_id = %2",
 441       array(1 => array($contributionID, 'Integer'), 2 => array($membershipTypeID, 'Integer'))
 442     );
 443     // default of 1 is precautionary
 444     return empty($numTerms) ? 1 : $numTerms;
 445   }
 446
 447   /**
 448    * Takes an associative array and creates a contribution object.
 449    *
 450    * @param array $params
 451    *   (reference ) an assoc array of name/value pairs.
 452    * @param array $ids
 453    *   The array that holds all the db ids.
 454    *
 455    * @return CRM_Contribute_BAO_Contribution
 456    */
 457   public static function create(&$params, $ids = array()) {
 458     $dateFields = array('receive_date', 'cancel_date', 'receipt_date', 'thankyou_date');
 459     foreach ($dateFields as $df) {
 460       if (isset($params[$df])) {
 461         $params[$df] = CRM_Utils_Date::isoToMysql($params[$df]);
 462       }
 463     }
 464
 465     //if contribution is created with cancelled or refunded status, add credit note id
 466     if (!empty($params['contribution_status_id'])) {
 467       $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
 468
 469       if (($params['contribution_status_id'] == array_search('Refunded', $contributionStatus)
 470           || $params['contribution_status_id'] == array_search('Cancelled', $contributionStatus))
 471       ) {
 472         if (empty($params['creditnote_id']) || $params['creditnote_id'] == "null") {
 473           $params['creditnote_id'] = self::createCreditNoteId();
 474         }
 475       }
 476     }
 477
 478     $transaction = new CRM_Core_Transaction();
 479
 480     $contribution = self::add($params, $ids);
 481
 482     if (is_a($contribution, 'CRM_Core_Error')) {
 483       $transaction->rollback();
 484       return $contribution;
 485     }
 486
 487     $params['contribution_id'] = $contribution->id;
 488
 489     if (!empty($params['custom']) &&
 490       is_array($params['custom'])
 491     ) {
 492       CRM_Core_BAO_CustomValueTable::store($params['custom'], 'civicrm_contribution', $contribution->id);
 493     }
 494
 495     $session = CRM_Core_Session::singleton();
 496
 497     if (!empty($params['note'])) {
 498       $noteParams = array(
 499         'entity_table' => 'civicrm_contribution',
 500         'note' => $params['note'],
 501         'entity_id' => $contribution->id,
 502         'contact_id' => $session->get('userID'),
 503         'modified_date' => date('Ymd'),
 504       );
 505       if (!$noteParams['contact_id']) {
 506         $noteParams['contact_id'] = $params['contact_id'];
 507       }
 508       CRM_Core_BAO_Note::add($noteParams);
 509     }
 510
 511     // make entry in batch entity batch table
 512     if (!empty($params['batch_id'])) {
 513       // in some update cases we need to get extra fields - ie an update that doesn't pass in all these params
 514       $titleFields = array(
 515         'contact_id',
 516         'total_amount',
 517         'currency',
 518         'financial_type_id',
 519       );
 520       $retrieveRequired = 0;
 521       foreach ($titleFields as $titleField) {
 522         if (!isset($contribution->$titleField)) {
 523           $retrieveRequired = 1;
 524           break;
 525         }
 526       }
 527       if ($retrieveRequired == 1) {
 528         $contribution->find(TRUE);
 529       }
 530     }
 531
 532     CRM_Contribute_BAO_ContributionSoft::processSoftContribution($params, $contribution);
 533
 534     $transaction->commit();
 535
 536     // check if activity record exist for this contribution, if
 537     // not add activity
 538     $activity = new CRM_Activity_DAO_Activity();
 539     $activity->source_record_id = $contribution->id;
 540     $activity->activity_type_id = CRM_Core_OptionGroup::getValue('activity_type',
 541       'Contribution',
 542       'name'
 543     );
 544     if (!$activity->find(TRUE)) {
 545       if (empty($contribution->contact_id)) {
 546         $contribution->find(TRUE);
 547       }
 548       CRM_Activity_BAO_Activity::addActivity($contribution, 'Offline');
 549     }
 550     else {
 551       // CRM-13237 : if activity record found, update it with campaign id of contribution
 552       CRM_Core_DAO::setFieldValue('CRM_Activity_BAO_Activity', $activity->id, 'campaign_id', $contribution->campaign_id);
 553     }
 554
 555     // do not add to recent items for import, CRM-4399
 556     if (empty($params['skipRecentView'])) {
 557       $url = CRM_Utils_System::url('civicrm/contact/view/contribution',
 558         "action=view&reset=1&id={$contribution->id}&cid={$contribution->contact_id}&context=home"
 559       );
 560       // in some update cases we need to get extra fields - ie an update that doesn't pass in all these params
 561       $titleFields = array(
 562         'contact_id',
 563         'total_amount',
 564         'currency',
 565         'financial_type_id',
 566       );
 567       $retrieveRequired = 0;
 568       foreach ($titleFields as $titleField) {
 569         if (!isset($contribution->$titleField)) {
 570           $retrieveRequired = 1;
 571           break;
 572         }
 573       }
 574       if ($retrieveRequired == 1) {
 575         $contribution->find(TRUE);
 576       }
 577       $contributionTypes = CRM_Contribute_PseudoConstant::financialType();
 578       $title = CRM_Contact_BAO_Contact::displayName($contribution->contact_id) . ' - (' . CRM_Utils_Money::format($contribution->total_amount, $contribution->currency) . ' ' . ' - ' . $contributionTypes[$contribution->financial_type_id] . ')';
 579
 580       $recentOther = array();
 581       if (CRM_Core_Permission::checkActionPermission('CiviContribute', CRM_Core_Action::UPDATE)) {
 582         $recentOther['editUrl'] = CRM_Utils_System::url('civicrm/contact/view/contribution',
 583           "action=update&reset=1&id={$contribution->id}&cid={$contribution->contact_id}&context=home"
 584         );
 585       }
 586
 587       if (CRM_Core_Permission::checkActionPermission('CiviContribute', CRM_Core_Action::DELETE)) {
 588         $recentOther['deleteUrl'] = CRM_Utils_System::url('civicrm/contact/view/contribution',
 589           "action=delete&reset=1&id={$contribution->id}&cid={$contribution->contact_id}&context=home"
 590         );
 591       }
 592
 593       // add the recently created Contribution
 594       CRM_Utils_Recent::add($title,
 595         $url,
 596         $contribution->id,
 597         'Contribution',
 598         $contribution->contact_id,
 599         NULL,
 600         $recentOther
 601       );
 602     }
 603
 604     return $contribution;
 605   }
 606
 607   /**
 608    * Get the values for pseudoconstants for name->value and reverse.
 609    *
 610    * @param array $defaults
 611    *   (reference) the default values, some of which need to be resolved.
 612    * @param bool $reverse
 613    *   True if we want to resolve the values in the reverse direction (value -> name).
 614    */
 615   public static function resolveDefaults(&$defaults, $reverse = FALSE) {
 616     self::lookupValue($defaults, 'financial_type', CRM_Contribute_PseudoConstant::financialType(), $reverse);
 617     self::lookupValue($defaults, 'payment_instrument', CRM_Contribute_PseudoConstant::paymentInstrument(), $reverse);
 618     self::lookupValue($defaults, 'contribution_status', CRM_Contribute_PseudoConstant::contributionStatus(), $reverse);
 619     self::lookupValue($defaults, 'pcp', CRM_Contribute_PseudoConstant::pcPage(), $reverse);
 620   }
 621
 622   /**
 623    * Convert associative array names to values and vice-versa.
 624    *
 625    * This function is used by both the web form layer and the api. Note that
 626    * the api needs the name => value conversion, also the view layer typically
 627    * requires value => name conversion
 628    *
 629    * @param array $defaults
 630    * @param string $property
 631    * @param array $lookup
 632    * @param bool $reverse
 633    *
 634    * @return bool
 635    */
 636   public static function lookupValue(&$defaults, $property, &$lookup, $reverse) {
 637     $id = $property . '_id';
 638
 639     $src = $reverse ? $property : $id;
 640     $dst = $reverse ? $id : $property;
 641
 642     if (!array_key_exists($src, $defaults)) {
 643       return FALSE;
 644     }
 645
 646     $look = $reverse ? array_flip($lookup) : $lookup;
 647
 648     if (is_array($look)) {
 649       if (!array_key_exists($defaults[$src], $look)) {
 650         return FALSE;
 651       }
 652     }
 653     $defaults[$dst] = $look[$defaults[$src]];
 654     return TRUE;
 655   }
 656
 657   /**
 658    * Retrieve DB object based on input parameters.
 659    *
 660    * It also stores all the retrieved values in the default array.
 661    *
 662    * @param array $params
 663    *   (reference ) an assoc array of name/value pairs.
 664    * @param array $defaults
 665    *   (reference ) an assoc array to hold the name / value pairs.
 666    *                        in a hierarchical manner
 667    * @param array $ids
 668    *   (reference) the array that holds all the db ids.
 669    *
 670    * @return CRM_Contribute_BAO_Contribution
 671    */
 672   public static function retrieve(&$params, &$defaults, &$ids) {
 673     $contribution = CRM_Contribute_BAO_Contribution::getValues($params, $defaults, $ids);
 674     return $contribution;
 675   }
 676
 677   /**
 678    * Combine all the importable fields from the lower levels object.
 679    *
 680    * The ordering is important, since currently we do not have a weight
 681    * scheme. Adding weight is super important and should be done in the
 682    * next week or so, before this can be called complete.
 683    *
 684    * @param string $contactType
 685    * @param bool $status
 686    *
 687    * @return array
 688    *   array of importable Fields
 689    */
 690   public static function &importableFields($contactType = 'Individual', $status = TRUE) {
 691     if (!self::$_importableFields) {
 692       if (!self::$_importableFields) {
 693         self::$_importableFields = array();
 694       }
 695
 696       if (!$status) {
 697         $fields = array('' => array('title' => ts('- do not import -')));
 698       }
 699       else {
 700         $fields = array('' => array('title' => ts('- Contribution Fields -')));
 701       }
 702
 703       $note = CRM_Core_DAO_Note::import();
 704       $tmpFields = CRM_Contribute_DAO_Contribution::import();
 705       unset($tmpFields['option_value']);
 706       $optionFields = CRM_Core_OptionValue::getFields($mode = 'contribute');
 707       $contactFields = CRM_Contact_BAO_Contact::importableFields($contactType, NULL);
 708
 709       // Using new Dedupe rule.
 710       $ruleParams = array(
 711         'contact_type' => $contactType,
 712         'used' => 'Unsupervised',
 713       );
 714       $fieldsArray = CRM_Dedupe_BAO_Rule::dedupeRuleFields($ruleParams);
 715       $tmpContactField = array();
 716       if (is_array($fieldsArray)) {
 717         foreach ($fieldsArray as $value) {
 718           //skip if there is no dupe rule
 719           if ($value == 'none') {
 720             continue;
 721           }
 722           $customFieldId = CRM_Core_DAO::getFieldValue('CRM_Core_DAO_CustomField',
 723             $value,
 724             'id',
 725             'column_name'
 726           );
 727           $value = $customFieldId ? 'custom_' . $customFieldId : $value;
 728           $tmpContactField[trim($value)] = $contactFields[trim($value)];
 729           if (!$status) {
 730             $title = $tmpContactField[trim($value)]['title'] . ' ' . ts('(match to contact)');
 731           }
 732           else {
 733             $title = $tmpContactField[trim($value)]['title'];
 734           }
 735           $tmpContactField[trim($value)]['title'] = $title;
 736         }
 737       }
 738
 739       $tmpContactField['external_identifier'] = $contactFields['external_identifier'];
 740       $tmpContactField['external_identifier']['title'] = $contactFields['external_identifier']['title'] . ' ' . ts('(match to contact)');
 741       $tmpFields['contribution_contact_id']['title'] = $tmpFields['contribution_contact_id']['title'] . ' ' . ts('(match to contact)');
 742       $fields = array_merge($fields, $tmpContactField);
 743       $fields = array_merge($fields, $tmpFields);
 744       $fields = array_merge($fields, $note);
 745       $fields = array_merge($fields, $optionFields);
 746       $fields = array_merge($fields, CRM_Financial_DAO_FinancialType::export());
 747       $fields = array_merge($fields, CRM_Core_BAO_CustomField::getFieldsForImport('Contribution'));
 748       self::$_importableFields = $fields;
 749     }
 750     return self::$_importableFields;
 751   }
 752
 753   /**
 754    * Combine all the exportable fields from the lower level objects.
 755    *
 756    * @param bool $checkPermission
 757    *
 758    * @return array
 759    *   array of exportable Fields
 760    */
 761   public static function &exportableFields($checkPermission = TRUE) {
 762     if (!self::$_exportableFields) {
 763       if (!self::$_exportableFields) {
 764         self::$_exportableFields = array();
 765       }
 766
 767       $impFields = CRM_Contribute_DAO_Contribution::export();
 768       $expFieldProduct = CRM_Contribute_DAO_Product::export();
 769       $expFieldsContrib = CRM_Contribute_DAO_ContributionProduct::export();
 770       $typeField = CRM_Financial_DAO_FinancialType::export();
 771       $financialAccount = CRM_Financial_DAO_FinancialAccount::export();
 772       $optionField = CRM_Core_OptionValue::getFields($mode = 'contribute');
 773       $contributionStatus = array(
 774         'contribution_status' => array(
 775           'title' => ts('Contribution Status'),
 776           'name' => 'contribution_status',
 777           'data_type' => CRM_Utils_Type::T_STRING,
 778         ),
 779       );
 780
 781       $contributionPage = array(
 782         'contribution_page' => array(
 783           'title' => ts('Contribution Page'),
 784           'name' => 'contribution_page',
 785           'where' => 'civicrm_contribution_page.title',
 786           'data_type' => CRM_Utils_Type::T_STRING,
 787         ),
 788       );
 789
 790       $contributionNote = array(
 791         'contribution_note' => array(
 792           'title' => ts('Contribution Note'),
 793           'name' => 'contribution_note',
 794           'data_type' => CRM_Utils_Type::T_TEXT,
 795         ),
 796       );
 797
 798       $contributionRecurId = array(
 799         'contribution_recur_id' => array(
 800           'title' => ts('Recurring Contributions ID'),
 801           'name' => 'contribution_recur_id',
 802           'where' => 'civicrm_contribution.contribution_recur_id',
 803           'data_type' => CRM_Utils_Type::T_INT,
 804         ),
 805       );
 806
 807       $extraFields = array(
 808         'contribution_batch' => array(
 809           'title' => ts('Batch Name'),
 810         ),
 811       );
 812
 813       // CRM-17787
 814       $campaignTitle = array(
 815         'contribution_campaign_title' => array(
 816           'title' => ts('Campaign Title'),
 817           'name' => 'campaign_title',
 818           'where' => 'civicrm_campaign.title',
 819           'data_type' => CRM_Utils_Type::T_STRING,
 820         ),
 821       );
 822       $softCreditFields = array(
 823         'contribution_soft_credit_name' => array(
 824           'name' => 'contribution_soft_credit_name',
 825           'title' => 'Soft Credit For',
 826           'where' => 'civicrm_contact_d.display_name',
 827           'data_type' => CRM_Utils_Type::T_STRING,
 828         ),
 829         'contribution_soft_credit_amount' => array(
 830           'name' => 'contribution_soft_credit_amount',
 831           'title' => 'Soft Credit Amount',
 832           'where' => 'civicrm_contribution_soft.amount',
 833           'data_type' => CRM_Utils_Type::T_MONEY,
 834         ),
 835         'contribution_soft_credit_type' => array(
 836           'name' => 'contribution_soft_credit_type',
 837           'title' => 'Soft Credit Type',
 838           'where' => 'contribution_softcredit_type.label',
 839           'data_type' => CRM_Utils_Type::T_STRING,
 840         ),
 841         'contribution_soft_credit_contribution_id' => array(
 842           'name' => 'contribution_soft_credit_contribution_id',
 843           'title' => 'Soft Credit For Contribution ID',
 844           'where' => 'civicrm_contribution_soft.contribution_id',
 845           'data_type' => CRM_Utils_Type::T_INT,
 846         ),
 847         'contribution_soft_credit_contact_id' => array(
 848           'name' => 'contribution_soft_credit_contact_id',
 849           'title' => 'Soft Credit For Contact ID',
 850           'where' => 'civicrm_contact_d.id',
 851           'data_type' => CRM_Utils_Type::T_INT,
 852         ),
 853       );
 854
 855       // CRM-16713 - contribution search by Premiums on 'Find Contribution' form.
 856       $premiums = array(
 857         'contribution_product_id' => array(
 858           'title' => ts('Premium'),
 859           'name' => 'contribution_product_id',
 860           'where' => 'civicrm_product.id',
 861           'data_type' => CRM_Utils_Type::T_INT,
 862         ),
 863       );
 864
 865       $fields = array_merge($impFields, $typeField, $contributionStatus, $contributionPage, $optionField, $expFieldProduct,
 866         $expFieldsContrib, $contributionNote, $contributionRecurId, $extraFields, $softCreditFields, $financialAccount, $premiums, $campaignTitle,
 867         CRM_Core_BAO_CustomField::getFieldsForImport('Contribution', FALSE, FALSE, FALSE, $checkPermission)
 868       );
 869
 870       self::$_exportableFields = $fields;
 871     }
 872
 873     return self::$_exportableFields;
 874   }
 875
 876   /**
 877    * @param null $status
 878    * @param null $startDate
 879    * @param null $endDate
 880    *
 881    * @return array|null
 882    */
 883   public static function getTotalAmountAndCount($status = NULL, $startDate = NULL, $endDate = NULL) {
 884     $where = array();
 885     switch ($status) {
 886       case 'Valid':
 887         $where[] = 'contribution_status_id = 1';
 888         break;
 889
 890       case 'Cancelled':
 891         $where[] = 'contribution_status_id = 3';
 892         break;
 893     }
 894
 895     if ($startDate) {
 896       $where[] = "receive_date >= '" . CRM_Utils_Type::escape($startDate, 'Timestamp') . "'";
 897     }
 898     if ($endDate) {
 899       $where[] = "receive_date <= '" . CRM_Utils_Type::escape($endDate, 'Timestamp') . "'";
 900     }
 901     CRM_Financial_BAO_FinancialType::getAvailableFinancialTypes($financialTypes);
 902     if ($financialTypes) {
 903       $where[] = "c.financial_type_id IN (" . implode(',', array_keys($financialTypes)) . ")";
 904       $where[] = "i.financial_type_id IN (" . implode(',', array_keys($financialTypes)) . ")";
 905     }
 906     else {
 907       $where[] = "c.financial_type_id IN (0)";
 908     }
 909
 910     $whereCond = implode(' AND ', $where);
 911
 912     $query = "
 913     SELECT  sum( total_amount ) as total_amount,
 914             count( c.id ) as total_count,
 915             currency
 916       FROM  civicrm_contribution c
 917 INNER JOIN  civicrm_contact contact ON ( contact.id = c.contact_id )
 918 LEFT JOIN  civicrm_line_item i ON ( i.contribution_id = c.id AND i.entity_table = 'civicrm_contribution' )
 919      WHERE  $whereCond
 920        AND  ( is_test = 0 OR is_test IS NULL )
 921        AND  contact.is_deleted = 0
 922   GROUP BY  currency
 923 ";
 924
 925     $dao = CRM_Core_DAO::executeQuery($query);
 926     $amount = array();
 927     $count = 0;
 928     while ($dao->fetch()) {
 929       $count += $dao->total_count;
 930       $amount[] = CRM_Utils_Money::format($dao->total_amount, $dao->currency);
 931     }
 932     if ($count) {
 933       return array(
 934         'amount' => implode(', ', $amount),
 935         'count' => $count,
 936       );
 937     }
 938     return NULL;
 939   }
 940
 941   /**
 942    * Delete the indirect records associated with this contribution first.
 943    *
 944    * @param int $id
 945    *
 946    * @return mixed|null
 947    *   $results no of deleted Contribution on success, false otherwise
 948    */
 949   public static function deleteContribution($id) {
 950     CRM_Utils_Hook::pre('delete', 'Contribution', $id, CRM_Core_DAO::$_nullArray);
 951
 952     $transaction = new CRM_Core_Transaction();
 953
 954     $results = NULL;
 955     //delete activity record
 956     $params = array(
 957       'source_record_id' => $id,
 958       // activity type id for contribution
 959       'activity_type_id' => 6,
 960     );
 961
 962     CRM_Activity_BAO_Activity::deleteActivity($params);
 963
 964     //delete billing address if exists for this contribution.
 965     self::deleteAddress($id);
 966
 967     //update pledge and pledge payment, CRM-3961
 968     CRM_Pledge_BAO_PledgePayment::resetPledgePayment($id);
 969
 970     // remove entry from civicrm_price_set_entity, CRM-5095
 971     if (CRM_Price_BAO_PriceSet::getFor('civicrm_contribution', $id)) {
 972       CRM_Price_BAO_PriceSet::removeFrom('civicrm_contribution', $id);
 973     }
 974     // cleanup line items.
 975     $participantId = CRM_Core_DAO::getFieldValue('CRM_Event_DAO_ParticipantPayment', $id, 'participant_id', 'contribution_id');
 976
 977     // delete any related entity_financial_trxn, financial_trxn and financial_item records.
 978     CRM_Core_BAO_FinancialTrxn::deleteFinancialTrxn($id);
 979
 980     if ($participantId) {
 981       CRM_Price_BAO_LineItem::deleteLineItems($participantId, 'civicrm_participant');
 982     }
 983     else {
 984       CRM_Price_BAO_LineItem::deleteLineItems($id, 'civicrm_contribution');
 985     }
 986
 987     //delete note.
 988     $note = CRM_Core_BAO_Note::getNote($id, 'civicrm_contribution');
 989     $noteId = key($note);
 990     if ($noteId) {
 991       CRM_Core_BAO_Note::del($noteId, FALSE);
 992     }
 993
 994     $dao = new CRM_Contribute_DAO_Contribution();
 995     $dao->id = $id;
 996
 997     $results = $dao->delete();
 998
 999     $transaction->commit();
1000
1001     CRM_Utils_Hook::post('delete', 'Contribution', $dao->id, $dao);
1002
1003     // delete the recently created Contribution
1004     $contributionRecent = array(
1005       'id' => $id,
1006       'type' => 'Contribution',
1007     );
1008     CRM_Utils_Recent::del($contributionRecent);
1009
1010     return $results;
1011   }
1012
1013   /**
1014    * React to a financial transaction (payment) failure.
1015    *
1016    * Prior to CRM-16417 these were simply removed from the database but it has been agreed that seeing attempted
1017    * payments is important for forensic and outreach reasons.
1018    *
1019    * @param int $contributionID
1020    * @param int $contactID
1021    * @param string $message
1022    *
1023    * @throws \CiviCRM_API3_Exception
1024    */
1025   public static function failPayment($contributionID, $contactID, $message) {
1026     civicrm_api3('activity', 'create', array(
1027       'activity_type_id' => 'Failed Payment',
1028       'details' => $message,
1029       'subject' => ts('Payment failed at payment processor'),
1030       'source_record_id' => $contributionID,
1031       'source_contact_id' => CRM_Core_Session::getLoggedInContactID() ? CRM_Core_Session::getLoggedInContactID() :
1032         $contactID,
1033     ));
1034   }
1035
1036   /**
1037    * Check if there is a contribution with the same trxn_id or invoice_id.
1038    *
1039    * @param array $input
1040    *   An assoc array of name/value pairs.
1041    * @param array $duplicates
1042    *   (reference) store ids of duplicate contribs.
1043    * @param int $id
1044    *
1045    * @return bool
1046    *   true if duplicate, false otherwise
1047    */
1048   public static function checkDuplicate($input, &$duplicates, $id = NULL) {
1049     if (!$id) {
1050       $id = CRM_Utils_Array::value('id', $input);
1051     }
1052     $trxn_id = CRM_Utils_Array::value('trxn_id', $input);
1053     $invoice_id = CRM_Utils_Array::value('invoice_id', $input);
1054
1055     $clause = array();
1056     $input = array();
1057
1058     if ($trxn_id) {
1059       $clause[] = "trxn_id = %1";
1060       $input[1] = array($trxn_id, 'String');
1061     }
1062
1063     if ($invoice_id) {
1064       $clause[] = "invoice_id = %2";
1065       $input[2] = array($invoice_id, 'String');
1066     }
1067
1068     if (empty($clause)) {
1069       return FALSE;
1070     }
1071
1072     $clause = implode(' OR ', $clause);
1073     if ($id) {
1074       $clause = "( $clause ) AND id != %3";
1075       $input[3] = array($id, 'Integer');
1076     }
1077
1078     $query = "SELECT id FROM civicrm_contribution WHERE $clause";
1079     $dao = CRM_Core_DAO::executeQuery($query, $input);
1080     $result = FALSE;
1081     while ($dao->fetch()) {
1082       $duplicates[] = $dao->id;
1083       $result = TRUE;
1084     }
1085     return $result;
1086   }
1087
1088   /**
1089    * Takes an associative array and creates a contribution_product object.
1090    *
1091    * the function extract all the params it needs to initialize the create a
1092    * contribution_product object. the params array could contain additional unused name/value
1093    * pairs
1094    *
1095    * @param array $params
1096    *   (reference) an assoc array of name/value pairs.
1097    *
1098    * @return CRM_Contribute_DAO_ContributionProduct
1099    */
1100   public static function addPremium(&$params) {
1101     $contributionProduct = new CRM_Contribute_DAO_ContributionProduct();
1102     $contributionProduct->copyValues($params);
1103     return $contributionProduct->save();
1104   }
1105
1106   /**
1107    * Get list of contribution fields for profile.
1108    * For now we only allow custom contribution fields to be in
1109    * profile
1110    *
1111    * @param bool $addExtraFields
1112    *   True if special fields needs to be added.
1113    *
1114    * @return array
1115    *   the list of contribution fields
1116    */
1117   public static function getContributionFields($addExtraFields = TRUE) {
1118     $contributionFields = CRM_Contribute_DAO_Contribution::export();
1119     $contributionFields = array_merge($contributionFields, CRM_Core_OptionValue::getFields($mode = 'contribute'));
1120
1121     if ($addExtraFields) {
1122       $contributionFields = array_merge($contributionFields, self::getSpecialContributionFields());
1123     }
1124
1125     $contributionFields = array_merge($contributionFields, CRM_Financial_DAO_FinancialType::export());
1126
1127     foreach ($contributionFields as $key => $var) {
1128       if ($key == 'contribution_contact_id') {
1129         continue;
1130       }
1131       elseif ($key == 'contribution_campaign_id') {
1132         $var['title'] = ts('Campaign');
1133       }
1134       $fields[$key] = $var;
1135     }
1136
1137     $fields = array_merge($fields, CRM_Core_BAO_CustomField::getFieldsForImport('Contribution'));
1138     return $fields;
1139   }
1140
1141   /**
1142    * Add extra fields specific to contribution.
1143    */
1144   public static function getSpecialContributionFields() {
1145     $extraFields = array(
1146       'contribution_soft_credit_name' => array(
1147         'name' => 'contribution_soft_credit_name',
1148         'title' => 'Soft Credit Name',
1149         'headerPattern' => '/^soft_credit_name$/i',
1150         'where' => 'civicrm_contact_d.display_name',
1151       ),
1152       'contribution_soft_credit_email' => array(
1153         'name' => 'contribution_soft_credit_email',
1154         'title' => 'Soft Credit Email',
1155         'headerPattern' => '/^soft_credit_email$/i',
1156         'where' => 'soft_email.email',
1157       ),
1158       'contribution_soft_credit_phone' => array(
1159         'name' => 'contribution_soft_credit_phone',
1160         'title' => 'Soft Credit Phone',
1161         'headerPattern' => '/^soft_credit_phone$/i',
1162         'where' => 'soft_phone.phone',
1163       ),
1164       'contribution_soft_credit_contact_id' => array(
1165         'name' => 'contribution_soft_credit_contact_id',
1166         'title' => 'Soft Credit Contact ID',
1167         'headerPattern' => '/^soft_credit_contact_id$/i',
1168         'where' => 'civicrm_contribution_soft.contact_id',
1169       ),
1170       'contribution_pcp_title' => array(
1171         'name' => 'contribution_pcp_title',
1172         'title' => 'Personal Campaign Page Title',
1173         'headerPattern' => '/^contribution_pcp_title$/i',
1174         'where' => 'contribution_pcp.title',
1175       ),
1176     );
1177
1178     return $extraFields;
1179   }
1180
1181   /**
1182    * @param int $pageID
1183    *
1184    * @return array
1185    */
1186   public static function getCurrentandGoalAmount($pageID) {
1187     $query = "
1188 SELECT p.goal_amount as goal, sum( c.total_amount ) as total
1189   FROM civicrm_contribution_page p,
1190        civicrm_contribution      c
1191  WHERE p.id = c.contribution_page_id
1192    AND p.id = %1
1193    AND c.cancel_date is null
1194 GROUP BY p.id
1195 ";
1196
1197     $config = CRM_Core_Config::singleton();
1198     $params = array(1 => array($pageID, 'Integer'));
1199     $dao = CRM_Core_DAO::executeQuery($query, $params);
1200
1201     if ($dao->fetch()) {
1202       return array($dao->goal, $dao->total);
1203     }
1204     else {
1205       return array(NULL, NULL);
1206     }
1207   }
1208
1209   /**
1210    * Get list of contribution In Honor of contact Ids.
1211    *
1212    * @param int $honorId
1213    *   In Honor of Contact ID.
1214    *
1215    * @return array
1216    *   list of contribution fields
1217    */
1218   public static function getHonorContacts($honorId) {
1219     $params = array();
1220     $honorDAO = new CRM_Contribute_DAO_ContributionSoft();
1221     $honorDAO->contact_id = $honorId;
1222     $honorDAO->find();
1223
1224     $type = CRM_Contribute_PseudoConstant::financialType();
1225
1226     while ($honorDAO->fetch()) {
1227       $contributionDAO = new CRM_Contribute_DAO_Contribution();
1228       $contributionDAO->id = $honorDAO->contribution_id;
1229
1230       if ($contributionDAO->find(TRUE)) {
1231         $params[$contributionDAO->id]['honor_type'] = CRM_Core_PseudoConstant::getLabel('CRM_Contribute_BAO_ContributionSoft', 'soft_credit_type_id', $honorDAO->soft_credit_type_id);
1232         $params[$contributionDAO->id]['honorId'] = $contributionDAO->contact_id;
1233         $params[$contributionDAO->id]['display_name'] = CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Contact', $contributionDAO->contact_id, 'display_name');
1234         $params[$contributionDAO->id]['type'] = $type[$contributionDAO->financial_type_id];
1235         $params[$contributionDAO->id]['type_id'] = $contributionDAO->financial_type_id;
1236         $params[$contributionDAO->id]['amount'] = CRM_Utils_Money::format($contributionDAO->total_amount, $contributionDAO->currency);
1237         $params[$contributionDAO->id]['source'] = $contributionDAO->source;
1238         $params[$contributionDAO->id]['receive_date'] = $contributionDAO->receive_date;
1239         $params[$contributionDAO->id]['contribution_status'] = CRM_Contribute_PseudoConstant::contributionStatus($contributionDAO->contribution_status_id);
1240       }
1241     }
1242
1243     return $params;
1244   }
1245
1246   /**
1247    * Get the sort name of a contact for a particular contribution.
1248    *
1249    * @param int $id
1250    *   Id of the contribution.
1251    *
1252    * @return null|string
1253    *   sort name of the contact if found
1254    */
1255   public static function sortName($id) {
1256     $id = CRM_Utils_Type::escape($id, 'Integer');
1257
1258     $query = "
1259 SELECT civicrm_contact.sort_name
1260 FROM   civicrm_contribution, civicrm_contact
1261 WHERE  civicrm_contribution.contact_id = civicrm_contact.id
1262   AND  civicrm_contribution.id = {$id}
1263 ";
1264     return CRM_Core_DAO::singleValueQuery($query);
1265   }
1266
1267   /**
1268    * @param int $contactID
1269    *
1270    * @return array
1271    */
1272   public static function annual($contactID) {
1273     if (is_array($contactID)) {
1274       $contactIDs = implode(',', $contactID);
1275     }
1276     else {
1277       $contactIDs = $contactID;
1278     }
1279
1280     $config = CRM_Core_Config::singleton();
1281     $startDate = $endDate = NULL;
1282
1283     $currentMonth = date('m');
1284     $currentDay = date('d');
1285     if ((int ) $config->fiscalYearStart['M'] > $currentMonth ||
1286       ((int ) $config->fiscalYearStart['M'] == $currentMonth &&
1287         (int ) $config->fiscalYearStart['d'] > $currentDay
1288       )
1289     ) {
1290       $year = date('Y') - 1;
1291     }
1292     else {
1293       $year = date('Y');
1294     }
1295     $nextYear = $year + 1;
1296
1297     if ($config->fiscalYearStart) {
1298       $newFiscalYearStart = $config->fiscalYearStart;
1299       if ($newFiscalYearStart['M'] < 10) {
1300         $newFiscalYearStart['M'] = '0' . $newFiscalYearStart['M'];
1301       }
1302       if ($newFiscalYearStart['d'] < 10) {
1303         $newFiscalYearStart['d'] = '0' . $newFiscalYearStart['d'];
1304       }
1305       $config->fiscalYearStart = $newFiscalYearStart;
1306       $monthDay = $config->fiscalYearStart['M'] . $config->fiscalYearStart['d'];
1307     }
1308     else {
1309       $monthDay = '0101';
1310     }
1311     $startDate = "$year$monthDay";
1312     $endDate = "$nextYear$monthDay";
1313     CRM_Financial_BAO_FinancialType::getAvailableFinancialTypes($financialTypes);
1314     $additionalWhere = " AND b.financial_type_id IN (0)";
1315     $liWhere = " AND i.financial_type_id IN (0)";
1316     if (!empty($financialTypes)) {
1317       $additionalWhere = " AND b.financial_type_id IN (" . implode(',', array_keys($financialTypes)) . ") AND i.id IS NULL";
1318       $liWhere = " AND i.financial_type_id NOT IN (" . implode(',', array_keys($financialTypes)) . ")";
1319     }
1320     $query = "
1321       SELECT count(*) as count,
1322              sum(total_amount) as amount,
1323              avg(total_amount) as average,
1324              currency
1325         FROM civicrm_contribution b
1326         LEFT JOIN civicrm_line_item i ON i.contribution_id = b.id AND i.entity_table = 'civicrm_contribution' $liWhere
1327        WHERE b.contact_id IN ( $contactIDs )
1328          AND b.contribution_status_id = 1
1329          AND b.is_test = 0
1330          AND b.receive_date >= $startDate
1331          AND b.receive_date <  $endDate
1332       $additionalWhere
1333       GROUP BY currency
1334       ";
1335     $dao = CRM_Core_DAO::executeQuery($query, CRM_Core_DAO::$_nullArray);
1336     $count = 0;
1337     $amount = $average = array();
1338     while ($dao->fetch()) {
1339       if ($dao->count > 0 && $dao->amount > 0) {
1340         $count += $dao->count;
1341         $amount[] = CRM_Utils_Money::format($dao->amount, $dao->currency);
1342         $average[] = CRM_Utils_Money::format($dao->average, $dao->currency);
1343       }
1344     }
1345     if ($count > 0) {
1346       return array(
1347         $count,
1348         implode(',&nbsp;', $amount),
1349         implode(',&nbsp;', $average),
1350       );
1351     }
1352     return array(0, 0, 0);
1353   }
1354
1355   /**
1356    * Check if there is a contribution with the params passed in.
1357    *
1358    * Used for trxn_id,invoice_id and contribution_id
1359    *
1360    * @param array $params
1361    *   An assoc array of name/value pairs.
1362    *
1363    * @return array
1364    *   contribution id if success else NULL
1365    */
1366   public static function checkDuplicateIds($params) {
1367     $dao = new CRM_Contribute_DAO_Contribution();
1368
1369     $clause = array();
1370     $input = array();
1371     foreach ($params as $k => $v) {
1372       if ($v) {
1373         $clause[] = "$k = '$v'";
1374       }
1375     }
1376     $clause = implode(' AND ', $clause);
1377     $query = "SELECT id FROM civicrm_contribution WHERE $clause";
1378     $dao = CRM_Core_DAO::executeQuery($query, $input);
1379
1380     while ($dao->fetch()) {
1381       $result = $dao->id;
1382       return $result;
1383     }
1384     return NULL;
1385   }
1386
1387   /**
1388    * Get the contribution details for component export.
1389    *
1390    * @param int $exportMode
1391    *   Export mode.
1392    * @param string $componentIds
1393    *   Component ids.
1394    *
1395    * @return array
1396    *   associated array
1397    */
1398   public static function getContributionDetails($exportMode, $componentIds) {
1399     $paymentDetails = array();
1400     $componentClause = ' IN ( ' . implode(',', $componentIds) . ' ) ';
1401
1402     if ($exportMode == CRM_Export_Form_Select::EVENT_EXPORT) {
1403       $componentSelect = " civicrm_participant_payment.participant_id id";
1404       $additionalClause = "
1405 INNER JOIN civicrm_participant_payment ON (civicrm_contribution.id = civicrm_participant_payment.contribution_id
1406 AND civicrm_participant_payment.participant_id {$componentClause} )
1407 ";
1408     }
1409     elseif ($exportMode == CRM_Export_Form_Select::MEMBER_EXPORT) {
1410       $componentSelect = " civicrm_membership_payment.membership_id id";
1411       $additionalClause = "
1412 INNER JOIN civicrm_membership_payment ON (civicrm_contribution.id = civicrm_membership_payment.contribution_id
1413 AND civicrm_membership_payment.membership_id {$componentClause} )
1414 ";
1415     }
1416     elseif ($exportMode == CRM_Export_Form_Select::PLEDGE_EXPORT) {
1417       $componentSelect = " civicrm_pledge_payment.id id";
1418       $additionalClause = "
1419 INNER JOIN civicrm_pledge_payment ON (civicrm_contribution.id = civicrm_pledge_payment.contribution_id
1420 AND civicrm_pledge_payment.pledge_id {$componentClause} )
1421 ";
1422     }
1423
1424     $query = " SELECT total_amount, contribution_status.name as status_id, contribution_status.label as status, payment_instrument.name as payment_instrument, receive_date,
1425                           trxn_id, {$componentSelect}
1426 FROM civicrm_contribution
1427 LEFT JOIN civicrm_option_group option_group_payment_instrument ON ( option_group_payment_instrument.name = 'payment_instrument')
1428 LEFT JOIN civicrm_option_value payment_instrument ON (civicrm_contribution.payment_instrument_id = payment_instrument.value
1429      AND option_group_payment_instrument.id = payment_instrument.option_group_id )
1430 LEFT JOIN civicrm_option_group option_group_contribution_status ON (option_group_contribution_status.name = 'contribution_status')
1431 LEFT JOIN civicrm_option_value contribution_status ON (civicrm_contribution.contribution_status_id = contribution_status.value
1432                                AND option_group_contribution_status.id = contribution_status.option_group_id )
1433 {$additionalClause}
1434 ";
1435
1436     $dao = CRM_Core_DAO::executeQuery($query);
1437
1438     while ($dao->fetch()) {
1439       $paymentDetails[$dao->id] = array(
1440         'total_amount' => $dao->total_amount,
1441         'contribution_status' => $dao->status,
1442         'receive_date' => $dao->receive_date,
1443         'pay_instru' => $dao->payment_instrument,
1444         'trxn_id' => $dao->trxn_id,
1445       );
1446     }
1447
1448     return $paymentDetails;
1449   }
1450
1451   /**
1452    * Create address associated with contribution record.
1453    *
1454    * As long as there is one or more billing field in the parameters we will create the address.
1455    *
1456    * (historically the decision to create or not was based on the payment 'type' but these lines are greyer than once
1457    * thought).
1458    *
1459    * @param array $params
1460    * @param int $billingLocationTypeID
1461    *
1462    * @return int
1463    *   address id
1464    */
1465   public static function createAddress($params, $billingLocationTypeID) {
1466     list($hasBillingField, $addressParams) = self::getBillingAddressParams($params, $billingLocationTypeID);
1467     if ($hasBillingField) {
1468       $address = CRM_Core_BAO_Address::add($addressParams, FALSE);
1469       return $address->id;
1470     }
1471     return NULL;
1472
1473   }
1474
1475   /**
1476    * Delete billing address record related contribution.
1477    *
1478    * @param int $contributionId
1479    * @param int $contactId
1480    */
1481   public static function deleteAddress($contributionId = NULL, $contactId = NULL) {
1482     $clauses = array();
1483     $contactJoin = NULL;
1484
1485     if ($contributionId) {
1486       $clauses[] = "cc.id = {$contributionId}";
1487     }
1488
1489     if ($contactId) {
1490       $clauses[] = "cco.id = {$contactId}";
1491       $contactJoin = "INNER JOIN civicrm_contact cco ON cc.contact_id = cco.id";
1492     }
1493
1494     if (empty($clauses)) {
1495       CRM_Core_Error::fatal();
1496     }
1497
1498     $condition = implode(' OR ', $clauses);
1499
1500     $query = "
1501 SELECT     ca.id
1502 FROM       civicrm_address ca
1503 INNER JOIN civicrm_contribution cc ON cc.address_id = ca.id
1504            $contactJoin
1505 WHERE      $condition
1506 ";
1507     $dao = CRM_Core_DAO::executeQuery($query);
1508
1509     while ($dao->fetch()) {
1510       $params = array('id' => $dao->id);
1511       CRM_Core_BAO_Block::blockDelete('Address', $params);
1512     }
1513   }
1514
1515   /**
1516    * This function check online pending contribution associated w/
1517    * Online Event Registration or Online Membership signup.
1518    *
1519    * @param int $componentId
1520    *   Participant/membership id.
1521    * @param string $componentName
1522    *   Event/Membership.
1523    *
1524    * @return int
1525    *   pending contribution id.
1526    */
1527   public static function checkOnlinePendingContribution($componentId, $componentName) {
1528     $contributionId = NULL;
1529     if (!$componentId ||
1530       !in_array($componentName, array('Event', 'Membership'))
1531     ) {
1532       return $contributionId;
1533     }
1534
1535     if ($componentName == 'Event') {
1536       $idName = 'participant_id';
1537       $componentTable = 'civicrm_participant';
1538       $paymentTable = 'civicrm_participant_payment';
1539       $source = ts('Online Event Registration');
1540     }
1541
1542     if ($componentName == 'Membership') {
1543       $idName = 'membership_id';
1544       $componentTable = 'civicrm_membership';
1545       $paymentTable = 'civicrm_membership_payment';
1546       $source = ts('Online Contribution');
1547     }
1548
1549     $pendingStatusId = array_search('Pending', CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name'));
1550
1551     $query = "
1552    SELECT  component.id as {$idName},
1553            componentPayment.contribution_id as contribution_id,
1554            contribution.source source,
1555            contribution.contribution_status_id as contribution_status_id,
1556            contribution.is_pay_later as is_pay_later
1557      FROM  $componentTable component
1558 LEFT JOIN  $paymentTable componentPayment    ON ( componentPayment.{$idName} = component.id )
1559 LEFT JOIN  civicrm_contribution contribution ON ( componentPayment.contribution_id = contribution.id )
1560     WHERE  component.id = {$componentId}";
1561
1562     $dao = CRM_Core_DAO::executeQuery($query);
1563
1564     while ($dao->fetch()) {
1565       if ($dao->contribution_id &&
1566         $dao->is_pay_later &&
1567         $dao->contribution_status_id == $pendingStatusId &&
1568         strpos($dao->source, $source) !== FALSE
1569       ) {
1570         $contributionId = $dao->contribution_id;
1571         $dao->free();
1572       }
1573     }
1574
1575     return $contributionId;
1576   }
1577
1578   /**
1579    * Update contribution as well as related objects.
1580    *
1581    * This function by-passes hooks - to address this - don't use this function.
1582    *
1583    * @deprecated
1584    *
1585    * Use api contribute.completetransaction
1586    * For failures use failPayment (preferably exposing by api in the process).
1587    *
1588    * @param array $params
1589    * @param bool $processContributionObject
1590    *
1591    * @return array
1592    * @throws \Exception
1593    */
1594   public static function transitionComponents($params, $processContributionObject = FALSE) {
1595     // get minimum required values.
1596     $contactId = CRM_Utils_Array::value('contact_id', $params);
1597     $componentId = CRM_Utils_Array::value('component_id', $params);
1598     $componentName = CRM_Utils_Array::value('componentName', $params);
1599     $contributionId = CRM_Utils_Array::value('contribution_id', $params);
1600     $contributionStatusId = CRM_Utils_Array::value('contribution_status_id', $params);
1601
1602     // if we already processed contribution object pass previous status id.
1603     $previousContriStatusId = CRM_Utils_Array::value('previous_contribution_status_id', $params);
1604
1605     $updateResult = array();
1606
1607     $contributionStatuses = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
1608
1609     // we process only ( Completed, Cancelled, or Failed ) contributions.
1610     if (!$contributionId ||
1611       !in_array($contributionStatusId, array(
1612         array_search('Completed', $contributionStatuses),
1613         array_search('Cancelled', $contributionStatuses),
1614         array_search('Failed', $contributionStatuses),
1615       ))
1616     ) {
1617       return $updateResult;
1618     }
1619
1620     if (!$componentName || !$componentId) {
1621       // get the related component details.
1622       $componentDetails = self::getComponentDetails($contributionId);
1623     }
1624     else {
1625       $componentDetails['contact_id'] = $contactId;
1626       $componentDetails['component'] = $componentName;
1627
1628       if ($componentName == 'event') {
1629         $componentDetails['participant'] = $componentId;
1630       }
1631       else {
1632         $componentDetails['membership'] = $componentId;
1633       }
1634     }
1635
1636     if (!empty($componentDetails['contact_id'])) {
1637       $componentDetails['contact_id'] = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution',
1638         $contributionId,
1639         'contact_id'
1640       );
1641     }
1642
1643     // do check for required ids.
1644     if (empty($componentDetails['membership']) && empty($componentDetails['participant']) && empty($componentDetails['pledge_payment']) || empty($componentDetails['contact_id'])) {
1645       return $updateResult;
1646     }
1647
1648     //now we are ready w/ required ids, start processing.
1649
1650     $baseIPN = new CRM_Core_Payment_BaseIPN();
1651
1652     $input = $ids = $objects = array();
1653
1654     $input['component'] = CRM_Utils_Array::value('component', $componentDetails);
1655     $ids['contribution'] = $contributionId;
1656     $ids['contact'] = CRM_Utils_Array::value('contact_id', $componentDetails);
1657     $ids['membership'] = CRM_Utils_Array::value('membership', $componentDetails);
1658     $ids['participant'] = CRM_Utils_Array::value('participant', $componentDetails);
1659     $ids['event'] = CRM_Utils_Array::value('event', $componentDetails);
1660     $ids['pledge_payment'] = CRM_Utils_Array::value('pledge_payment', $componentDetails);
1661     $ids['contributionRecur'] = NULL;
1662     $ids['contributionPage'] = NULL;
1663
1664     if (!$baseIPN->validateData($input, $ids, $objects, FALSE)) {
1665       CRM_Core_Error::fatal();
1666     }
1667
1668     $memberships = &$objects['membership'];
1669     $participant = &$objects['participant'];
1670     $pledgePayment = &$objects['pledge_payment'];
1671     $contribution = &$objects['contribution'];
1672
1673     if ($pledgePayment) {
1674       $pledgePaymentIDs = array();
1675       foreach ($pledgePayment as $key => $object) {
1676         $pledgePaymentIDs[] = $object->id;
1677       }
1678       $pledgeID = $pledgePayment[0]->pledge_id;
1679     }
1680
1681     $membershipStatuses = CRM_Member_PseudoConstant::membershipStatus();
1682
1683     if ($participant) {
1684       $participantStatuses = CRM_Event_PseudoConstant::participantStatus();
1685       $oldStatus = CRM_Core_DAO::getFieldValue('CRM_Event_DAO_Participant',
1686         $participant->id,
1687         'status_id'
1688       );
1689     }
1690     // we might want to process contribution object.
1691     $processContribution = FALSE;
1692     if ($contributionStatusId == array_search('Cancelled', $contributionStatuses)) {
1693       if (is_array($memberships)) {
1694         foreach ($memberships as $membership) {
1695           if ($membership) {
1696             $membership->status_id = array_search('Cancelled', $membershipStatuses);
1697             $membership->save();
1698
1699             $updateResult['updatedComponents']['CiviMember'] = $membership->status_id;
1700             if ($processContributionObject) {
1701               $processContribution = TRUE;
1702             }
1703           }
1704         }
1705       }
1706
1707       if ($participant) {
1708         $updatedStatusId = array_search('Cancelled', $participantStatuses);
1709         CRM_Event_BAO_Participant::updateParticipantStatus($participant->id, $oldStatus, $updatedStatusId, TRUE);
1710
1711         $updateResult['updatedComponents']['CiviEvent'] = $updatedStatusId;
1712         if ($processContributionObject) {
1713           $processContribution = TRUE;
1714         }
1715       }
1716
1717       if ($pledgePayment) {
1718         CRM_Pledge_BAO_PledgePayment::updatePledgePaymentStatus($pledgeID, $pledgePaymentIDs, $contributionStatusId);
1719
1720         $updateResult['updatedComponents']['CiviPledge'] = $contributionStatusId;
1721         if ($processContributionObject) {
1722           $processContribution = TRUE;
1723         }
1724       }
1725     }
1726     elseif ($contributionStatusId == array_search('Failed', $contributionStatuses)) {
1727       if (is_array($memberships)) {
1728         foreach ($memberships as $membership) {
1729           if ($membership) {
1730             $membership->status_id = array_search('Expired', $membershipStatuses);
1731             $membership->save();
1732
1733             $updateResult['updatedComponents']['CiviMember'] = $membership->status_id;
1734             if ($processContributionObject) {
1735               $processContribution = TRUE;
1736             }
1737           }
1738         }
1739       }
1740       if ($participant) {
1741         $updatedStatusId = array_search('Cancelled', $participantStatuses);
1742         CRM_Event_BAO_Participant::updateParticipantStatus($participant->id, $oldStatus, $updatedStatusId, TRUE);
1743
1744         $updateResult['updatedComponents']['CiviEvent'] = $updatedStatusId;
1745         if ($processContributionObject) {
1746           $processContribution = TRUE;
1747         }
1748       }
1749
1750       if ($pledgePayment) {
1751         CRM_Pledge_BAO_PledgePayment::updatePledgePaymentStatus($pledgeID, $pledgePaymentIDs, $contributionStatusId);
1752
1753         $updateResult['updatedComponents']['CiviPledge'] = $contributionStatusId;
1754         if ($processContributionObject) {
1755           $processContribution = TRUE;
1756         }
1757       }
1758     }
1759     elseif ($contributionStatusId == array_search('Completed', $contributionStatuses)) {
1760
1761       // only pending contribution related object processed.
1762       if ($previousContriStatusId &&
1763         ($previousContriStatusId != array_search('Pending', $contributionStatuses))
1764       ) {
1765         // this is case when we already processed contribution object.
1766         return $updateResult;
1767       }
1768       elseif (!$previousContriStatusId &&
1769         $contribution->contribution_status_id != array_search('Pending', $contributionStatuses)
1770       ) {
1771         // this is case when we are going to process contribution object later.
1772         return $updateResult;
1773       }
1774
1775       if (is_array($memberships)) {
1776         foreach ($memberships as $membership) {
1777           if ($membership) {
1778             $format = '%Y%m%d';
1779
1780             //CRM-4523
1781             $currentMembership = CRM_Member_BAO_Membership::getContactMembership($membership->contact_id,
1782               $membership->membership_type_id,
1783               $membership->is_test, $membership->id
1784             );
1785
1786             // CRM-8141 update the membership type with the value recorded in log when membership created/renewed
1787             // this picks up membership type changes during renewals
1788             $sql = "
1789               SELECT    membership_type_id
1790               FROM      civicrm_membership_log
1791               WHERE     membership_id=$membership->id
1792               ORDER BY  id DESC
1793               LIMIT     1;";
1794             $dao = new CRM_Core_DAO();
1795             $dao->query($sql);
1796             if ($dao->fetch()) {
1797               if (!empty($dao->membership_type_id)) {
1798                 $membership->membership_type_id = $dao->membership_type_id;
1799                 $membership->save();
1800               }
1801             }
1802             // else fall back to using current membership type
1803             $dao->free();
1804
1805             // Figure out number of terms
1806             $numterms = 1;
1807             $lineitems = CRM_Price_BAO_LineItem::getLineItems($contributionId, 'contribution');
1808             foreach ($lineitems as $lineitem) {
1809               if ($membership->membership_type_id == CRM_Utils_Array::value('membership_type_id', $lineitem)) {
1810                 $numterms = CRM_Utils_Array::value('membership_num_terms', $lineitem);
1811
1812                 // in case membership_num_terms comes through as null or zero
1813                 $numterms = $numterms >= 1 ? $numterms : 1;
1814                 break;
1815               }
1816             }
1817
1818             // CRM-15735-to update the membership status as per the contribution receive date
1819             $joinDate = NULL;
1820             if (!empty($params['receive_date'])) {
1821               $joinDate = $params['receive_date'];
1822               $status = CRM_Member_BAO_MembershipStatus::getMembershipStatusByDate($membership->start_date,
1823                 $membership->end_date,
1824                 $membership->join_date,
1825                 $params['receive_date'],
1826                 FALSE,
1827                 $membership->membership_type_id,
1828                 (array) $membership
1829               );
1830               $membership->status_id = CRM_Utils_Array::value('id', $status, $membership->status_id);
1831               $membership->save();
1832             }
1833
1834             if ($currentMembership) {
1835               CRM_Member_BAO_Membership::fixMembershipStatusBeforeRenew($currentMembership, NULL);
1836               $dates = CRM_Member_BAO_MembershipType::getRenewalDatesForMembershipType($membership->id, NULL, NULL, $numterms);
1837               $dates['join_date'] = CRM_Utils_Date::customFormat($currentMembership['join_date'], $format);
1838             }
1839             else {
1840               $dates = CRM_Member_BAO_MembershipType::getDatesForMembershipType($membership->membership_type_id, $joinDate, NULL, NULL, $numterms);
1841             }
1842
1843             //get the status for membership.
1844             $calcStatus = CRM_Member_BAO_MembershipStatus::getMembershipStatusByDate($dates['start_date'],
1845               $dates['end_date'],
1846               $dates['join_date'],
1847               'today',
1848               TRUE,
1849               $membership->membership_type_id,
1850               (array) $membership
1851             );
1852
1853             $formattedParams = array(
1854               'status_id' => CRM_Utils_Array::value('id', $calcStatus,
1855                 array_search('Current', $membershipStatuses)
1856               ),
1857               'join_date' => CRM_Utils_Date::customFormat($dates['join_date'], $format),
1858               'start_date' => CRM_Utils_Date::customFormat($dates['start_date'], $format),
1859               'end_date' => CRM_Utils_Date::customFormat($dates['end_date'], $format),
1860             );
1861
1862             CRM_Utils_Hook::pre('edit', 'Membership', $membership->id, $formattedParams);
1863
1864             $membership->copyValues($formattedParams);
1865             $membership->save();
1866
1867             //updating the membership log
1868             $membershipLog = array();
1869             $membershipLog = $formattedParams;
1870             $logStartDate = CRM_Utils_Date::customFormat(CRM_Utils_Array::value('log_start_date', $dates), $format);
1871             $logStartDate = ($logStartDate) ? CRM_Utils_Date::isoToMysql($logStartDate) : $formattedParams['start_date'];
1872
1873             $membershipLog['start_date'] = $logStartDate;
1874             $membershipLog['membership_id'] = $membership->id;
1875             $membershipLog['modified_id'] = $membership->contact_id;
1876             $membershipLog['modified_date'] = date('Ymd');
1877             $membershipLog['membership_type_id'] = $membership->membership_type_id;
1878
1879             CRM_Member_BAO_MembershipLog::add($membershipLog, CRM_Core_DAO::$_nullArray);
1880
1881             //update related Memberships.
1882             CRM_Member_BAO_Membership::updateRelatedMemberships($membership->id, $formattedParams);
1883
1884             $updateResult['membership_end_date'] = CRM_Utils_Date::customFormat($dates['end_date'],
1885               '%B %E%f, %Y'
1886             );
1887             $updateResult['updatedComponents']['CiviMember'] = $membership->status_id;
1888             if ($processContributionObject) {
1889               $processContribution = TRUE;
1890             }
1891
1892             CRM_Utils_Hook::post('edit', 'Membership', $membership->id, $membership);
1893           }
1894         }
1895       }
1896
1897       if ($participant) {
1898         $updatedStatusId = array_search('Registered', $participantStatuses);
1899         CRM_Event_BAO_Participant::updateParticipantStatus($participant->id, $oldStatus, $updatedStatusId, TRUE);
1900
1901         $updateResult['updatedComponents']['CiviEvent'] = $updatedStatusId;
1902         if ($processContributionObject) {
1903           $processContribution = TRUE;
1904         }
1905       }
1906
1907       if ($pledgePayment) {
1908         CRM_Pledge_BAO_PledgePayment::updatePledgePaymentStatus($pledgeID, $pledgePaymentIDs, $contributionStatusId);
1909
1910         $updateResult['updatedComponents']['CiviPledge'] = $contributionStatusId;
1911         if ($processContributionObject) {
1912           $processContribution = TRUE;
1913         }
1914       }
1915     }
1916
1917     // process contribution object.
1918     if ($processContribution) {
1919       $contributionParams = array();
1920       $fields = array(
1921         'contact_id',
1922         'total_amount',
1923         'receive_date',
1924         'is_test',
1925         'campaign_id',
1926         'payment_instrument_id',
1927         'trxn_id',
1928         'invoice_id',
1929         'financial_type_id',
1930         'contribution_status_id',
1931         'non_deductible_amount',
1932         'receipt_date',
1933         'check_number',
1934       );
1935       foreach ($fields as $field) {
1936         if (empty($params[$field])) {
1937           continue;
1938         }
1939         $contributionParams[$field] = $params[$field];
1940       }
1941
1942       $ids = array('contribution' => $contributionId);
1943       $contribution = CRM_Contribute_BAO_Contribution::create($contributionParams, $ids);
1944     }
1945
1946     return $updateResult;
1947   }
1948
1949   /**
1950    * Returns all contribution related object ids.
1951    *
1952    * @param $contributionId
1953    *
1954    * @return array
1955    */
1956   public static function getComponentDetails($contributionId) {
1957     $componentDetails = $pledgePayment = array();
1958     if (!$contributionId) {
1959       return $componentDetails;
1960     }
1961
1962     $query = "
1963       SELECT    c.id                 as contribution_id,
1964                 c.contact_id         as contact_id,
1965                 c.contribution_recur_id,
1966                 mp.membership_id     as membership_id,
1967                 m.membership_type_id as membership_type_id,
1968                 pp.participant_id    as participant_id,
1969                 p.event_id           as event_id,
1970                 pgp.id               as pledge_payment_id
1971       FROM      civicrm_contribution c
1972       LEFT JOIN civicrm_membership_payment  mp   ON mp.contribution_id = c.id
1973       LEFT JOIN civicrm_participant_payment pp   ON pp.contribution_id = c.id
1974       LEFT JOIN civicrm_participant         p    ON pp.participant_id  = p.id
1975       LEFT JOIN civicrm_membership          m    ON m.id  = mp.membership_id
1976       LEFT JOIN civicrm_pledge_payment      pgp  ON pgp.contribution_id  = c.id
1977       WHERE     c.id = $contributionId";
1978
1979     $dao = CRM_Core_DAO::executeQuery($query);
1980     $componentDetails = array();
1981
1982     while ($dao->fetch()) {
1983       $componentDetails['component'] = $dao->participant_id ? 'event' : 'contribute';
1984       $componentDetails['contact_id'] = $dao->contact_id;
1985       if ($dao->event_id) {
1986         $componentDetails['event'] = $dao->event_id;
1987       }
1988       if ($dao->participant_id) {
1989         $componentDetails['participant'] = $dao->participant_id;
1990       }
1991       if ($dao->membership_id) {
1992         if (!isset($componentDetails['membership'])) {
1993           $componentDetails['membership'] = $componentDetails['membership_type'] = array();
1994         }
1995         $componentDetails['membership'][] = $dao->membership_id;
1996         $componentDetails['membership_type'][] = $dao->membership_type_id;
1997       }
1998       if ($dao->pledge_payment_id) {
1999         $pledgePayment[] = $dao->pledge_payment_id;
2000       }
2001       if ($dao->contribution_recur_id) {
2002         $componentDetails['contributionRecur'] = $dao->contribution_recur_id;
2003       }
2004     }
2005
2006     if ($pledgePayment) {
2007       $componentDetails['pledge_payment'] = $pledgePayment;
2008     }
2009
2010     return $componentDetails;
2011   }
2012
2013   /**
2014    * @param int $contactId
2015    * @param bool $includeSoftCredit
2016    *
2017    * @return null|string
2018    */
2019   public static function contributionCount($contactId, $includeSoftCredit = TRUE) {
2020     if (!$contactId) {
2021       return 0;
2022     }
2023     CRM_Financial_BAO_FinancialType::getAvailableFinancialTypes($financialTypes);
2024     $additionalWhere = " AND contribution.financial_type_id IN (0)";
2025     $liWhere = " AND i.financial_type_id IN (0)";
2026     if (!empty($financialTypes)) {
2027       $additionalWhere = " AND contribution.financial_type_id IN (" . implode(',', array_keys($financialTypes)) . ")";
2028       $liWhere = " AND i.financial_type_id NOT IN (" . implode(',', array_keys($financialTypes)) . ")";
2029     }
2030     $contactContributionsSQL = "
2031       SELECT contribution.id AS id
2032       FROM civicrm_contribution contribution
2033       LEFT JOIN civicrm_line_item i ON i.contribution_id = contribution.id AND i.entity_table = 'civicrm_contribution' $liWhere
2034       WHERE contribution.is_test = 0 AND contribution.contact_id = {$contactId}
2035       $additionalWhere
2036       AND i.id IS NULL";
2037
2038     $contactSoftCreditContributionsSQL = "
2039       SELECT contribution.id
2040       FROM civicrm_contribution contribution INNER JOIN civicrm_contribution_soft softContribution
2041       ON ( contribution.id = softContribution.contribution_id )
2042       WHERE contribution.is_test = 0 AND softContribution.contact_id = {$contactId} ";
2043     $query = "SELECT count( x.id ) count FROM ( ";
2044     $query .= $contactContributionsSQL;
2045
2046     if ($includeSoftCredit) {
2047       $query .= " UNION ";
2048       $query .= $contactSoftCreditContributionsSQL;
2049     }
2050
2051     $query .= ") x";
2052
2053     return CRM_Core_DAO::singleValueQuery($query);
2054   }
2055
2056   /**
2057    * Repeat a transaction as part of a recurring series.
2058    *
2059    * Only call this via the api as it is being refactored. The intention is that the repeatTransaction function
2060    * (possibly living on the ContributionRecur BAO) would be called first to create a pending contribution with a
2061    * subsequent call to the contribution.completetransaction api.
2062    *
2063    * The completeTransaction functionality has historically been overloaded to both complete and repeat payments.
2064    *
2065    * @param CRM_Contribute_BAO_Contribution $contribution
2066    * @param array $input
2067    * @param array $contributionParams
2068    *
2069    * @return array
2070    */
2071   protected static function repeatTransaction(&$contribution, &$input, $contributionParams) {
2072     if (!empty($contribution->id)) {
2073       return FALSE;
2074     }
2075     if (empty($contribution->id)) {
2076       // Unclear why this would only be set for repeats.
2077       if (!empty($input['amount'])) {
2078         $contribution->total_amount = $contributionParams['total_amount'] = $input['amount'];
2079       }
2080       $templateContribution = CRM_Contribute_BAO_ContributionRecur::getTemplateContribution($contributionParams['contribution_recur_id']);
2081       if (!empty($contributionParams['contribution_recur_id'])) {
2082         $recurringContribution = civicrm_api3('ContributionRecur', 'getsingle', array(
2083           'id' => $contributionParams['contribution_recur_id'],
2084         ));
2085         if (!empty($recurringContribution['campaign_id'])) {
2086           // CRM-17718 the campaign id on the contribution recur record should get precedence.
2087           $contributionParams['campaign_id'] = $recurringContribution['campaign_id'];
2088         }
2089         if (!empty($recurringContribution['financial_type_id'])) {
2090           // CRM-17718 the campaign id on the contribution recur record should get precedence.
2091           $contributionParams['financial_type_id'] = $recurringContribution['financial_type_id'];
2092         }
2093       }
2094       $contributionParams['skipLineItem'] = TRUE;
2095       $contributionParams['status_id'] = 'Pending';
2096       if (isset($contributionParams['financial_type_id'])) {
2097         // Give precedence to passed in type.
2098         $contribution->financial_type_id = $contributionParams['financial_type_id'];
2099       }
2100       else {
2101         $contributionParams['financial_type_id'] = $templateContribution['financial_type_id'];
2102       }
2103       $contributionParams['contact_id'] = $templateContribution['contact_id'];
2104       $contributionParams['source'] = empty($templateContribution['source']) ? ts('Recurring contribution') : $templateContribution['source'];
2105       $createContribution = civicrm_api3('Contribution', 'create', $contributionParams);
2106       $contribution->id = $createContribution['id'];
2107       $input['line_item'] = CRM_Contribute_BAO_ContributionRecur::addRecurLineItems($contribution->contribution_recur_id, $contribution);
2108       CRM_Contribute_BAO_ContributionRecur::copyCustomValues($contributionParams['contribution_recur_id'], $contribution->id);
2109       return TRUE;
2110     }
2111   }
2112
2113   /**
2114    * Get individual id for onbehalf contribution.
2115    *
2116    * @param int $contributionId
2117    *   Contribution id.
2118    * @param int $contributorId
2119    *   Contributor id.
2120    *
2121    * @return array
2122    *   containing organization id and individual id
2123    */
2124   public static function getOnbehalfIds($contributionId, $contributorId = NULL) {
2125
2126     $ids = array();
2127
2128     if (!$contributionId) {
2129       return $ids;
2130     }
2131
2132     // fetch contributor id if null
2133     if (!$contributorId) {
2134       $contributorId = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution',
2135         $contributionId, 'contact_id'
2136       );
2137     }
2138
2139     $activityTypeIds = CRM_Core_PseudoConstant::activityType(TRUE, FALSE, FALSE, 'name');
2140     $activityTypeId = array_search('Contribution', $activityTypeIds);
2141
2142     if ($activityTypeId && $contributorId) {
2143       $activityQuery = "
2144 SELECT     civicrm_activity_contact.contact_id
2145   FROM     civicrm_activity_contact
2146 INNER JOIN civicrm_activity ON civicrm_activity_contact.activity_id = civicrm_activity.id
2147  WHERE     civicrm_activity.activity_type_id   = %1
2148    AND     civicrm_activity.source_record_id   = %2
2149    AND     civicrm_activity_contact.record_type_id = %3
2150 ";
2151
2152       $activityContacts = CRM_Core_OptionGroup::values('activity_contacts', FALSE, FALSE, FALSE, NULL, 'name');
2153       $sourceID = CRM_Utils_Array::key('Activity Source', $activityContacts);
2154
2155       $params = array(
2156         1 => array($activityTypeId, 'Integer'),
2157         2 => array($contributionId, 'Integer'),
2158         3 => array($sourceID, 'Integer'),
2159       );
2160
2161       $sourceContactId = CRM_Core_DAO::singleValueQuery($activityQuery, $params);
2162
2163       // for on behalf contribution source is individual and contributor is organization
2164       if ($sourceContactId && $sourceContactId != $contributorId) {
2165         $relationshipTypeIds = CRM_Core_PseudoConstant::relationshipType('name');
2166         // get rel type id for employee of relation
2167         foreach ($relationshipTypeIds as $id => $typeVals) {
2168           if ($typeVals['name_a_b'] == 'Employee of') {
2169             $relationshipTypeId = $id;
2170             break;
2171           }
2172         }
2173
2174         $rel = new CRM_Contact_DAO_Relationship();
2175         $rel->relationship_type_id = $relationshipTypeId;
2176         $rel->contact_id_a = $sourceContactId;
2177         $rel->contact_id_b = $contributorId;
2178         if ($rel->find(TRUE)) {
2179           $ids['individual_id'] = $rel->contact_id_a;
2180           $ids['organization_id'] = $rel->contact_id_b;
2181         }
2182       }
2183     }
2184
2185     return $ids;
2186   }
2187
2188   /**
2189    * @return array
2190    */
2191   public static function getContributionDates() {
2192     $config = CRM_Core_Config::singleton();
2193     $currentMonth = date('m');
2194     $currentDay = date('d');
2195     if ((int ) $config->fiscalYearStart['M'] > $currentMonth ||
2196       ((int ) $config->fiscalYearStart['M'] == $currentMonth &&
2197         (int ) $config->fiscalYearStart['d'] > $currentDay
2198       )
2199     ) {
2200       $year = date('Y') - 1;
2201     }
2202     else {
2203       $year = date('Y');
2204     }
2205     $year = array('Y' => $year);
2206     $yearDate = $config->fiscalYearStart;
2207     $yearDate = array_merge($year, $yearDate);
2208     $yearDate = CRM_Utils_Date::format($yearDate);
2209
2210     $monthDate = date('Ym') . '01';
2211
2212     $now = date('Ymd');
2213
2214     return array(
2215       'now' => $now,
2216       'yearDate' => $yearDate,
2217       'monthDate' => $monthDate,
2218     );
2219   }
2220
2221   /**
2222    * Load objects relations to contribution object.
2223    * Objects are stored in the $_relatedObjects property
2224    * In the first instance we are just moving functionality from BASEIpn -
2225    * @see http://issues.civicrm.org/jira/browse/CRM-9996
2226    *
2227    * Note that the unit test for the BaseIPN class tests this function
2228    *
2229    * @param array $input
2230    *   Input as delivered from Payment Processor.
2231    * @param array $ids
2232    *   Ids as Loaded by Payment Processor.
2233    * @param bool $loadAll
2234    *   Load all related objects - even where id not passed in? (allows API to call this).
2235    *
2236    * @return bool
2237    * @throws Exception
2238    */
2239   public function loadRelatedObjects(&$input, &$ids, $loadAll = FALSE) {
2240     if ($loadAll) {
2241       $ids = array_merge($this->getComponentDetails($this->id), $ids);
2242       if (empty($ids['contact']) && isset($this->contact_id)) {
2243         $ids['contact'] = $this->contact_id;
2244       }
2245     }
2246     if (empty($this->_component)) {
2247       if (!empty($ids['event'])) {
2248         $this->_component = 'event';
2249       }
2250       else {
2251         $this->_component = strtolower(CRM_Utils_Array::value('component', $input, 'contribute'));
2252       }
2253     }
2254
2255     // If the object is not fully populated then make sure it is - this is a more about legacy paths & cautious
2256     // refactoring than anything else, and has unit test coverage.
2257     if (empty($this->financial_type_id)) {
2258       $this->find(TRUE);
2259     }
2260
2261     $paymentProcessorID = CRM_Utils_Array::value('payment_processor_id', $input, CRM_Utils_Array::value(
2262       'paymentProcessor',
2263       $ids
2264     ));
2265
2266     if (!$paymentProcessorID && $this->contribution_page_id) {
2267       $paymentProcessorID = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_ContributionPage',
2268         $this->contribution_page_id,
2269         'payment_processor'
2270       );
2271       if ($paymentProcessorID) {
2272         $intentionalEnotice = $CRM16923AnUnreliableMethodHasBeenUserToDeterminePaymentProcessorFromContributionPage;
2273       }
2274     }
2275
2276     $ids['contributionType'] = $this->financial_type_id;
2277     $ids['financialType'] = $this->financial_type_id;
2278
2279     $entities = array(
2280       'contact' => 'CRM_Contact_BAO_Contact',
2281       'contributionRecur' => 'CRM_Contribute_BAO_ContributionRecur',
2282       'contributionType' => 'CRM_Financial_BAO_FinancialType',
2283       'financialType' => 'CRM_Financial_BAO_FinancialType',
2284     );
2285     foreach ($entities as $entity => $bao) {
2286       if (!empty($ids[$entity])) {
2287         $this->_relatedObjects[$entity] = new $bao();
2288         $this->_relatedObjects[$entity]->id = $ids[$entity];
2289         if (!$this->_relatedObjects[$entity]->find(TRUE)) {
2290           throw new CRM_Core_Exception($entity . ' could not be loaded');
2291         }
2292       }
2293     }
2294
2295     if (!empty($ids['contributionRecur']) && !$paymentProcessorID) {
2296       $paymentProcessorID = $this->_relatedObjects['contributionRecur']->payment_processor_id;
2297     }
2298
2299     if (!empty($ids['pledge_payment'])) {
2300       foreach ($ids['pledge_payment'] as $key => $paymentID) {
2301         if (empty($paymentID)) {
2302           continue;
2303         }
2304         $payment = new CRM_Pledge_BAO_PledgePayment();
2305         $payment->id = $paymentID;
2306         if (!$payment->find(TRUE)) {
2307           throw new Exception("Could not find pledge payment record: " . $paymentID);
2308         }
2309         $this->_relatedObjects['pledge_payment'][] = $payment;
2310       }
2311     }
2312
2313     $this->loadRelatedMembershipObjects($ids);
2314
2315     if ($this->_component != 'contribute') {
2316       // we are in event mode
2317       // make sure event exists and is valid
2318       $event = new CRM_Event_BAO_Event();
2319       $event->id = $ids['event'];
2320       if ($ids['event'] &&
2321         !$event->find(TRUE)
2322       ) {
2323         throw new Exception("Could not find event: " . $ids['event']);
2324       }
2325
2326       $this->_relatedObjects['event'] = &$event;
2327
2328       $participant = new CRM_Event_BAO_Participant();
2329       $participant->id = $ids['participant'];
2330       if ($ids['participant'] &&
2331         !$participant->find(TRUE)
2332       ) {
2333         throw new Exception("Could not find participant: " . $ids['participant']);
2334       }
2335       $participant->register_date = CRM_Utils_Date::isoToMysql($participant->register_date);
2336
2337       $this->_relatedObjects['participant'] = &$participant;
2338
2339       // get the payment processor id from event - this is inaccurate see CRM-16923
2340       // in future we should look at throwing an exception here rather than an dubious guess.
2341       if (!$paymentProcessorID) {
2342         $paymentProcessorID = $this->_relatedObjects['event']->payment_processor;
2343         if ($paymentProcessorID) {
2344           $intentionalEnotice = $CRM16923AnUnreliableMethodHasBeenUserToDeterminePaymentProcessorFromEvent;
2345         }
2346       }
2347     }
2348
2349     if ($paymentProcessorID) {
2350       $paymentProcessor = CRM_Financial_BAO_PaymentProcessor::getPayment($paymentProcessorID,
2351         $this->is_test ? 'test' : 'live'
2352       );
2353       $ids['paymentProcessor'] = $paymentProcessorID;
2354       $this->_relatedObjects['paymentProcessor'] = $paymentProcessor;
2355     }
2356     return TRUE;
2357   }
2358
2359   /**
2360    * Create array of message information - ie. return html version, txt version, to field
2361    *
2362    * @param array $input
2363    *   Incoming information.
2364    *   - is_recur - should this be treated as recurring (not sure why you wouldn't
2365    *    just check presence of recur object but maintaining legacy approach
2366    *    to be careful)
2367    * @param array $ids
2368    *   IDs of related objects.
2369    * @param array $values
2370    *   Any values that may have already been compiled by calling process.
2371    *   This is augmented by values 'gathered' by gatherMessageValues
2372    * @param bool $recur
2373    * @param bool $returnMessageText
2374    *   Distinguishes between whether to send message or return.
2375    *   message text. We are working towards this function ALWAYS returning message text & calling
2376    *   function doing emails / pdfs with it
2377    *
2378    * @return array
2379    *   messages
2380    * @throws Exception
2381    */
2382   public function composeMessageArray(&$input, &$ids, &$values, $recur = FALSE, $returnMessageText = TRUE) {
2383     $this->loadRelatedObjects($input, $ids);
2384
2385     if (empty($this->_component)) {
2386       $this->_component = CRM_Utils_Array::value('component', $input);
2387     }
2388
2389     //not really sure what params might be passed in but lets merge em into values
2390     $values = array_merge($this->_gatherMessageValues($input, $values, $ids), $values);
2391     if (!empty($input['receipt_date'])) {
2392       $values['receipt_date'] = $input['receipt_date'];
2393     }
2394
2395     $template = CRM_Core_Smarty::singleton();
2396     $this->_assignMessageVariablesToTemplate($values, $input, $template, $recur, $returnMessageText);
2397     //what does recur 'mean here - to do with payment processor return functionality but
2398     // what is the importance
2399     if ($recur && !empty($this->_relatedObjects['paymentProcessor'])) {
2400       $paymentObject = Civi\Payment\System::singleton()->getByProcessor($this->_relatedObjects['paymentProcessor']);
2401
2402       $entityID = $entity = NULL;
2403       if (isset($ids['contribution'])) {
2404         $entity = 'contribution';
2405         $entityID = $ids['contribution'];
2406       }
2407       if (!empty($ids['membership'])) {
2408         //not sure whether is is possible for this not to be an array - load related contacts loads an array but this code was expecting a string
2409         // the addition of the casting is in case it could get here & be a string. Added in 4.6 - maybe remove later? This AuthorizeNetIPN & PaypalIPN tests hit this
2410         // line having loaded an array
2411         $ids['membership'] = (array) $ids['membership'];
2412         $entity = 'membership';
2413         $entityID = $ids['membership'][0];
2414       }
2415
2416       $template->assign('cancelSubscriptionUrl', $paymentObject->subscriptionURL($entityID, $entity, 'cancel'));
2417       $template->assign('updateSubscriptionBillingUrl', $paymentObject->subscriptionURL($entityID, $entity, 'billing'));
2418       $template->assign('updateSubscriptionUrl', $paymentObject->subscriptionURL($entityID, $entity, 'update'));
2419
2420       if ($this->_relatedObjects['paymentProcessor']['billing_mode'] & CRM_Core_Payment::BILLING_MODE_FORM) {
2421         //direct mode showing billing block, so use directIPN for temporary
2422         $template->assign('contributeMode', 'directIPN');
2423       }
2424     }
2425     // todo remove strtolower - check consistency
2426     if (strtolower($this->_component) == 'event') {
2427       $eventParams = array('id' => $this->_relatedObjects['participant']->event_id);
2428       $values['event'] = array();
2429
2430       CRM_Event_BAO_Event::retrieve($eventParams, $values['event']);
2431
2432       //get location details
2433       $locationParams = array('entity_id' => $this->_relatedObjects['participant']->event_id, 'entity_table' => 'civicrm_event');
2434       $values['location'] = CRM_Core_BAO_Location::getValues($locationParams);
2435
2436       $ufJoinParams = array(
2437         'entity_table' => 'civicrm_event',
2438         'entity_id' => $ids['event'],
2439         'module' => 'CiviEvent',
2440       );
2441
2442       list($custom_pre_id,
2443         $custom_post_ids
2444         ) = CRM_Core_BAO_UFJoin::getUFGroupIds($ufJoinParams);
2445
2446       $values['custom_pre_id'] = $custom_pre_id;
2447       $values['custom_post_id'] = $custom_post_ids;
2448       //for tasks 'Change Participant Status' and 'Update multiple Contributions' case
2449       //and cases involving status updation through ipn
2450       // whatever that means!
2451       // total_amount appears to be the preferred input param & it is unclear why we support amount here
2452       // perhaps we should throw an e-notice if amount is set & force total_amount?
2453       if (!empty($input['amount'])) {
2454         $values['totalAmount'] = $input['amount'];
2455       }
2456
2457       if ($values['event']['is_email_confirm']) {
2458         $values['is_email_receipt'] = 1;
2459       }
2460
2461       if (!empty($ids['contribution'])) {
2462         $values['contributionId'] = $ids['contribution'];
2463       }
2464
2465       return CRM_Event_BAO_Event::sendMail($ids['contact'], $values,
2466         $this->_relatedObjects['participant']->id, $this->is_test, $returnMessageText
2467       );
2468     }
2469     else {
2470       $values['contribution_id'] = $this->id;
2471       if (!empty($ids['related_contact'])) {
2472         $values['related_contact'] = $ids['related_contact'];
2473         if (isset($ids['onbehalf_dupe_alert'])) {
2474           $values['onbehalf_dupe_alert'] = $ids['onbehalf_dupe_alert'];
2475         }
2476         $entityBlock = array(
2477           'contact_id' => $ids['contact'],
2478           'location_type_id' => CRM_Core_DAO::getFieldValue('CRM_Core_DAO_LocationType',
2479             'Home', 'id', 'name'
2480           ),
2481         );
2482         $address = CRM_Core_BAO_Address::getValues($entityBlock);
2483         $template->assign('onBehalfAddress', $address[$entityBlock['location_type_id']]['display']);
2484       }
2485       $isTest = FALSE;
2486       if ($this->is_test) {
2487         $isTest = TRUE;
2488       }
2489       if (!empty($this->_relatedObjects['membership'])) {
2490         foreach ($this->_relatedObjects['membership'] as $membership) {
2491           if ($membership->id) {
2492             $values['isMembership'] = TRUE;
2493             $values['membership_assign'] = TRUE;
2494
2495             // need to set the membership values here
2496             $template->assign('membership_name',
2497               CRM_Member_PseudoConstant::membershipType($membership->membership_type_id)
2498             );
2499             $template->assign('mem_start_date', $membership->start_date);
2500             $template->assign('mem_join_date', $membership->join_date);
2501             $template->assign('mem_end_date', $membership->end_date);
2502             $membership_status = CRM_Member_PseudoConstant::membershipStatus($membership->status_id, NULL, 'label');
2503             $template->assign('mem_status', $membership_status);
2504             if ($membership_status == 'Pending' && $membership->is_pay_later == 1) {
2505               $template->assign('is_pay_later', 1);
2506             }
2507
2508             // if separate payment there are two contributions recorded and the
2509             // admin will need to send a receipt for each of them separately.
2510             // we dont link the two in the db (but can potentially infer it if needed)
2511             $template->assign('is_separate_payment', 0);
2512
2513             if ($recur && $paymentObject) {
2514               $url = $paymentObject->subscriptionURL($membership->id, 'membership', 'cancel');
2515               $template->assign('cancelSubscriptionUrl', $url);
2516               $url = $paymentObject->subscriptionURL($membership->id, 'membership', 'billing');
2517               $template->assign('updateSubscriptionBillingUrl', $url);
2518               $url = $paymentObject->subscriptionURL($entityID, $entity, 'update');
2519               $template->assign('updateSubscriptionUrl', $url);
2520             }
2521
2522             $result = CRM_Contribute_BAO_ContributionPage::sendMail($ids['contact'], $values, $isTest, $returnMessageText);
2523
2524             return $result;
2525             // otherwise if its about sending emails, continue sending without return, as we
2526             // don't want to exit the loop.
2527           }
2528         }
2529       }
2530       else {
2531         return CRM_Contribute_BAO_ContributionPage::sendMail($ids['contact'], $values, $isTest, $returnMessageText);
2532       }
2533     }
2534   }
2535
2536   /**
2537    * Gather values for contribution mail - this function has been created
2538    * as part of CRM-9996 refactoring as a step towards simplifying the composeMessage function
2539    * Values related to the contribution in question are gathered
2540    *
2541    * @param array $input
2542    *   Input into function (probably from payment processor).
2543    * @param array $values
2544    * @param array $ids
2545    *   The set of ids related to the input.
2546    *
2547    * @return array
2548    */
2549   public function _gatherMessageValues($input, &$values, $ids = array()) {
2550     // set display address of contributor
2551     if ($this->address_id) {
2552       $addressParams = array('id' => $this->address_id);
2553       $addressDetails = CRM_Core_BAO_Address::getValues($addressParams, FALSE, 'id');
2554       $addressDetails = array_values($addressDetails);
2555       $values['address'] = $addressDetails[0]['display'];
2556     }
2557     if ($this->_component == 'contribute') {
2558       //get soft contributions
2559       $softContributions = CRM_Contribute_BAO_ContributionSoft::getSoftContribution($this->id, TRUE);
2560       if (!empty($softContributions)) {
2561         $values['softContributions'] = $softContributions['soft_credit'];
2562       }
2563       if (isset($this->contribution_page_id)) {
2564         CRM_Contribute_BAO_ContributionPage::setValues(
2565           $this->contribution_page_id,
2566           $values
2567         );
2568         if ($this->contribution_page_id) {
2569           // CRM-8254 - override default currency if applicable
2570           $config = CRM_Core_Config::singleton();
2571           $config->defaultCurrency = CRM_Utils_Array::value(
2572             'currency',
2573             $values,
2574             $config->defaultCurrency
2575           );
2576         }
2577       }
2578       // no contribution page -probably back office
2579       else {
2580         // Handle re-print receipt for offline contributions (call from PDF.php - no contribution_page_id)
2581         $values['is_email_receipt'] = 1;
2582         $values['title'] = 'Contribution';
2583       }
2584       // set lineItem for contribution
2585       if ($this->id) {
2586         $lineItem = CRM_Price_BAO_LineItem::getLineItems($this->id, 'contribution', 1);
2587         if (!empty($lineItem)) {
2588           $itemId = key($lineItem);
2589           foreach ($lineItem as &$eachItem) {
2590             if (is_array($this->_relatedObjects['membership']) && array_key_exists($eachItem['membership_type_id'], $this->_relatedObjects['membership'])) {
2591               $eachItem['join_date'] = CRM_Utils_Date::customFormat($this->_relatedObjects['membership'][$eachItem['membership_type_id']]->join_date);
2592               $eachItem['start_date'] = CRM_Utils_Date::customFormat($this->_relatedObjects['membership'][$eachItem['membership_type_id']]->start_date);
2593               $eachItem['end_date'] = CRM_Utils_Date::customFormat($this->_relatedObjects['membership'][$eachItem['membership_type_id']]->end_date);
2594             }
2595           }
2596           $values['lineItem'][0] = $lineItem;
2597           $values['priceSetID'] = CRM_Core_DAO::getFieldValue('CRM_Price_DAO_PriceField', $lineItem[$itemId]['price_field_id'], 'price_set_id');
2598         }
2599       }
2600
2601       $relatedContact = CRM_Contribute_BAO_Contribution::getOnbehalfIds(
2602         $this->id,
2603         $this->contact_id
2604       );
2605       // if this is onbehalf of contribution then set related contact
2606       if (!empty($relatedContact['individual_id'])) {
2607         $values['related_contact'] = $ids['related_contact'] = $relatedContact['individual_id'];
2608       }
2609     }
2610     else {
2611       // event
2612       $eventParams = array(
2613         'id' => $this->_relatedObjects['event']->id,
2614       );
2615       $values['event'] = array();
2616
2617       CRM_Event_BAO_Event::retrieve($eventParams, $values['event']);
2618       // add custom fields for event
2619       $eventGroupTree = CRM_Core_BAO_CustomGroup::getTree('Event', $this->_relatedObjects['event'], $this->_relatedObjects['event']->id);
2620
2621       $eventCustomGroup = array();
2622       foreach ($eventGroupTree as $key => $group) {
2623         if ($key === 'info') {
2624           continue;
2625         }
2626
2627         foreach ($group['fields'] as $k => $customField) {
2628           $groupLabel = $group['title'];
2629           if (!empty($customField['customValue'])) {
2630             foreach ($customField['customValue'] as $customFieldValues) {
2631               $eventCustomGroup[$groupLabel][$customField['label']] = CRM_Utils_Array::value('data', $customFieldValues);
2632             }
2633           }
2634         }
2635       }
2636       $values['event']['customGroup'] = $eventCustomGroup;
2637
2638       //get participant details
2639       $participantParams = array(
2640         'id' => $this->_relatedObjects['participant']->id,
2641       );
2642
2643       $values['participant'] = array();
2644
2645       CRM_Event_BAO_Participant::getValues($participantParams, $values['participant'], $participantIds);
2646       // add custom fields for event
2647       $participantGroupTree = CRM_Core_BAO_CustomGroup::getTree('Participant', $this->_relatedObjects['participant'], $this->_relatedObjects['participant']->id);
2648       $participantCustomGroup = array();
2649       foreach ($participantGroupTree as $key => $group) {
2650         if ($key === 'info') {
2651           continue;
2652         }
2653
2654         foreach ($group['fields'] as $k => $customField) {
2655           $groupLabel = $group['title'];
2656           if (!empty($customField['customValue'])) {
2657             foreach ($customField['customValue'] as $customFieldValues) {
2658               $participantCustomGroup[$groupLabel][$customField['label']] = CRM_Utils_Array::value('data', $customFieldValues);
2659             }
2660           }
2661         }
2662       }
2663       $values['participant']['customGroup'] = $participantCustomGroup;
2664
2665       //get location details
2666       $locationParams = array(
2667         'entity_id' => $this->_relatedObjects['event']->id,
2668         'entity_table' => 'civicrm_event',
2669       );
2670       $values['location'] = CRM_Core_BAO_Location::getValues($locationParams);
2671
2672       $ufJoinParams = array(
2673         'entity_table' => 'civicrm_event',
2674         'entity_id' => $ids['event'],
2675         'module' => 'CiviEvent',
2676       );
2677
2678       list($custom_pre_id,
2679         $custom_post_ids
2680         ) = CRM_Core_BAO_UFJoin::getUFGroupIds($ufJoinParams);
2681
2682       $values['custom_pre_id'] = $custom_pre_id;
2683       $values['custom_post_id'] = $custom_post_ids;
2684
2685       // set lineItem for event contribution
2686       if ($this->id) {
2687         $participantIds = CRM_Event_BAO_Participant::getParticipantIds($this->id);
2688         if (!empty($participantIds)) {
2689           foreach ($participantIds as $pIDs) {
2690             $lineItem = CRM_Price_BAO_LineItem::getLineItems($pIDs);
2691             if (!CRM_Utils_System::isNull($lineItem)) {
2692               $values['lineItem'][] = $lineItem;
2693             }
2694           }
2695         }
2696       }
2697     }
2698
2699     $groupTree = CRM_Core_BAO_CustomGroup::getTree('Contribution', $this, $this->id);
2700
2701     $customGroup = array();
2702     foreach ($groupTree as $key => $group) {
2703       if ($key === 'info') {
2704         continue;
2705       }
2706
2707       foreach ($group['fields'] as $k => $customField) {
2708         $groupLabel = $group['title'];
2709         if (!empty($customField['customValue'])) {
2710           foreach ($customField['customValue'] as $customFieldValues) {
2711             $customGroup[$groupLabel][$customField['label']] = CRM_Utils_Array::value('data', $customFieldValues);
2712           }
2713         }
2714       }
2715     }
2716     $values['customGroup'] = $customGroup;
2717
2718     return $values;
2719   }
2720
2721   /**
2722    * Assign message variables to template but try to break the habit.
2723    *
2724    * In order to get away from leaky variables it is better to ensure variables are set in values and assign them
2725    * from the send function. Otherwise smarty variables can leak if this is called more than once - e.g. processing
2726    * multiple recurring payments for processors like IATS that use tokens.
2727    *
2728    * Apply variables for message to smarty template - this function is part of analysing what is in the huge
2729    * function & breaking it down into manageable chunks. Eventually it will be refactored into something else
2730    * Note we send directly from this function in some cases because it is only partly refactored.
2731    *
2732    * Don't call this function directly as the signature will change.
2733    *
2734    * @param $values
2735    * @param $input
2736    * @param CRM_Core_SMARTY $template
2737    * @param bool $recur
2738    * @param bool $returnMessageText
2739    *
2740    * @return mixed
2741    */
2742   public function _assignMessageVariablesToTemplate(&$values, $input, &$template, $recur = FALSE, $returnMessageText = TRUE) {
2743     $template->assign('first_name', $this->_relatedObjects['contact']->first_name);
2744     $template->assign('last_name', $this->_relatedObjects['contact']->last_name);
2745     $template->assign('displayName', $this->_relatedObjects['contact']->display_name);
2746     if (!empty($values['lineItem']) && !empty($this->_relatedObjects['membership'])) {
2747       $values['useForMember'] = TRUE;
2748     }
2749     //assign honor information to receipt message
2750     $softRecord = CRM_Contribute_BAO_ContributionSoft::getSoftContribution($this->id);
2751
2752     if (isset($softRecord['soft_credit'])) {
2753       //if id of contribution page is present
2754       if (!empty($values['id'])) {
2755         $values['honor'] = array(
2756           'honor_profile_values' => array(),
2757           'honor_profile_id' => CRM_Core_DAO::getFieldValue('CRM_Core_DAO_UFJoin', $values['id'], 'uf_group_id', 'entity_id'),
2758           'honor_id' => $softRecord['soft_credit'][1]['contact_id'],
2759         );
2760         $softCreditTypes = CRM_Core_OptionGroup::values('soft_credit_type');
2761
2762         $template->assign('soft_credit_type', $softRecord['soft_credit'][1]['soft_credit_type_label']);
2763         $template->assign('honor_block_is_active', CRM_Core_DAO::getFieldValue('CRM_Core_DAO_UFJoin', $values['id'], 'is_active', 'entity_id'));
2764       }
2765       else {
2766         //offline contribution
2767         $softCreditTypes = $softCredits = array();
2768         foreach ($softRecord['soft_credit'] as $key => $softCredit) {
2769           $softCreditTypes[$key] = $softCredit['soft_credit_type_label'];
2770           $softCredits[$key] = array(
2771             'Name' => $softCredit['contact_name'],
2772             'Amount' => CRM_Utils_Money::format($softCredit['amount'], $softCredit['currency']),
2773           );
2774         }
2775         $template->assign('softCreditTypes', $softCreditTypes);
2776         $template->assign('softCredits', $softCredits);
2777       }
2778     }
2779
2780     $dao = new CRM_Contribute_DAO_ContributionProduct();
2781     $dao->contribution_id = $this->id;
2782     if ($dao->find(TRUE)) {
2783       $premiumId = $dao->product_id;
2784       $template->assign('option', $dao->product_option);
2785
2786       $productDAO = new CRM_Contribute_DAO_Product();
2787       $productDAO->id = $premiumId;
2788       $productDAO->find(TRUE);
2789       $template->assign('selectPremium', TRUE);
2790       $template->assign('product_name', $productDAO->name);
2791       $template->assign('price', $productDAO->price);
2792       $template->assign('sku', $productDAO->sku);
2793     }
2794     $template->assign('title', CRM_Utils_Array::value('title', $values));
2795     $values['amount'] = CRM_Utils_Array::value('total_amount', $input, (CRM_Utils_Array::value('amount', $input)), NULL);
2796     if (!$values['amount'] && isset($this->total_amount)) {
2797       $values['amount'] = $this->total_amount;
2798     }
2799
2800     // add the new contribution values
2801     if (strtolower($this->_component) == 'contribute') {
2802       //PCP Info
2803       $softDAO = new CRM_Contribute_DAO_ContributionSoft();
2804       $softDAO->contribution_id = $this->id;
2805       if ($softDAO->find(TRUE)) {
2806         $template->assign('pcpBlock', TRUE);
2807         $template->assign('pcp_display_in_roll', $softDAO->pcp_display_in_roll);
2808         $template->assign('pcp_roll_nickname', $softDAO->pcp_roll_nickname);
2809         $template->assign('pcp_personal_note', $softDAO->pcp_personal_note);
2810
2811         //assign the pcp page title for email subject
2812         $pcpDAO = new CRM_PCP_DAO_PCP();
2813         $pcpDAO->id = $softDAO->pcp_id;
2814         if ($pcpDAO->find(TRUE)) {
2815           $template->assign('title', $pcpDAO->title);
2816         }
2817       }
2818     }
2819
2820     if ($this->financial_type_id) {
2821       $values['financial_type_id'] = $this->financial_type_id;
2822     }
2823
2824     $template->assign('trxn_id', $this->trxn_id);
2825     $template->assign('receive_date',
2826       CRM_Utils_Date::mysqlToIso($this->receive_date)
2827     );
2828     $template->assign('contributeMode', 'notify');
2829     $template->assign('action', $this->is_test ? 1024 : 1);
2830     $template->assign('receipt_text',
2831       CRM_Utils_Array::value('receipt_text',
2832         $values
2833       )
2834     );
2835     $template->assign('is_monetary', 1);
2836     $template->assign('is_recur', (bool) $recur);
2837     $template->assign('currency', $this->currency);
2838     $template->assign('address', CRM_Utils_Address::format($input));
2839     if (!empty($values['customGroup'])) {
2840       $template->assign('customGroup', $values['customGroup']);
2841     }
2842     if (!empty($values['softContributions'])) {
2843       $template->assign('softContributions', $values['softContributions']);
2844     }
2845     if ($this->_component == 'event') {
2846       $template->assign('title', $values['event']['title']);
2847       $participantRoles = CRM_Event_PseudoConstant::participantRole();
2848       $viewRoles = array();
2849       foreach (explode(CRM_Core_DAO::VALUE_SEPARATOR, $this->_relatedObjects['participant']->role_id) as $k => $v) {
2850         $viewRoles[] = $participantRoles[$v];
2851       }
2852       $values['event']['participant_role'] = implode(', ', $viewRoles);
2853       $template->assign('event', $values['event']);
2854       $template->assign('participant', $values['participant']);
2855       $template->assign('location', $values['location']);
2856       $template->assign('customPre', $values['custom_pre_id']);
2857       $template->assign('customPost', $values['custom_post_id']);
2858
2859       $isTest = FALSE;
2860       if ($this->_relatedObjects['participant']->is_test) {
2861         $isTest = TRUE;
2862       }
2863
2864       $values['params'] = array();
2865       //to get email of primary participant.
2866       $primaryEmail = CRM_Core_DAO::getFieldValue('CRM_Core_DAO_Email', $this->_relatedObjects['participant']->contact_id, 'email', 'contact_id');
2867       $primaryAmount[] = array(
2868         'label' => $this->_relatedObjects['participant']->fee_level . ' - ' . $primaryEmail,
2869         'amount' => $this->_relatedObjects['participant']->fee_amount,
2870       );
2871       //build an array of cId/pId of participants
2872       $additionalIDs = CRM_Event_BAO_Event::buildCustomProfile($this->_relatedObjects['participant']->id, NULL, $this->_relatedObjects['contact']->id, $isTest, TRUE);
2873       unset($additionalIDs[$this->_relatedObjects['participant']->id]);
2874       //send receipt to additional participant if exists
2875       if (count($additionalIDs)) {
2876         $template->assign('isPrimary', 0);
2877         $template->assign('customProfile', NULL);
2878         //set additionalParticipant true
2879         $values['params']['additionalParticipant'] = TRUE;
2880         foreach ($additionalIDs as $pId => $cId) {
2881           $amount = array();
2882           //to change the status pending to completed
2883           $additional = new CRM_Event_DAO_Participant();
2884           $additional->id = $pId;
2885           $additional->contact_id = $cId;
2886           $additional->find(TRUE);
2887           $additional->register_date = $this->_relatedObjects['participant']->register_date;
2888           $additional->status_id = 1;
2889           $additionalParticipantInfo = CRM_Core_DAO::getFieldValue('CRM_Core_DAO_Email', $additional->contact_id, 'email', 'contact_id');
2890           //if additional participant dont have email
2891           //use display name.
2892           if (!$additionalParticipantInfo) {
2893             $additionalParticipantInfo = CRM_Contact_BAO_Contact::displayName($additional->contact_id);
2894           }
2895           $amount[0] = array('label' => $additional->fee_level, 'amount' => $additional->fee_amount);
2896           $primaryAmount[] = array(
2897             'label' => $additional->fee_level . ' - ' . $additionalParticipantInfo,
2898             'amount' => $additional->fee_amount,
2899           );
2900           $additional->save();
2901           $additional->free();
2902           $template->assign('amount', $amount);
2903           CRM_Event_BAO_Event::sendMail($cId, $values, $pId, $isTest, $returnMessageText);
2904         }
2905       }
2906
2907       //build an array of custom profile and assigning it to template
2908       $customProfile = CRM_Event_BAO_Event::buildCustomProfile($this->_relatedObjects['participant']->id, $values, NULL, $isTest);
2909
2910       if (count($customProfile)) {
2911         $template->assign('customProfile', $customProfile);
2912       }
2913
2914       // for primary contact
2915       $values['params']['additionalParticipant'] = FALSE;
2916       $template->assign('isPrimary', 1);
2917       $template->assign('amount', $primaryAmount);
2918       $template->assign('register_date', CRM_Utils_Date::isoToMysql($this->_relatedObjects['participant']->register_date));
2919       if ($this->payment_instrument_id) {
2920         $paymentInstrument = CRM_Contribute_PseudoConstant::paymentInstrument();
2921         $template->assign('paidBy', $paymentInstrument[$this->payment_instrument_id]);
2922       }
2923       // carry paylater, since we did not created billing,
2924       // so need to pull email from primary location, CRM-4395
2925       $values['params']['is_pay_later'] = $this->_relatedObjects['participant']->is_pay_later;
2926     }
2927     return $template;
2928   }
2929
2930   /**
2931    * Check whether payment processor supports
2932    * cancellation of contribution subscription
2933    *
2934    * @param int $contributionId
2935    *   Contribution id.
2936    *
2937    * @param bool $isNotCancelled
2938    *
2939    * @return bool
2940    */
2941   public static function isCancelSubscriptionSupported($contributionId, $isNotCancelled = TRUE) {
2942     $cacheKeyString = "$contributionId";
2943     $cacheKeyString .= $isNotCancelled ? '_1' : '_0';
2944
2945     static $supportsCancel = array();
2946
2947     if (!array_key_exists($cacheKeyString, $supportsCancel)) {
2948       $supportsCancel[$cacheKeyString] = FALSE;
2949       $isCancelled = FALSE;
2950
2951       if ($isNotCancelled) {
2952         $isCancelled = self::isSubscriptionCancelled($contributionId);
2953       }
2954
2955       $paymentObject = CRM_Financial_BAO_PaymentProcessor::getProcessorForEntity($contributionId, 'contribute', 'obj');
2956       if (!empty($paymentObject)) {
2957         $supportsCancel[$cacheKeyString] = $paymentObject->supports('cancelRecurring') && !$isCancelled;
2958       }
2959     }
2960     return $supportsCancel[$cacheKeyString];
2961   }
2962
2963   /**
2964    * Check whether subscription is already cancelled.
2965    *
2966    * @param int $contributionId
2967    *   Contribution id.
2968    *
2969    * @return string
2970    *   contribution status
2971    */
2972   public static function isSubscriptionCancelled($contributionId) {
2973     $sql = "
2974        SELECT cr.contribution_status_id
2975          FROM civicrm_contribution_recur cr
2976     LEFT JOIN civicrm_contribution con ON ( cr.id = con.contribution_recur_id )
2977         WHERE con.id = %1 LIMIT 1";
2978     $params = array(1 => array($contributionId, 'Integer'));
2979     $statusId = CRM_Core_DAO::singleValueQuery($sql, $params);
2980     $status = CRM_Contribute_PseudoConstant::contributionStatus($statusId);
2981     if ($status == 'Cancelled') {
2982       return TRUE;
2983     }
2984     return FALSE;
2985   }
2986
2987   /**
2988    * Create all financial accounts entry.
2989    *
2990    * @param array $params
2991    *   Contribution object, line item array and params for trxn.
2992    *
2993    *
2994    * @param array $financialTrxnValues
2995    *
2996    * @return null|object
2997    */
2998   public static function recordFinancialAccounts(&$params, $financialTrxnValues = NULL) {
2999     $skipRecords = $update = $return = $isRelatedId = FALSE;
3000
3001     $additionalParticipantId = array();
3002     $contributionStatuses = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
3003     $contributionStatus = empty($params['contribution_status_id']) ? NULL : $contributionStatuses[$params['contribution_status_id']];
3004
3005     if (CRM_Utils_Array::value('contribution_mode', $params) == 'participant') {
3006       $entityId = $params['participant_id'];
3007       $entityTable = 'civicrm_participant';
3008       $additionalParticipantId = CRM_Event_BAO_Participant::getAdditionalParticipantIds($entityId);
3009     }
3010     elseif (!empty($params['membership_id'])) {
3011       //so far $params['membership_id'] should only be set coming in from membershipBAO::create so the situation where multiple memberships
3012       // are created off one contribution should be handled elsewhere
3013       $entityId = $params['membership_id'];
3014       $entityTable = 'civicrm_membership';
3015     }
3016     else {
3017       $entityId = $params['contribution']->id;
3018       $entityTable = 'civicrm_contribution';
3019     }
3020
3021     if (CRM_Utils_Array::value('contribution_mode', $params) == 'membership') {
3022       $isRelatedId = TRUE;
3023     }
3024
3025     $entityID[] = $entityId;
3026     if (!empty($additionalParticipantId)) {
3027       $entityID += $additionalParticipantId;
3028     }
3029     // prevContribution appears to mean - original contribution object- ie copy of contribution from before the update started that is being updated
3030     if (empty($params['prevContribution'])) {
3031       $entityID = NULL;
3032     }
3033     else {
3034       $update = TRUE;
3035     }
3036
3037     $statusId = $params['contribution']->contribution_status_id;
3038     // CRM-13964 partial payment
3039     if ($contributionStatus == 'Partially paid'
3040       && !empty($params['partial_payment_total']) && !empty($params['partial_amount_pay'])
3041     ) {
3042       $partialAmtPay = $params['partial_amount_pay'];
3043       $partialAmtTotal = $params['partial_payment_total'];
3044
3045       $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
3046       $fromFinancialAccountId = CRM_Contribute_PseudoConstant::financialAccountType($params['financial_type_id'], $relationTypeId);
3047       $statusId = CRM_Core_OptionGroup::getValue('contribution_status', 'Completed', 'name');
3048       $params['total_amount'] = $partialAmtPay;
3049
3050       $balanceTrxnInfo = CRM_Core_BAO_FinancialTrxn::getBalanceTrxnAmt($params['contribution']->id, $params['financial_type_id']);
3051       if (empty($balanceTrxnInfo['trxn_id'])) {
3052         // create new balance transaction record
3053         $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
3054         $toFinancialAccount = CRM_Contribute_PseudoConstant::financialAccountType($params['financial_type_id'], $relationTypeId);
3055
3056         $balanceTrxnParams['total_amount'] = $partialAmtTotal;
3057         $balanceTrxnParams['to_financial_account_id'] = $toFinancialAccount;
3058         $balanceTrxnParams['contribution_id'] = $params['contribution']->id;
3059         $balanceTrxnParams['trxn_date'] = !empty($params['contribution']->receive_date) ? $params['contribution']->receive_date : date('YmdHis');
3060         $balanceTrxnParams['fee_amount'] = CRM_Utils_Array::value('fee_amount', $params);
3061         $balanceTrxnParams['net_amount'] = CRM_Utils_Array::value('net_amount', $params);
3062         $balanceTrxnParams['currency'] = $params['contribution']->currency;
3063         $balanceTrxnParams['trxn_id'] = $params['contribution']->trxn_id;
3064         $balanceTrxnParams['status_id'] = $statusId;
3065         $balanceTrxnParams['payment_instrument_id'] = $params['contribution']->payment_instrument_id;
3066         $balanceTrxnParams['check_number'] = CRM_Utils_Array::value('check_number', $params);
3067         if (!empty($balanceTrxnParams['from_financial_account_id']) &&
3068           ($statusId == array_search('Completed', $contributionStatuses) || $statusId == array_search('Partially paid', $contributionStatuses))
3069         ) {
3070           $balanceTrxnParams['is_payment'] = 1;
3071         }
3072         if (!empty($params['payment_processor'])) {
3073           $balanceTrxnParams['payment_processor_id'] = $params['payment_processor'];
3074         }
3075         $financialTxn = CRM_Core_BAO_FinancialTrxn::create($balanceTrxnParams);
3076       }
3077     }
3078
3079     // build line item array if its not set in $params
3080     if (empty($params['line_item']) || $additionalParticipantId) {
3081       CRM_Price_BAO_LineItem::getLineItemArray($params, $entityID, str_replace('civicrm_', '', $entityTable), $isRelatedId);
3082     }
3083
3084     if ($contributionStatus != 'Failed' &&
3085       !($contributionStatus == 'Pending' && !$params['contribution']->is_pay_later)
3086     ) {
3087       $skipRecords = TRUE;
3088       $pendingStatus = array(
3089         'Pending',
3090         'In Progress',
3091       );
3092       if (in_array($contributionStatus, $pendingStatus)) {
3093         $params['to_financial_account_id'] = CRM_Financial_BAO_FinancialAccount::getFinancialAccountForFinancialTypeByRelationship(
3094           $params['financial_type_id'],
3095           'Accounts Receivable Account is'
3096         );
3097       }
3098       elseif (!empty($params['payment_processor'])) {
3099         $params['to_financial_account_id'] = CRM_Financial_BAO_FinancialTypeAccount::getFinancialAccount($params['payment_processor'], 'civicrm_payment_processor', 'financial_account_id');
3100       }
3101       elseif (!empty($params['payment_instrument_id'])) {
3102         $params['to_financial_account_id'] = CRM_Financial_BAO_FinancialTypeAccount::getInstrumentFinancialAccount($params['payment_instrument_id']);
3103       }
3104       else {
3105         $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('financial_account_type', NULL, " AND v.name LIKE 'Asset' "));
3106         $queryParams = array(1 => array($relationTypeId, 'Integer'));
3107         $params['to_financial_account_id'] = CRM_Core_DAO::singleValueQuery("SELECT id FROM civicrm_financial_account WHERE is_default = 1 AND financial_account_type_id = %1", $queryParams);
3108       }
3109
3110       $totalAmount = CRM_Utils_Array::value('total_amount', $params);
3111       if (!isset($totalAmount) && !empty($params['prevContribution'])) {
3112         $totalAmount = $params['total_amount'] = $params['prevContribution']->total_amount;
3113       }
3114
3115       //build financial transaction params
3116       $trxnParams = array(
3117         'contribution_id' => $params['contribution']->id,
3118         'to_financial_account_id' => $params['to_financial_account_id'],
3119         'trxn_date' => !empty($params['contribution']->receive_date) ? $params['contribution']->receive_date : date('YmdHis'),
3120         'total_amount' => $totalAmount,
3121         'fee_amount' => CRM_Utils_Array::value('fee_amount', $params),
3122         'net_amount' => CRM_Utils_Array::value('net_amount', $params, $totalAmount),
3123         'currency' => $params['contribution']->currency,
3124         'trxn_id' => $params['contribution']->trxn_id,
3125         'status_id' => $statusId,
3126         'payment_instrument_id' => $params['contribution']->payment_instrument_id,
3127         'check_number' => CRM_Utils_Array::value('check_number', $params),
3128       );
3129       if ($contributionStatus == 'Refunded' || $contributionStatus == 'Chargeback') {
3130         $trxnParams['trxn_date'] = !empty($params['contribution']->cancel_date) ? $params['contribution']->cancel_date : date('YmdHis');
3131         if (isset($params['refund_trxn_id'])) {
3132           // CRM-17751 allow a separate trxn_id for the refund to be passed in via api & form.
3133           $trxnParams['trxn_id'] = $params['refund_trxn_id'];
3134         }
3135       }
3136       //CRM-16259, set is_payment flag for non pending status
3137       if (!in_array($contributionStatus, $pendingStatus)) {
3138         $trxnParams['is_payment'] = 1;
3139       }
3140       if (!empty($params['payment_processor'])) {
3141         $trxnParams['payment_processor_id'] = $params['payment_processor'];
3142       }
3143
3144       if (isset($fromFinancialAccountId)) {
3145         $trxnParams['from_financial_account_id'] = $fromFinancialAccountId;
3146       }
3147
3148       // consider external values passed for recording transaction entry
3149       if (!empty($financialTrxnValues)) {
3150         $trxnParams = array_merge($trxnParams, $financialTrxnValues);
3151       }
3152
3153       $params['trxnParams'] = $trxnParams;
3154
3155       if (!empty($params['prevContribution'])) {
3156         $updated = FALSE;
3157         $params['trxnParams']['total_amount'] = $trxnParams['total_amount'] = $params['total_amount'] = $params['prevContribution']->total_amount;
3158         $params['trxnParams']['fee_amount'] = $params['prevContribution']->fee_amount;
3159         $params['trxnParams']['net_amount'] = $params['prevContribution']->net_amount;
3160         if (!isset($params['trxnParams']['trxn_id'])) {
3161           // Actually I have no idea why we are overwriting any values from the previous contribution.
3162           // (filling makes sense to me). However, only protecting this value as I really really know we
3163           // don't want this one overwritten.
3164           // CRM-17751.
3165           $params['trxnParams']['trxn_id'] = $params['prevContribution']->trxn_id;
3166         }
3167         $params['trxnParams']['status_id'] = $params['prevContribution']->contribution_status_id;
3168
3169         if (!(($params['prevContribution']->contribution_status_id == array_search('Pending', $contributionStatuses)
3170             || $params['prevContribution']->contribution_status_id == array_search('In Progress', $contributionStatuses))
3171           && $params['contribution']->contribution_status_id == array_search('Completed', $contributionStatuses))
3172         ) {
3173           $params['trxnParams']['payment_instrument_id'] = $params['prevContribution']->payment_instrument_id;
3174           $params['trxnParams']['check_number'] = $params['prevContribution']->check_number;
3175         }
3176
3177         //if financial type is changed
3178         if (!empty($params['financial_type_id']) &&
3179           $params['contribution']->financial_type_id != $params['prevContribution']->financial_type_id
3180         ) {
3181           $incomeTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Income Account is' "));
3182           $oldFinancialAccount = CRM_Contribute_PseudoConstant::financialAccountType($params['prevContribution']->financial_type_id, $incomeTypeId);
3183           $newFinancialAccount = CRM_Contribute_PseudoConstant::financialAccountType($params['financial_type_id'], $incomeTypeId);
3184           if ($oldFinancialAccount != $newFinancialAccount) {
3185             $params['total_amount'] = 0;
3186             if (in_array($params['contribution']->contribution_status_id, $pendingStatus)) {
3187               $params['trxnParams']['to_financial_account_id'] = CRM_Contribute_PseudoConstant::financialAccountType(
3188                 $params['prevContribution']->financial_type_id, $relationTypeId);
3189             }
3190             else {
3191               $lastFinancialTrxnId = CRM_Core_BAO_FinancialTrxn::getFinancialTrxnId($params['prevContribution']->id, 'DESC');
3192               if (!empty($lastFinancialTrxnId['financialTrxnId'])) {
3193                 $params['trxnParams']['to_financial_account_id'] = CRM_Core_DAO::getFieldValue('CRM_Financial_DAO_FinancialTrxn', $lastFinancialTrxnId['financialTrxnId'], 'to_financial_account_id');
3194               }
3195             }
3196             self::updateFinancialAccounts($params, 'changeFinancialType');
3197             /* $params['trxnParams']['to_financial_account_id'] = $trxnParams['to_financial_account_id']; */
3198             $params['financial_account_id'] = $newFinancialAccount;
3199             $params['total_amount'] = $params['trxnParams']['total_amount'] = $trxnParams['total_amount'];
3200             self::updateFinancialAccounts($params);
3201             $params['trxnParams']['to_financial_account_id'] = $trxnParams['to_financial_account_id'];
3202             $updated = TRUE;
3203           }
3204         }
3205
3206         //Update contribution status
3207         $params['trxnParams']['status_id'] = $params['contribution']->contribution_status_id;
3208         if (!isset($params['refund_trxn_id'])) {
3209           // CRM-17751 This has previously been deliberately set. No explanation as to why one variant
3210           // gets preference over another so I am only 'protecting' a very specific tested flow
3211           // and letting natural justice take care of the rest.
3212           $params['trxnParams']['trxn_id'] = $params['contribution']->trxn_id;
3213         }
3214         if (!empty($params['contribution_status_id']) &&
3215           $params['prevContribution']->contribution_status_id != $params['contribution']->contribution_status_id
3216         ) {
3217           //Update Financial Records
3218           self::updateFinancialAccounts($params, 'changedStatus');
3219           $updated = TRUE;
3220         }
3221
3222         // change Payment Instrument for a Completed contribution
3223         // first handle special case when contribution is changed from Pending to Completed status when initial payment
3224         // instrument is null and now new payment instrument is added along with the payment
3225         $params['trxnParams']['payment_instrument_id'] = $params['contribution']->payment_instrument_id;
3226         $params['trxnParams']['check_number'] = CRM_Utils_Array::value('check_number', $params);
3227         if (array_key_exists('payment_instrument_id', $params)) {
3228           $params['trxnParams']['total_amount'] = -$trxnParams['total_amount'];
3229           if (CRM_Utils_System::isNull($params['prevContribution']->payment_instrument_id) &&
3230             !CRM_Utils_System::isNull($params['contribution']->payment_instrument_id)
3231           ) {
3232             //check if status is changed from Pending to Completed
3233             // do not update payment instrument changes for Pending to Completed
3234             if (!($params['contribution']->contribution_status_id == array_search('Completed', $contributionStatuses) &&
3235               in_array($params['prevContribution']->contribution_status_id, $pendingStatus))
3236             ) {
3237               // for all other statuses create new financial records
3238               self::updateFinancialAccounts($params, 'changePaymentInstrument');
3239               $params['total_amount'] = $params['trxnParams']['total_amount'] = $trxnParams['total_amount'];
3240               self::updateFinancialAccounts($params, 'changePaymentInstrument');
3241               $updated = TRUE;
3242             }
3243           }
3244           elseif ((!CRM_Utils_System::isNull($params['contribution']->payment_instrument_id) ||
3245               !CRM_Utils_System::isNull($params['prevContribution']->payment_instrument_id)) &&
3246             $params['contribution']->payment_instrument_id != $params['prevContribution']->payment_instrument_id
3247           ) {
3248             // for any other payment instrument changes create new financial records
3249             self::updateFinancialAccounts($params, 'changePaymentInstrument');
3250             $params['total_amount'] = $params['trxnParams']['total_amount'] = $trxnParams['total_amount'];
3251             self::updateFinancialAccounts($params, 'changePaymentInstrument');
3252             $updated = TRUE;
3253           }
3254           elseif (!CRM_Utils_System::isNull($params['contribution']->check_number) &&
3255             $params['contribution']->check_number != $params['prevContribution']->check_number
3256           ) {
3257             // another special case when check number is changed, create new financial records
3258             // create financial trxn with negative amount
3259             $params['trxnParams']['check_number'] = $params['prevContribution']->check_number;
3260             self::updateFinancialAccounts($params, 'changePaymentInstrument');
3261             // create financial trxn with positive amount
3262             $params['trxnParams']['check_number'] = $params['contribution']->check_number;
3263             $params['total_amount'] = $params['trxnParams']['total_amount'] = $trxnParams['total_amount'];
3264             self::updateFinancialAccounts($params, 'changePaymentInstrument');
3265             $updated = TRUE;
3266           }
3267         }
3268
3269         //if Change contribution amount
3270         $params['trxnParams']['fee_amount'] = CRM_Utils_Array::value('fee_amount', $params);
3271         $params['trxnParams']['net_amount'] = CRM_Utils_Array::value('net_amount', $params);
3272         $params['trxnParams']['total_amount'] = $trxnParams['total_amount'] = $params['total_amount'] = $totalAmount;
3273         $params['trxnParams']['trxn_id'] = $params['contribution']->trxn_id;
3274         if (isset($totalAmount) &&
3275           $totalAmount != $params['prevContribution']->total_amount
3276         ) {
3277           //Update Financial Records
3278           $params['trxnParams']['from_financial_account_id'] = NULL;
3279           self::updateFinancialAccounts($params, 'changedAmount');
3280           $updated = TRUE;
3281         }
3282
3283         if (!$updated) {
3284           // Looks like we might have a data correction update.
3285           // This would be a case where a transaction id has been entered but it is incorrect &
3286           // the person goes back in & fixes it, as opposed to a new transaction.
3287           // Currently the UI doesn't support multiple refunds against a single transaction & we are only supporting
3288           // the data fix scenario.
3289           // CRM-17751.
3290           if (isset($params['refund_trxn_id'])) {
3291             $refundIDs = CRM_Core_BAO_FinancialTrxn::getRefundTransactionIDs($params['id']);
3292             if (!empty($refundIDs['financialTrxnId']) && $refundIDs['trxn_id'] != $params['refund_trxn_id']) {
3293               civicrm_api3('FinancialTrxn', 'create', array('id' => $refundIDs['financialTrxnId'], 'trxn_id' => $params['refund_trxn_id']));
3294             }
3295           }
3296         }
3297       }
3298
3299       if (!$update) {
3300         // records finanical trxn and entity financial trxn
3301         // also make it available as return value
3302         $return = $financialTxn = CRM_Core_BAO_FinancialTrxn::create($trxnParams);
3303         $params['entity_id'] = $financialTxn->id;
3304       }
3305     }
3306     // record line items and financial items
3307     if (empty($params['skipLineItem'])) {
3308       CRM_Price_BAO_LineItem::processPriceSet($entityId, CRM_Utils_Array::value('line_item', $params), $params['contribution'], $entityTable, $update);
3309     }
3310
3311     // create batch entry if batch_id is passed and
3312     // ensure no batch entry is been made on 'Pending' or 'Failed' contribution, CRM-16611
3313     if (!empty($params['batch_id']) && !empty($financialTxn)) {
3314       $entityParams = array(
3315         'batch_id' => $params['batch_id'],
3316         'entity_table' => 'civicrm_financial_trxn',
3317         'entity_id' => $financialTxn->id,
3318       );
3319       CRM_Batch_BAO_Batch::addBatchEntity($entityParams);
3320     }
3321
3322     // when a fee is charged
3323     if (!empty($params['fee_amount']) && (empty($params['prevContribution']) || $params['contribution']->fee_amount != $params['prevContribution']->fee_amount) && $skipRecords) {
3324       CRM_Core_BAO_FinancialTrxn::recordFees($params);
3325     }
3326
3327     if (!empty($params['prevContribution']) && $entityTable == 'civicrm_participant'
3328       && $params['prevContribution']->contribution_status_id != $params['contribution']->contribution_status_id
3329     ) {
3330       $eventID = CRM_Core_DAO::getFieldValue('CRM_Event_DAO_Participant', $entityId, 'event_id');
3331       $feeLevel[] = str_replace('\ 1', '', $params['prevContribution']->amount_level);
3332       CRM_Event_BAO_Participant::createDiscountTrxn($eventID, $params, $feeLevel);
3333     }
3334     unset($params['line_item']);
3335
3336     return $return;
3337   }
3338
3339   /**
3340    * Update all financial accounts entry.
3341    *
3342    * @param array $params
3343    *   Contribution object, line item array and params for trxn.
3344    *
3345    * @param string $context
3346    *   Update scenarios.
3347    *
3348    * @param null $skipTrxn
3349    *
3350    */
3351   public static function updateFinancialAccounts(&$params, $context = NULL, $skipTrxn = NULL) {
3352     $itemAmount = $trxnID = NULL;
3353     //get all the statuses
3354     $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
3355     $previousContributionStatus = CRM_Contribute_PseudoConstant::contributionStatus($params['prevContribution']->contribution_status_id, 'name');
3356     if (($previousContributionStatus == 'Pending'
3357         || $previousContributionStatus == 'In Progress')
3358       && $params['contribution']->contribution_status_id == array_search('Completed', $contributionStatus)
3359       && $context == 'changePaymentInstrument'
3360     ) {
3361       return;
3362     }
3363     if ((($previousContributionStatus == 'Partially paid'
3364       && $params['contribution']->contribution_status_id == array_search('Completed', $contributionStatus))
3365       || ($previousContributionStatus == 'Pending' && $params['prevContribution']->is_pay_later == TRUE
3366       && $params['contribution']->contribution_status_id == array_search('Partially paid', $contributionStatus)))
3367       && $context == 'changedStatus'
3368     ) {
3369       return;
3370     }
3371     if ($context == 'changedAmount' || $context == 'changeFinancialType') {
3372       $itemAmount = $params['trxnParams']['total_amount'] = $params['trxnParams']['net_amount'] = $params['total_amount'] - $params['prevContribution']->total_amount;
3373     }
3374     if ($context == 'changedStatus') {
3375       //get all the statuses
3376       $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
3377       $cancelledTaxAmount = 0;
3378       if ($previousContributionStatus == 'Completed'
3379         && (self::isContributionStatusNegative($params['contribution']->contribution_status_id))
3380       ) {
3381         $params['trxnParams']['total_amount'] = -$params['total_amount'];
3382         $cancelledTaxAmount = CRM_Utils_Array::value('tax_amount', $params, '0.00');
3383         if (empty($params['contribution']->creditnote_id) || $params['contribution']->creditnote_id == "null") {
3384           $creditNoteId = self::createCreditNoteId();
3385           CRM_Core_DAO::setFieldValue('CRM_Contribute_DAO_Contribution', $params['contribution']->id, 'creditnote_id', $creditNoteId);
3386         }
3387       }
3388       elseif (($previousContributionStatus == 'Pending'
3389           && $params['prevContribution']->is_pay_later) || $previousContributionStatus == 'In Progress'
3390       ) {
3391         $financialTypeID = CRM_Utils_Array::value('financial_type_id', $params) ? $params['financial_type_id'] : $params['prevContribution']->financial_type_id;
3392         $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
3393         $arAccountId = CRM_Contribute_PseudoConstant::financialAccountType($financialTypeID, $relationTypeId);
3394
3395         if ($params['contribution']->contribution_status_id == array_search('Cancelled', $contributionStatus)) {
3396           $params['trxnParams']['to_financial_account_id'] = $arAccountId;
3397           $params['trxnParams']['total_amount'] = -$params['total_amount'];
3398           if (is_null($params['contribution']->creditnote_id) || $params['contribution']->creditnote_id == "null") {
3399             $creditNoteId = self::createCreditNoteId();
3400             CRM_Core_DAO::setFieldValue('CRM_Contribute_DAO_Contribution', $params['contribution']->id, 'creditnote_id', $creditNoteId);
3401           }
3402         }
3403         else {
3404           $params['trxnParams']['from_financial_account_id'] = $arAccountId;
3405         }
3406       }
3407       $itemAmount = $params['trxnParams']['total_amount'] + $cancelledTaxAmount;
3408     }
3409     elseif ($context == 'changePaymentInstrument') {
3410       if ($params['trxnParams']['total_amount'] < 0) {
3411         $lastFinancialTrxnId = CRM_Core_BAO_FinancialTrxn::getFinancialTrxnId($params['prevContribution']->id, 'DESC');
3412         if (!empty($lastFinancialTrxnId['financialTrxnId'])) {
3413           $params['trxnParams']['to_financial_account_id'] = CRM_Core_DAO::getFieldValue('CRM_Financial_DAO_FinancialTrxn', $lastFinancialTrxnId['financialTrxnId'], 'to_financial_account_id');
3414           $params['trxnParams']['payment_instrument_id'] = $params['prevContribution']->payment_instrument_id;
3415         }
3416       }
3417       else {
3418         $params['trxnParams']['to_financial_account_id'] = $params['to_financial_account_id'];
3419         $params['trxnParams']['payment_instrument_id'] = $params['contribution']->payment_instrument_id;
3420       }
3421     }
3422
3423     if ($context == 'changedStatus') {
3424       if (($previousContributionStatus == 'Pending'
3425           || $previousContributionStatus == 'In Progress')
3426         && ($params['contribution']->contribution_status_id == array_search('Completed', $contributionStatus))
3427       ) {
3428         if (empty($params['line_item'])) {
3429           //CRM-15296
3430           //@todo - check with Joe regarding this situation - payment processors create pending transactions with no line items
3431           // when creating recurring membership payment - there are 2 lines to comment out in contributonPageTest if fixed
3432           // & this can be removed
3433           return;
3434         }
3435         $trxn = CRM_Core_BAO_FinancialTrxn::create($params['trxnParams']);
3436         $params['entity_id'] = $trxn->id;
3437         $query = "UPDATE civicrm_financial_item SET status_id = %1 WHERE entity_id = %2 and entity_table = 'civicrm_line_item'";
3438         $sql = "SELECT id, amount FROM civicrm_financial_item WHERE entity_id = %1 and entity_table = 'civicrm_line_item'";
3439
3440         $entityParams = array(
3441           'entity_table' => 'civicrm_financial_item',
3442           'financial_trxn_id' => $trxn->id,
3443         );
3444         foreach ($params['line_item'] as $fieldId => $fields) {
3445           foreach ($fields as $fieldValueId => $fieldValues) {
3446             $fparams = array(
3447               1 => array(CRM_Core_OptionGroup::getValue('financial_item_status', 'Paid', 'name'), 'Integer'),
3448               2 => array($fieldValues['id'], 'Integer'),
3449             );
3450             CRM_Core_DAO::executeQuery($query, $fparams);
3451             $fparams = array(
3452               1 => array($fieldValues['id'], 'Integer'),
3453             );
3454             $financialItem = CRM_Core_DAO::executeQuery($sql, $fparams);
3455             while ($financialItem->fetch()) {
3456               $entityParams['entity_id'] = $financialItem->id;
3457               $entityParams['amount'] = $financialItem->amount;
3458               CRM_Financial_BAO_FinancialItem::createEntityTrxn($entityParams);
3459             }
3460           }
3461         }
3462         return;
3463       }
3464     }
3465
3466     $trxn = CRM_Core_BAO_FinancialTrxn::create($params['trxnParams']);
3467     $params['entity_id'] = $trxn->id;
3468     if ($context != 'changePaymentInstrument') {
3469       $itemParams['entity_table'] = 'civicrm_line_item';
3470       $trxnIds['id'] = $params['entity_id'];
3471       foreach ($params['line_item'] as $fieldId => $fields) {
3472         foreach ($fields as $fieldValueId => $fieldValues) {
3473           $prevParams['entity_id'] = $fieldValues['id'];
3474           $prevFinancialItem = CRM_Financial_BAO_FinancialItem::retrieve($prevParams, CRM_Core_DAO::$_nullArray);
3475
3476           $receiveDate = CRM_Utils_Date::isoToMysql($params['prevContribution']->receive_date);
3477           if ($params['contribution']->receive_date) {
3478             $receiveDate = CRM_Utils_Date::isoToMysql($params['contribution']->receive_date);
3479           }
3480
3481           $financialAccount = self::getFinancialAccountForStatusChangeTrxn($params, $prevFinancialItem);
3482
3483           $currency = $params['prevContribution']->currency;
3484           if ($params['contribution']->currency) {
3485             $currency = $params['contribution']->currency;
3486           }
3487           $diff = 1;
3488           if ($context == 'changeFinancialType' || self::isContributionStatusNegative($params['contribution']->contribution_status_id)) {
3489             $diff = -1;
3490           }
3491           if (!empty($params['is_quick_config'])) {
3492             $amount = $itemAmount;
3493             if (!$amount) {
3494               $amount = $params['total_amount'];
3495             }
3496           }
3497           else {
3498             $amount = $diff * $fieldValues['line_total'];
3499           }
3500
3501           $itemParams = array(
3502             'transaction_date' => $receiveDate,
3503             'contact_id' => $params['prevContribution']->contact_id,
3504             'currency' => $currency,
3505             'amount' => $amount,
3506             'description' => $prevFinancialItem->description,
3507             'status_id' => $prevFinancialItem->status_id,
3508             'financial_account_id' => $financialAccount,
3509             'entity_table' => 'civicrm_line_item',
3510             'entity_id' => $fieldValues['id'],
3511           );
3512           CRM_Financial_BAO_FinancialItem::create($itemParams, NULL, $trxnIds);
3513
3514           if ($fieldValues['tax_amount']) {
3515             $invoiceSettings = Civi::settings()->get('contribution_invoice_settings');
3516             $taxTerm = CRM_Utils_Array::value('tax_term', $invoiceSettings);
3517             $itemParams['amount'] = $diff * $fieldValues['tax_amount'];
3518             $itemParams['description'] = $taxTerm;
3519             if ($fieldValues['financial_type_id']) {
3520               $itemParams['financial_account_id'] = self::getFinancialAccountId($fieldValues['financial_type_id']);
3521             }
3522             CRM_Financial_BAO_FinancialItem::create($itemParams, NULL, $trxnIds);
3523           }
3524         }
3525       }
3526     }
3527     if ($context == 'changeFinancialType') {
3528       $params['skipLineItem'] = FALSE;
3529       foreach ($params['line_item'] as &$lineItems) {
3530         foreach ($lineItems as &$line) {
3531           $line['financial_type_id'] = $params['financial_type_id'];
3532         }
3533       }
3534     }
3535   }
3536
3537   /**
3538    * Is this contribution status a reversal.
3539    *
3540    * If so we would expect to record a negative value in the financial_trxn table.
3541    *
3542    * @param int $status_id
3543    *
3544    * @return bool
3545    */
3546   public static function isContributionStatusNegative($status_id) {
3547     $reversalStatuses = array('Cancelled', 'Chargeback', 'Refunded');
3548     return in_array(CRM_Contribute_PseudoConstant::contributionStatus($status_id, 'name'), $reversalStatuses);
3549   }
3550
3551   /**
3552    * Check status validation on update of a contribution.
3553    *
3554    * @param array $values
3555    *   Previous form values before submit.
3556    *
3557    * @param array $fields
3558    *   The input form values.
3559    *
3560    * @param array $errors
3561    *   List of errors.
3562    *
3563    * @return bool
3564    */
3565   public static function checkStatusValidation($values, &$fields, &$errors) {
3566     if (CRM_Utils_System::isNull($values) && !empty($fields['id'])) {
3567       $values['contribution_status_id'] = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $fields['id'], 'contribution_status_id');
3568       if ($values['contribution_status_id'] == $fields['contribution_status_id']) {
3569         return FALSE;
3570       }
3571     }
3572     $contributionStatuses = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
3573     $checkStatus = array(
3574       'Cancelled' => array('Completed', 'Refunded'),
3575       'Completed' => array('Cancelled', 'Refunded', 'Chargeback'),
3576       'Pending' => array('Cancelled', 'Completed', 'Failed', 'Partially paid'),
3577       'In Progress' => array('Cancelled', 'Completed', 'Failed'),
3578       'Refunded' => array('Cancelled', 'Completed'),
3579       'Partially paid' => array('Completed'),
3580     );
3581
3582     if (!in_array($contributionStatuses[$fields['contribution_status_id']],
3583       CRM_Utils_Array::value($contributionStatuses[$values['contribution_status_id']], $checkStatus, array()))
3584     ) {
3585       $errors['contribution_status_id'] = ts("Cannot change contribution status from %1 to %2.", array(
3586         1 => $contributionStatuses[$values['contribution_status_id']],
3587         2 => $contributionStatuses[$fields['contribution_status_id']],
3588       ));
3589     }
3590   }
3591
3592   /**
3593    * Delete contribution of contact.
3594    *
3595    * CRM-12155
3596    *
3597    * @param int $contactId
3598    *   Contact id.
3599    *
3600    */
3601   public static function deleteContactContribution($contactId) {
3602     $contribution = new CRM_Contribute_DAO_Contribution();
3603     $contribution->contact_id = $contactId;
3604     $contribution->find();
3605     while ($contribution->fetch()) {
3606       self::deleteContribution($contribution->id);
3607     }
3608   }
3609
3610   /**
3611    * Get options for a given contribution field.
3612    * @see CRM_Core_DAO::buildOptions
3613    *
3614    * @param string $fieldName
3615    * @param string $context see CRM_Core_DAO::buildOptionsContext.
3616    * @param array $props  whatever is known about this dao object.
3617    *
3618    * @return array|bool
3619    */
3620   public static function buildOptions($fieldName, $context = NULL, $props = array()) {
3621     $className = __CLASS__;
3622     $params = array();
3623     switch ($fieldName) {
3624       // This field is not part of this object but the api supports it
3625       case 'payment_processor':
3626         $className = 'CRM_Contribute_BAO_ContributionPage';
3627         // Filter results by contribution page
3628         if (!empty($props['contribution_page_id'])) {
3629           $page = civicrm_api('contribution_page', 'getsingle', array(
3630             'version' => 3,
3631             'id' => ($props['contribution_page_id']),
3632           ));
3633           $types = (array) CRM_Utils_Array::value('payment_processor', $page, 0);
3634           $params['condition'] = 'id IN (' . implode(',', $types) . ')';
3635         }
3636         break;
3637
3638       // CRM-13981 This field was combined with soft_credits in 4.5 but the api still supports it
3639       case 'honor_type_id':
3640         $className = 'CRM_Contribute_BAO_ContributionSoft';
3641         $fieldName = 'soft_credit_type_id';
3642         $params['condition'] = "v.name IN ('in_honor_of','in_memory_of')";
3643         break;
3644     }
3645     return CRM_Core_PseudoConstant::get($className, $fieldName, $params, $context);
3646   }
3647
3648   /**
3649    * Validate financial type.
3650    *
3651    * CRM-13231
3652    *
3653    * @param int $financialTypeId
3654    *   Financial Type id.
3655    *
3656    * @param string $relationName
3657    *
3658    * @return array|bool
3659    */
3660   public static function validateFinancialType($financialTypeId, $relationName = 'Expense Account is') {
3661     $expenseTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE '{$relationName}' "));
3662     $financialAccount = CRM_Contribute_PseudoConstant::financialAccountType($financialTypeId, $expenseTypeId);
3663
3664     if (!$financialAccount) {
3665       return CRM_Contribute_PseudoConstant::financialType($financialTypeId);
3666     }
3667     return FALSE;
3668   }
3669
3670
3671   /**
3672    * Function to record additional payment for partial and refund contributions.
3673    *
3674    * @param int $contributionId
3675    *   is the invoice contribution id (got created after processing participant payment).
3676    * @param array $trxnsData
3677    *   to take user provided input of transaction details.
3678    * @param string $paymentType
3679    *   'owed' for purpose of recording partial payments, 'refund' for purpose of recording refund payments.
3680    * @param int $participantId
3681    *
3682    * @return null|object
3683    */
3684   public static function recordAdditionalPayment($contributionId, $trxnsData, $paymentType = 'owed', $participantId = NULL, $updateStatus = TRUE) {
3685     $statusId = CRM_Core_OptionGroup::getValue('contribution_status', 'Completed', 'name');
3686     $getInfoOf['id'] = $contributionId;
3687     $defaults = array();
3688     $contributionDAO = CRM_Contribute_BAO_Contribution::retrieve($getInfoOf, $defaults, CRM_Core_DAO::$_nullArray);
3689     if (!$participantId) {
3690       $participantId = CRM_Core_DAO::getFieldValue('CRM_Event_DAO_ParticipantPayment', $contributionId, 'participant_id');
3691     }
3692
3693     if ($paymentType == 'owed') {
3694       // build params for recording financial trxn entry
3695       $params['contribution'] = $contributionDAO;
3696       $params = array_merge($defaults, $params);
3697       $params['skipLineItem'] = TRUE;
3698       $params['partial_payment_total'] = $contributionDAO->total_amount;
3699       $params['partial_amount_pay'] = $trxnsData['total_amount'];
3700       $trxnsData['trxn_date'] = !empty($trxnsData['trxn_date']) ? $trxnsData['trxn_date'] : date('YmdHis');
3701       $trxnsData['net_amount'] = !empty($trxnsData['net_amount']) ? $trxnsData['net_amount'] : $trxnsData['total_amount'];
3702
3703       // record the entry
3704       $financialTrxn = CRM_Contribute_BAO_Contribution::recordFinancialAccounts($params, $trxnsData);
3705       $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
3706       $toFinancialAccount = CRM_Contribute_PseudoConstant::financialAccountType($contributionDAO->financial_type_id, $relationTypeId);
3707
3708       $trxnId = CRM_Core_BAO_FinancialTrxn::getBalanceTrxnAmt($contributionId, $contributionDAO->financial_type_id);
3709       if (!empty($trxnId)) {
3710         $trxnId = $trxnId['trxn_id'];
3711       }
3712       elseif (!empty($contributionDAO->payment_instrument_id)) {
3713         $trxnId = CRM_Financial_BAO_FinancialTypeAccount::getInstrumentFinancialAccount($contributionDAO->payment_instrument_id);
3714       }
3715       else {
3716         $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('financial_account_type', NULL, " AND v.name LIKE 'Asset' "));
3717         $queryParams = array(1 => array($relationTypeId, 'Integer'));
3718         $trxnId = CRM_Core_DAO::singleValueQuery("SELECT id FROM civicrm_financial_account WHERE is_default = 1 AND financial_account_type_id = %1", $queryParams);
3719       }
3720
3721       // update statuses
3722       // criteria for updates contribution total_amount == financial_trxns of partial_payments
3723       $sql = "SELECT SUM(ft.total_amount) as sum_of_payments, SUM(ft.net_amount) as net_amount_total
3724 FROM civicrm_financial_trxn ft
3725 LEFT JOIN civicrm_entity_financial_trxn eft
3726   ON (ft.id = eft.financial_trxn_id)
3727 WHERE eft.entity_table = 'civicrm_contribution'
3728   AND eft.entity_id = {$contributionId}
3729   AND ft.to_financial_account_id != {$toFinancialAccount}
3730   AND ft.status_id = {$statusId}
3731 ";
3732       $query = CRM_Core_DAO::executeQuery($sql);
3733       $query->fetch();
3734       $sumOfPayments = $query->sum_of_payments;
3735
3736       // update statuses
3737       if ($contributionDAO->total_amount == $sumOfPayments) {
3738         // update contribution status and
3739         // clean cancel info (if any) if prev. contribution was updated in case of 'Refunded' => 'Completed'
3740         $contributionDAO->contribution_status_id = $statusId;
3741         $contributionDAO->cancel_date = 'null';
3742         $contributionDAO->cancel_reason = NULL;
3743         $netAmount = !empty($trxnsData['net_amount']) ? NULL : $trxnsData['total_amount'];
3744         $contributionDAO->net_amount = $query->net_amount_total + $netAmount;
3745         $contributionDAO->fee_amount = $contributionDAO->total_amount - $contributionDAO->net_amount;
3746         $contributionDAO->save();
3747
3748         //Change status of financial record too
3749         $financialTrxn->status_id = $statusId;
3750         $financialTrxn->save();
3751
3752         // note : not using the self::add method,
3753         // the reason because it performs 'status change' related code execution for financial records
3754         // which in 'Partial Paid' => 'Completed' is not useful, instead specific financial record updates
3755         // are coded below i.e. just updating financial_item status to 'Paid'
3756
3757         if ($participantId) {
3758           // update participant status
3759           $participantStatuses = CRM_Event_PseudoConstant::participantStatus();
3760           $ids = CRM_Event_BAO_Participant::getParticipantIds($contributionId);
3761           foreach ($ids as $val) {
3762             $participantUpdate['id'] = $val;
3763             $participantUpdate['status_id'] = array_search('Registered', $participantStatuses);
3764             CRM_Event_BAO_Participant::add($participantUpdate);
3765           }
3766         }
3767
3768         // update financial item statuses
3769         $financialItemStatus = CRM_Core_PseudoConstant::get('CRM_Financial_DAO_FinancialItem', 'status_id');
3770         $paidStatus = array_search('Paid', $financialItemStatus);
3771
3772         $baseTrxnId = CRM_Core_BAO_FinancialTrxn::getFinancialTrxnId($contributionId);
3773         $sqlFinancialItemUpdate = "
3774 UPDATE civicrm_financial_item fi
3775   LEFT JOIN civicrm_entity_financial_trxn eft
3776     ON (eft.entity_id = fi.id AND eft.entity_table = 'civicrm_financial_item')
3777 SET status_id = {$paidStatus}
3778 WHERE eft.financial_trxn_id IN ({$trxnId}, {$baseTrxnId['financialTrxnId']})
3779 ";
3780         CRM_Core_DAO::executeQuery($sqlFinancialItemUpdate);
3781       }
3782     }
3783     elseif ($paymentType == 'refund') {
3784       // build params for recording financial trxn entry
3785       $params['contribution'] = $contributionDAO;
3786       $params = array_merge($defaults, $params);
3787       $params['skipLineItem'] = TRUE;
3788       $trxnsData['trxn_date'] = !empty($trxnsData['trxn_date']) ? $trxnsData['trxn_date'] : date('YmdHis');
3789       $trxnsData['total_amount'] = -$trxnsData['total_amount'];
3790
3791       $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
3792       $trxnsData['from_financial_account_id'] = CRM_Contribute_PseudoConstant::financialAccountType($contributionDAO->financial_type_id, $relationTypeId);
3793       $trxnsData['status_id'] = CRM_Core_OptionGroup::getValue('contribution_status', 'Refunded', 'name');
3794       // record the entry
3795       $financialTrxn = CRM_Contribute_BAO_Contribution::recordFinancialAccounts($params, $trxnsData);
3796
3797       // note : not using the self::add method,
3798       // the reason because it performs 'status change' related code execution for financial records
3799       // which in 'Pending Refund' => 'Completed' is not useful, instead specific financial record updates
3800       // are coded below i.e. just updating financial_item status to 'Paid'
3801       if ($updateStatus) {
3802         $contributionDetails = CRM_Core_DAO::setFieldValue('CRM_Contribute_BAO_Contribution', $contributionId, 'contribution_status_id', $statusId);
3803       }
3804       // add financial item entry
3805       $financialItemStatus = CRM_Core_PseudoConstant::get('CRM_Financial_DAO_FinancialItem', 'status_id');
3806       $lineItems = CRM_Price_BAO_LineItem::getLineItemsByContributionID($contributionDAO->id);
3807       if (!empty($lineItems)) {
3808         foreach ($lineItems as $lineItemId => $lineItemValue) {
3809           $paid = $lineItemValue['line_total'] * ($financialTrxn->total_amount / $contributionDAO->total_amount);
3810           $addFinancialEntry = array(
3811             'transaction_date' => $financialTrxn->trxn_date,
3812             'contact_id' => $contributionDAO->contact_id,
3813             'amount' => round($paid, 2),
3814             'status_id' => array_search('Paid', $financialItemStatus),
3815             'entity_id' => $lineItemId,
3816             'entity_table' => 'civicrm_line_item',
3817           );
3818           $trxnIds['id'] = $financialTrxn->id;
3819           CRM_Financial_BAO_FinancialItem::create($addFinancialEntry, NULL, $trxnIds);
3820         }
3821       }
3822       if ($participantId) {
3823         // update participant status
3824         $participantStatuses = CRM_Event_PseudoConstant::participantStatus();
3825         $ids = CRM_Event_BAO_Participant::getParticipantIds($contributionId);
3826         foreach ($ids as $val) {
3827           $participantUpdate['id'] = $val;
3828           $participantUpdate['status_id'] = array_search('Registered', $participantStatuses);
3829           CRM_Event_BAO_Participant::add($participantUpdate);
3830         }
3831       }
3832     }
3833
3834     // activity creation
3835     if (!empty($financialTrxn)) {
3836       if ($participantId) {
3837         $inputParams['id'] = $participantId;
3838         $values = array();
3839         $ids = array();
3840         $component = 'event';
3841         $entityObj = CRM_Event_BAO_Participant::getValues($inputParams, $values, $ids);
3842         $entityObj = $entityObj[$participantId];
3843       }
3844       $activityType = ($paymentType == 'refund') ? 'Refund' : 'Payment';
3845
3846       self::addActivityForPayment($entityObj, $financialTrxn, $activityType, $component, $contributionId);
3847     }
3848     return $financialTrxn;
3849   }
3850
3851   /**
3852    * @param $entityObj
3853    * @param $trxnObj
3854    * @param $activityType
3855    * @param $component
3856    * @param int $contributionId
3857    *
3858    * @throws CRM_Core_Exception
3859    */
3860   public static function addActivityForPayment($entityObj, $trxnObj, $activityType, $component, $contributionId) {
3861     if ($component == 'event') {
3862       $date = CRM_Utils_Date::isoToMysql($trxnObj->trxn_date);
3863       $paymentAmount = CRM_Utils_Money::format($trxnObj->total_amount, $trxnObj->currency);
3864       $eventTitle = CRM_Core_DAO::getFieldValue('CRM_Event_BAO_Event', $entityObj->event_id, 'title');
3865       $subject = "{$paymentAmount} - Offline {$activityType} for {$eventTitle}";
3866       $targetCid = $entityObj->contact_id;
3867       // source record id would be the contribution id
3868       $srcRecId = $contributionId;
3869     }
3870
3871     // activity params
3872     $activityParams = array(
3873       'source_contact_id' => $targetCid,
3874       'source_record_id' => $srcRecId,
3875       'activity_type_id' => CRM_Core_OptionGroup::getValue('activity_type',
3876         $activityType,
3877         'name'
3878       ),
3879       'subject' => $subject,
3880       'activity_date_time' => $date,
3881       'status_id' => CRM_Core_OptionGroup::getValue('activity_status',
3882         'Completed',
3883         'name'
3884       ),
3885       'skipRecentView' => TRUE,
3886     );
3887
3888     // create activity with target contacts
3889     $session = CRM_Core_Session::singleton();
3890     $id = $session->get('userID');
3891     if ($id) {
3892       $activityParams['source_contact_id'] = $id;
3893       $activityParams['target_contact_id'][] = $targetCid;
3894     }
3895     CRM_Activity_BAO_Activity::create($activityParams);
3896   }
3897
3898   /**
3899    * Get list of payments displayed by Contribute_Page_PaymentInfo.
3900    *
3901    * @param int $id
3902    * @param $component
3903    * @param bool $getTrxnInfo
3904    * @param bool $usingLineTotal
3905    *
3906    * @return mixed
3907    */
3908   public static function getPaymentInfo($id, $component, $getTrxnInfo = FALSE, $usingLineTotal = FALSE) {
3909     if ($component == 'event') {
3910       $entity = 'participant';
3911       $entityTable = 'civicrm_participant';
3912       $contributionId = CRM_Core_DAO::getFieldValue('CRM_Event_BAO_ParticipantPayment', $id, 'contribution_id', 'participant_id');
3913
3914       if (!$contributionId) {
3915         if ($primaryParticipantId = CRM_Core_DAO::getFieldValue('CRM_Event_BAO_Participant', $id, 'registered_by_id')) {
3916           $contributionId = CRM_Core_DAO::getFieldValue('CRM_Event_BAO_ParticipantPayment', $primaryParticipantId, 'contribution_id', 'participant_id');
3917           $id = $primaryParticipantId;
3918         }
3919         if (!$contributionId) {
3920           return;
3921         }
3922       }
3923     }
3924     else {
3925       $contributionId = $id;
3926       $entity = 'contribution';
3927       $entityTable = 'civicrm_contribution';
3928     }
3929
3930     $total = CRM_Core_BAO_FinancialTrxn::getBalanceTrxnAmt($contributionId);
3931     $baseTrxnId = !empty($total['trxn_id']) ? $total['trxn_id'] : NULL;
3932     $isBalance = NULL;
3933     if ($baseTrxnId) {
3934       $isBalance = TRUE;
3935     }
3936     else {
3937       $baseTrxnId = CRM_Core_BAO_FinancialTrxn::getFinancialTrxnId($contributionId);
3938       $baseTrxnId = $baseTrxnId['financialTrxnId'];
3939       $isBalance = FALSE;
3940     }
3941     if (!CRM_Utils_Array::value('total_amount', $total) || $usingLineTotal) {
3942       // for additional participants
3943       if ($entityTable == 'civicrm_participant') {
3944         $ids = CRM_Event_BAO_Participant::getParticipantIds($contributionId);
3945         $total = 0;
3946         foreach ($ids as $val) {
3947           $total += CRM_Price_BAO_LineItem::getLineTotal($val, $entityTable);
3948         }
3949       }
3950       else {
3951         $total = CRM_Price_BAO_LineItem::getLineTotal($id, $entityTable);
3952       }
3953     }
3954     else {
3955       $baseTrxnId = $total['trxn_id'];
3956       $total = $total['total_amount'];
3957     }
3958
3959     $paymentBalance = CRM_Core_BAO_FinancialTrxn::getPartialPaymentWithType($id, $entity, FALSE, $total);
3960     $contributionIsPayLater = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $contributionId, 'is_pay_later');
3961
3962     $feeRelationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Expense Account is' "));
3963     $financialTypeId = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $contributionId, 'financial_type_id');
3964     $feeFinancialAccount = CRM_Contribute_PseudoConstant::financialAccountType($financialTypeId, $feeRelationTypeId);
3965
3966     if ($paymentBalance == 0 && $contributionIsPayLater) {
3967       $paymentBalance = $total;
3968     }
3969
3970     $info['total'] = $total;
3971     $info['paid'] = $total - $paymentBalance;
3972     $info['balance'] = $paymentBalance;
3973     $info['id'] = $id;
3974     $info['component'] = $component;
3975     $info['payLater'] = $contributionIsPayLater;
3976     $rows = array();
3977     if ($getTrxnInfo && $baseTrxnId) {
3978       // Need to exclude fee trxn rows so filter out rows where TO FINANCIAL ACCOUNT is expense account
3979       $sql = "
3980         SELECT GROUP_CONCAT(fa.`name`) as financial_account,
3981           ft.total_amount,
3982           ft.payment_instrument_id,
3983           ft.trxn_date, ft.trxn_id, ft.status_id, ft.check_number
3984
3985         FROM civicrm_contribution con
3986           LEFT JOIN civicrm_entity_financial_trxn eft ON (eft.entity_id = con.id AND eft.entity_table = 'civicrm_contribution')
3987           INNER JOIN civicrm_financial_trxn ft ON ft.id = eft.financial_trxn_id
3988             AND ft.to_financial_account_id != {$feeFinancialAccount}
3989           INNER JOIN civicrm_entity_financial_trxn ef ON (ef.financial_trxn_id = ft.id AND ef.entity_table = 'civicrm_financial_item')
3990           LEFT JOIN civicrm_financial_item fi ON fi.id = ef.entity_id
3991           INNER JOIN civicrm_financial_account fa ON fa.id = fi.financial_account_id
3992
3993         WHERE con.id = {$contributionId}
3994         GROUP BY ft.id
3995       ";
3996
3997       // conditioned WHERE clause
3998       if ($isBalance) {
3999         // if balance trxn exists don't include details of it in transaction info
4000         $sql .= " AND ft.id != {$baseTrxnId} ";
4001       }
4002       $resultDAO = CRM_Core_DAO::executeQuery($sql);
4003
4004       $statuses = CRM_Contribute_PseudoConstant::contributionStatus();
4005
4006       while ($resultDAO->fetch()) {
4007         $paidByLabel = CRM_Core_PseudoConstant::getLabel('CRM_Core_BAO_FinancialTrxn', 'payment_instrument_id', $resultDAO->payment_instrument_id);
4008         $paidByName = CRM_Core_PseudoConstant::getName('CRM_Core_BAO_FinancialTrxn', 'payment_instrument_id', $resultDAO->payment_instrument_id);
4009         $val = array(
4010           'total_amount' => $resultDAO->total_amount,
4011           'financial_type' => $resultDAO->financial_account,
4012           'payment_instrument' => $paidByLabel,
4013           'receive_date' => $resultDAO->trxn_date,
4014           'trxn_id' => $resultDAO->trxn_id,
4015           'status' => $statuses[$resultDAO->status_id],
4016         );
4017         if ($paidByName == 'Check') {
4018           $val['check_number'] = $resultDAO->check_number;
4019         }
4020         $rows[] = $val;
4021       }
4022       $info['transaction'] = $rows;
4023     }
4024     return $info;
4025   }
4026
4027   /**
4028    * Get financial account id has 'Sales Tax Account is'
4029    * account relationship with financial type
4030    *
4031    * @param int $financialTypeId
4032    *
4033    * @return FinancialAccountId
4034    */
4035   public static function getFinancialAccountId($financialTypeId) {
4036     $accountRel = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Sales Tax Account is' "));
4037     $searchParams = array(
4038       'entity_table' => 'civicrm_financial_type',
4039       'entity_id' => $financialTypeId,
4040       'account_relationship' => $accountRel,
4041     );
4042     $result = array();
4043     CRM_Financial_BAO_FinancialTypeAccount::retrieve($searchParams, $result);
4044
4045     return CRM_Utils_Array::value('financial_account_id', $result);
4046   }
4047
4048   /**
4049    * Check tax amount.
4050    *
4051    * @param array $params
4052    * @param bool $isLineItem
4053    *
4054    * @return mixed
4055    */
4056   public static function checkTaxAmount($params, $isLineItem = FALSE) {
4057     $taxRates = CRM_Core_PseudoConstant::getTaxRates();
4058
4059     // Update contribution.
4060     if (!empty($params['id'])) {
4061       $id = $params['id'];
4062       $values = $ids = array();
4063       $contrbutionParams = array('id' => $id);
4064       $prevContributionValue = CRM_Contribute_BAO_Contribution::getValues($contrbutionParams, $values, $ids);
4065
4066       // To assign pervious finantial type on update of contribution
4067       if (!isset($params['financial_type_id'])) {
4068         $params['financial_type_id'] = $prevContributionValue->financial_type_id;
4069       }
4070       elseif (isset($params['financial_type_id']) && !array_key_exists($params['financial_type_id'], $taxRates)) {
4071         // Assisn tax Amount on update of contrbution
4072         if (!empty($prevContributionValue->tax_amount)) {
4073           $params['tax_amount'] = 'null';
4074           CRM_Price_BAO_LineItem::getLineItemArray($params, array($params['id']));
4075           foreach ($params['line_item'] as $setID => $priceField) {
4076             foreach ($priceField as $priceFieldID => $priceFieldValue) {
4077               $params['line_item'][$setID][$priceFieldID]['tax_amount'] = $params['tax_amount'];
4078             }
4079           }
4080         }
4081       }
4082     }
4083
4084     // New Contrbution and update of contribution with tax rate financial type
4085     if (isset($params['financial_type_id']) && array_key_exists($params['financial_type_id'], $taxRates) &&
4086       empty($params['skipLineItem']) && !$isLineItem
4087     ) {
4088       $taxRateParams = $taxRates[$params['financial_type_id']];
4089       $taxAmount = CRM_Contribute_BAO_Contribution_Utils::calculateTaxAmount(CRM_Utils_Array::value('total_amount', $params), $taxRateParams);
4090       $params['tax_amount'] = round($taxAmount['tax_amount'], 2);
4091
4092       // Get Line Item on update of contribution
4093       if (isset($params['id'])) {
4094         CRM_Price_BAO_LineItem::getLineItemArray($params, array($params['id']));
4095       }
4096       else {
4097         CRM_Price_BAO_LineItem::getLineItemArray($params);
4098       }
4099       foreach ($params['line_item'] as $setID => $priceField) {
4100         foreach ($priceField as $priceFieldID => $priceFieldValue) {
4101           $params['line_item'][$setID][$priceFieldID]['tax_amount'] = $params['tax_amount'];
4102         }
4103       }
4104       $params['total_amount'] = CRM_Utils_Array::value('total_amount', $params) + $params['tax_amount'];
4105     }
4106     elseif (isset($params['api.line_item.create'])) {
4107       // Update total amount of contribution using lineItem
4108       $taxAmountArray = array();
4109       foreach ($params['api.line_item.create'] as $key => $value) {
4110         if (isset($value['financial_type_id']) && array_key_exists($value['financial_type_id'], $taxRates)) {
4111           $taxRate = $taxRates[$value['financial_type_id']];
4112           $taxAmount = CRM_Contribute_BAO_Contribution_Utils::calculateTaxAmount($value['line_total'], $taxRate);
4113           $taxAmountArray[] = round($taxAmount['tax_amount'], 2);
4114         }
4115       }
4116       $params['tax_amount'] = array_sum($taxAmountArray);
4117       $params['total_amount'] = $params['total_amount'] + $params['tax_amount'];
4118     }
4119     else {
4120       // update line item of contrbution
4121       if (isset($params['financial_type_id']) && array_key_exists($params['financial_type_id'], $taxRates) && $isLineItem) {
4122         $taxRate = $taxRates[$params['financial_type_id']];
4123         $taxAmount = CRM_Contribute_BAO_Contribution_Utils::calculateTaxAmount($params['line_total'], $taxRate);
4124         $params['tax_amount'] = round($taxAmount['tax_amount'], 2);
4125       }
4126     }
4127     return $params;
4128   }
4129
4130   /**
4131    * Check financial type validation on update of a contribution.
4132    *
4133    * @param Integer $financialTypeId
4134    *   Value of latest Financial Type.
4135    *
4136    * @param Integer $contributionId
4137    *   Contribution Id.
4138    *
4139    * @param array $errors
4140    *   List of errors.
4141    *
4142    * @return bool
4143    */
4144   public static function checkFinancialTypeChange($financialTypeId, $contributionId, &$errors) {
4145     if (!empty($financialTypeId)) {
4146       $oldFinancialTypeId = CRM_Core_DAO::getFieldValue('CRM_Contribute_DAO_Contribution', $contributionId, 'financial_type_id');
4147       if ($oldFinancialTypeId == $financialTypeId) {
4148         return FALSE;
4149       }
4150     }
4151     $sql = 'SELECT financial_type_id FROM civicrm_line_item WHERE contribution_id = %1 GROUP BY financial_type_id;';
4152     $params = array(
4153       '1' => array($contributionId, 'Integer'),
4154     );
4155     $result = CRM_Core_DAO::executeQuery($sql, $params);
4156     if ($result->N > 1) {
4157       $errors['financial_type_id'] = ts('One or more line items have a different financial type than the contribution. Editing the financial type is not yet supported in this situation.');
4158     }
4159   }
4160
4161   /**
4162    * Update related pledge payment payments.
4163    *
4164    * This function has been refactored out of the back office contribution form and may
4165    * still overlap with other functions.
4166    *
4167    * @param string $action
4168    * @param int $pledgePaymentID
4169    * @param int $contributionID
4170    * @param bool $adjustTotalAmount
4171    * @param float $total_amount
4172    * @param float $original_total_amount
4173    * @param int $contribution_status_id
4174    * @param int $original_contribution_status_id
4175    */
4176   public static function updateRelatedPledge(
4177     $action,
4178     $pledgePaymentID,
4179     $contributionID,
4180     $adjustTotalAmount,
4181     $total_amount,
4182     $original_total_amount,
4183     $contribution_status_id,
4184     $original_contribution_status_id
4185   ) {
4186     if (!$pledgePaymentID && $action & CRM_Core_Action::ADD && !$contributionID) {
4187       return;
4188     }
4189
4190     if ($pledgePaymentID) {
4191       //store contribution id in payment record.
4192       CRM_Core_DAO::setFieldValue('CRM_Pledge_DAO_PledgePayment', $pledgePaymentID, 'contribution_id', $contributionID);
4193     }
4194     else {
4195       $pledgePaymentID = CRM_Core_DAO::getFieldValue('CRM_Pledge_DAO_PledgePayment',
4196         $contributionID,
4197         'id',
4198         'contribution_id'
4199       );
4200     }
4201
4202     if (!$pledgePaymentID) {
4203       return;
4204     }
4205     $pledgeID = CRM_Core_DAO::getFieldValue('CRM_Pledge_DAO_PledgePayment',
4206       $contributionID,
4207       'pledge_id',
4208       'contribution_id'
4209     );
4210
4211     $updatePledgePaymentStatus = FALSE;
4212
4213     // If either the status or the amount has changed we update the pledge status.
4214     if ($action & CRM_Core_Action::ADD) {
4215       $updatePledgePaymentStatus = TRUE;
4216     }
4217     elseif ($action & CRM_Core_Action::UPDATE && (($original_contribution_status_id != $contribution_status_id) ||
4218         ($original_total_amount != $total_amount))
4219     ) {
4220       $updatePledgePaymentStatus = TRUE;
4221     }
4222
4223     if ($updatePledgePaymentStatus) {
4224       CRM_Pledge_BAO_PledgePayment::updatePledgePaymentStatus($pledgeID,
4225         array($pledgePaymentID),
4226         $contribution_status_id,
4227         NULL,
4228         $total_amount,
4229         $adjustTotalAmount
4230       );
4231     }
4232   }
4233
4234   /**
4235    * Compute the stats values
4236    *
4237    * @param $stat either 'mode' or 'median'
4238    * @param $sql
4239    * @param $alias of civicrm_contribution
4240    */
4241   public static function computeStats($stat, $sql, $alias = NULL) {
4242     $mode = $median = array();
4243     switch ($stat) {
4244       case 'mode':
4245         $modeDAO = CRM_Core_DAO::executeQuery($sql);
4246         while ($modeDAO->fetch()) {
4247           if ($modeDAO->civicrm_contribution_total_amount_count > 1) {
4248             $mode[] = CRM_Utils_Money::format($modeDAO->amount, $modeDAO->currency);
4249           }
4250           else {
4251             $mode[] = 'N/A';
4252           }
4253         }
4254         return $mode;
4255
4256       case 'median':
4257         $currencies = CRM_Core_OptionGroup::values('currencies_enabled');
4258         foreach ($currencies as $currency => $val) {
4259           $midValue = 0;
4260           $where = "AND {$alias}.currency = '{$currency}'";
4261           $rowCount = CRM_Core_DAO::singleValueQuery("SELECT count(*) as count {$sql} {$where}");
4262
4263           $even = FALSE;
4264           $offset = 1;
4265           $medianRow = floor($rowCount / 2);
4266           if ($rowCount % 2 == 0 && !empty($medianRow)) {
4267             $even = TRUE;
4268             $offset++;
4269             $medianRow--;
4270           }
4271
4272           $medianValue = "SELECT {$alias}.total_amount as median
4273              {$sql} {$where}
4274              ORDER BY median LIMIT {$medianRow},{$offset}";
4275           $medianValDAO = CRM_Core_DAO::executeQuery($medianValue);
4276           while ($medianValDAO->fetch()) {
4277             if ($even) {
4278               $midValue = $midValue + $medianValDAO->median;
4279             }
4280             else {
4281               $median[] = CRM_Utils_Money::format($medianValDAO->median, $currency);
4282             }
4283           }
4284           if ($even) {
4285             $midValue = $midValue / 2;
4286             $median[] = CRM_Utils_Money::format($midValue, $currency);
4287           }
4288         }
4289         return $median;
4290
4291       default:
4292         return;
4293     }
4294   }
4295
4296   /**
4297    * Is there only one line item attached to the contribution.
4298    *
4299    * @param int $id
4300    *   Contribution ID.
4301    *
4302    * @return bool
4303    * @throws \CiviCRM_API3_Exception
4304    */
4305   public static function isSingleLineItem($id) {
4306     $lineItemCount = civicrm_api3('LineItem', 'getcount', array('contribution_id' => $id));
4307     return ($lineItemCount == 1);
4308   }
4309
4310   /**
4311    * Complete an order.
4312    *
4313    * Do not call this directly - use the contribution.completetransaction api as this function is being refactored.
4314    *
4315    * Currently overloaded to complete a transaction & repeat a transaction - fix!
4316    *
4317    * Moving it out of the BaseIPN class is just the first step.
4318    *
4319    * @param array $input
4320    * @param array $ids
4321    * @param array $objects
4322    * @param CRM_Core_Transaction $transaction
4323    * @param int $recur
4324    * @param CRM_Contribute_BAO_Contribution $contribution
4325    * @param bool $isRecurring
4326    *   Duplication of param needs review. Only used by AuthorizeNetIPN
4327    * @param int $isFirstOrLastRecurringPayment
4328    *   Deprecated param only used by AuthorizeNetIPN.
4329    */
4330   public static function completeOrder(&$input, &$ids, $objects, $transaction, $recur, $contribution, $isRecurring, $isFirstOrLastRecurringPayment) {
4331     $primaryContributionID = isset($contribution->id) ? $contribution->id : $objects['first_contribution']->id;
4332     // The previous details are used when calculating line items so keep it before any code that 'does something'
4333     if (!empty($contribution->id)) {
4334       $input['prevContribution'] = CRM_Contribute_BAO_Contribution::getValues(array('id' => $contribution->id),
4335         CRM_Core_DAO::$_nullArray, CRM_Core_DAO::$_nullArray);
4336     }
4337     $inputContributionWhiteList = array(
4338       'fee_amount',
4339       'net_amount',
4340       'trxn_id',
4341       'check_number',
4342       'payment_instrument_id',
4343       'is_test',
4344       'campaign_id',
4345       'receive_date',
4346       'receipt_date',
4347     );
4348     if (self::isSingleLineItem($primaryContributionID)) {
4349       $inputContributionWhiteList[] = 'financial_type_id';
4350     }
4351
4352     $participant = CRM_Utils_Array::value('participant', $objects);
4353     $memberships = CRM_Utils_Array::value('membership', $objects);
4354     $recurContrib = CRM_Utils_Array::value('contributionRecur', $objects);
4355     $event = CRM_Utils_Array::value('event', $objects);
4356
4357     $contributionParams = array_merge(array(
4358       'contribution_status_id' => 'Completed',
4359       'source' => self::getRecurringContributionDescription($contribution, $event),
4360     ), array_intersect_key($input, array_fill_keys($inputContributionWhiteList, 1)
4361     ));
4362
4363     if (!empty($recurContrib->id)) {
4364       $contributionParams['contribution_recur_id'] = $recurContrib->id;
4365     }
4366     $changeDate = CRM_Utils_Array::value('trxn_date', $input, date('YmdHis'));
4367
4368     if (empty($contributionParams['receive_date']) && $changeDate) {
4369       $contributionParams['receive_date'] = $changeDate;
4370     }
4371
4372     self::repeatTransaction($contribution, $input, $contributionParams);
4373     $contributionParams['financial_type_id'] = $contribution->financial_type_id;
4374
4375     if (is_numeric($memberships)) {
4376       $memberships = array($objects['membership']);
4377     }
4378
4379     $values = array();
4380     if (isset($input['is_email_receipt'])) {
4381       $values['is_email_receipt'] = $input['is_email_receipt'];
4382     }
4383
4384     if ($input['component'] == 'contribute') {
4385       if ($contribution->contribution_page_id) {
4386         // Figure out what we gain from this.
4387         CRM_Contribute_BAO_ContributionPage::setValues($contribution->contribution_page_id, $values);
4388       }
4389       elseif ($recurContrib && $recurContrib->id) {
4390         $values['amount'] = $recurContrib->amount;
4391         $values['financial_type_id'] = $objects['contributionType']->id;
4392         $values['title'] = $source = ts('Offline Recurring Contribution');
4393         $domainValues = CRM_Core_BAO_Domain::getNameAndEmail();
4394         $values['receipt_from_name'] = $domainValues[0];
4395         $values['receipt_from_email'] = $domainValues[1];
4396       }
4397
4398       if ($recurContrib && $recurContrib->id && !isset($input['is_email_receipt'])) {
4399         //CRM-13273 - is_email_receipt setting on recurring contribution should take precedence over contribution page setting
4400         // but CRM-16124 if $input['is_email_receipt'] is set then that should not be overridden.
4401         $values['is_email_receipt'] = $recurContrib->is_email_receipt;
4402       }
4403
4404       if (!empty($memberships)) {
4405         foreach ($memberships as $membershipTypeIdKey => $membership) {
4406           if ($membership) {
4407             $membershipParams = array(
4408               'id' => $membership->id,
4409               'contact_id' => $membership->contact_id,
4410               'is_test' => $membership->is_test,
4411               'membership_type_id' => $membership->membership_type_id,
4412             );
4413
4414             $currentMembership = CRM_Member_BAO_Membership::getContactMembership($membershipParams['contact_id'],
4415               $membershipParams['membership_type_id'],
4416               $membershipParams['is_test'],
4417               $membershipParams['id']
4418             );
4419
4420             // CRM-8141 update the membership type with the value recorded in log when membership created/renewed
4421             // this picks up membership type changes during renewals
4422             $sql = "
4423 SELECT    membership_type_id
4424 FROM      civicrm_membership_log
4425 WHERE     membership_id={$membershipParams['id']}
4426 ORDER BY  id DESC
4427 LIMIT 1;";
4428             $dao = CRM_Core_DAO::executeQuery($sql);
4429             if ($dao->fetch()) {
4430               if (!empty($dao->membership_type_id)) {
4431                 $membershipParams['membership_type_id'] = $dao->membership_type_id;
4432               }
4433             }
4434             $dao->free();
4435
4436             $membershipParams['num_terms'] = $contribution->getNumTermsByContributionAndMembershipType(
4437               $membershipParams['membership_type_id'],
4438               $primaryContributionID
4439             );
4440             $dates = array_fill_keys(array('join_date', 'start_date', 'end_date'), NULL);
4441             if ($currentMembership) {
4442               /*
4443                * Fixed FOR CRM-4433
4444                * In BAO/Membership.php(renewMembership function), we skip the extend membership date and status
4445                * when Contribution mode is notify and membership is for renewal )
4446                */
4447               CRM_Member_BAO_Membership::fixMembershipStatusBeforeRenew($currentMembership, $changeDate);
4448
4449               // @todo - we should pass membership_type_id instead of null here but not
4450               // adding as not sure of testing
4451               $dates = CRM_Member_BAO_MembershipType::getRenewalDatesForMembershipType($membershipParams['id'],
4452                 $changeDate, NULL, $membershipParams['num_terms']
4453               );
4454
4455               $dates['join_date'] = $currentMembership['join_date'];
4456             }
4457
4458             //get the status for membership.
4459             $calcStatus = CRM_Member_BAO_MembershipStatus::getMembershipStatusByDate($dates['start_date'],
4460               $dates['end_date'],
4461               $dates['join_date'],
4462               'today',
4463               TRUE,
4464               $membershipParams['membership_type_id'],
4465               $membershipParams
4466             );
4467
4468             $membershipParams['status_id'] = CRM_Utils_Array::value('id', $calcStatus, 'New');
4469             //we might be renewing membership,
4470             //so make status override false.
4471             $membershipParams['is_override'] = FALSE;
4472             //CRM-17723 - reset static $relatedContactIds array()
4473             $var = TRUE;
4474             CRM_Member_BAO_Membership::createRelatedMemberships($var, $var, TRUE);
4475             civicrm_api3('Membership', 'create', $membershipParams);
4476           }
4477         }
4478       }
4479     }
4480     else {
4481       if (empty($input['IAmAHorribleNastyBeyondExcusableHackInTheCRMEventFORMTaskClassThatNeedsToBERemoved'])) {
4482         if ($event->is_email_confirm) {
4483           // @todo this should be set by the function that sends the mail after sending.
4484           $contributionParams['receipt_date'] = $changeDate;
4485         }
4486         $participantParams['id'] = $participant->id;
4487         $participantParams['status_id'] = 'Registered';
4488         civicrm_api3('Participant', 'create', $participantParams);
4489       }
4490     }
4491
4492     $contributionParams['id'] = $contribution->id;
4493
4494     civicrm_api3('Contribution', 'create', $contributionParams);
4495
4496     // Add new soft credit against current $contribution.
4497     if (CRM_Utils_Array::value('contributionRecur', $objects) && $objects['contributionRecur']->id) {
4498       CRM_Contribute_BAO_ContributionRecur::addrecurSoftCredit($objects['contributionRecur']->id, $contribution->id);
4499     }
4500
4501     $paymentProcessorId = '';
4502     if (isset($objects['paymentProcessor'])) {
4503       if (is_array($objects['paymentProcessor'])) {
4504         $paymentProcessorId = $objects['paymentProcessor']['id'];
4505       }
4506       else {
4507         $paymentProcessorId = $objects['paymentProcessor']->id;
4508       }
4509     }
4510
4511     $contributionStatuses = CRM_Core_PseudoConstant::get('CRM_Contribute_DAO_Contribution', 'contribution_status_id', array(
4512       'labelColumn' => 'name',
4513       'flip' => 1,
4514     ));
4515     if ((empty($input['prevContribution']) && $paymentProcessorId) || (!$input['prevContribution']->is_pay_later && $input['prevContribution']->contribution_status_id == $contributionStatuses['Pending'])) {
4516       $input['payment_processor'] = $paymentProcessorId;
4517     }
4518
4519     if (!empty($contribution->_relatedObjects['participant'])) {
4520       $input['contribution_mode'] = 'participant';
4521       $input['participant_id'] = $contribution->_relatedObjects['participant']->id;
4522       $input['skipLineItem'] = 1;
4523     }
4524     elseif (!empty($contribution->_relatedObjects['membership'])) {
4525       $input['skipLineItem'] = TRUE;
4526       $input['contribution_mode'] = 'membership';
4527       $contribution->contribution_status_id = $contributionStatuses['Completed'];
4528       $contribution->trxn_id = CRM_Utils_Array::value('trxn_id', $input);
4529       $contribution->receive_date = CRM_Utils_Date::isoToMysql($contribution->receive_date);
4530     }
4531     $input['contribution_status_id'] = $contributionStatuses['Completed'];
4532     $input['total_amount'] = $input['amount'];
4533     $input['contribution'] = $contribution;
4534     $input['financial_type_id'] = $contribution->financial_type_id;
4535     //@todo writing a unit test I was unable to create a scenario where this line did not fatal on second
4536     // and subsequent payments. In this case the line items are created at
4537     // CRM_Contribute_BAO_ContributionRecur::addRecurLineItems
4538     // and since the contribution is saved prior to this line there is always a contribution-id,
4539     // however there is never a prevContribution (which appears to mean original contribution not previous
4540     // contribution - or preUpdateContributionObject most accurately)
4541     // so, this is always called & only appears to succeed when prevContribution exists - which appears
4542     // to mean "are we updating an exisitng pending contribution"
4543     //I was able to make the unit test complete as fataling here doesn't prevent
4544     // the contribution being created - but activities would not be created or emails sent
4545
4546     CRM_Contribute_BAO_Contribution::recordFinancialAccounts($input, NULL);
4547
4548     CRM_Core_Error::debug_log_message("Contribution record updated successfully");
4549     $transaction->commit();
4550
4551     CRM_Contribute_BAO_ContributionRecur::updateRecurLinkedPledge($contribution);
4552
4553     // create an activity record
4554     if ($input['component'] == 'contribute') {
4555       //CRM-4027
4556       $targetContactID = NULL;
4557       if (!empty($ids['related_contact'])) {
4558         $targetContactID = $contribution->contact_id;
4559         $contribution->contact_id = $ids['related_contact'];
4560       }
4561       CRM_Activity_BAO_Activity::addActivity($contribution, NULL, $targetContactID);
4562       // event
4563     }
4564     else {
4565       CRM_Activity_BAO_Activity::addActivity($participant);
4566     }
4567
4568     // CRM-9132 legacy behaviour was that receipts were sent out in all instances. Still sending
4569     // when array_key 'is_email_receipt doesn't exist in case some instances where is needs setting haven't been set
4570     if (!array_key_exists('is_email_receipt', $values) ||
4571       $values['is_email_receipt'] == 1
4572     ) {
4573       self::sendMail($input, $ids, $objects['contribution'], $values, $recur, FALSE);
4574       CRM_Core_Error::debug_log_message("Receipt sent");
4575     }
4576
4577     CRM_Core_Error::debug_log_message("Success: Database updated");
4578     if ($isRecurring) {
4579       CRM_Contribute_BAO_ContributionRecur::sendRecurringStartOrEndNotification($ids, $recur,
4580         $isFirstOrLastRecurringPayment);
4581     }
4582   }
4583
4584   /**
4585    * Send receipt from contribution.
4586    *
4587    * Do not call this directly - it is being refactored. use contribution.sendmessage api call.
4588    *
4589    * Note that the compose message part has been moved to contribution
4590    * In general LoadObjects is called first to get the objects but the composeMessageArray function now calls it.
4591    *
4592    * @param array $input
4593    *   Incoming data from Payment processor.
4594    * @param array $ids
4595    *   Related object IDs.
4596    * @param CRM_Contribute_BAO_Contribution $contribution
4597    * @param array $values
4598    *   Values related to objects that have already been loaded.
4599    * @param bool $recur
4600    *   Is it part of a recurring contribution.
4601    * @param bool $returnMessageText
4602    *   Should text be returned instead of sent. This.
4603    *   is because the function is also used to generate pdfs
4604    *
4605    * @return array
4606    */
4607   public static function sendMail(&$input, &$ids, $contribution, &$values, $recur = FALSE, $returnMessageText = FALSE) {
4608     $input['is_recur'] = $recur;
4609     $input['receipt_date'] = $contribution->receipt_date;
4610     // set receipt from e-mail and name in value
4611     if (!$returnMessageText) {
4612       $session = CRM_Core_Session::singleton();
4613       $userID = $session->get('userID');
4614       if (!empty($userID)) {
4615         list($userName, $userEmail) = CRM_Contact_BAO_Contact_Location::getEmailDetails($userID);
4616         $values['receipt_from_email'] = CRM_Utils_Array::value('receipt_from_email', $input, $userEmail);
4617         $values['receipt_from_name'] = CRM_Utils_Array::value('receipt_from_name', $input, $userName);
4618       }
4619     }
4620     // Contribution ID should really always be set. But ?
4621     if (!$returnMessageText && (!isset($input['receipt_update']) || $input['receipt_update'])) {
4622       civicrm_api3('Contribution', 'create', array('receipt_date' => 'now', 'id' => $contribution->id));
4623     }
4624     return $contribution->composeMessageArray($input, $ids, $values, $recur, $returnMessageText);
4625   }
4626
4627   /**
4628    * Generate credit note id with next avaible number
4629    *
4630    * @return string
4631    *   Credit Note Id.
4632    */
4633   public static function createCreditNoteId() {
4634     $prefixValue = Civi::settings()->get('contribution_invoice_settings');
4635
4636     $creditNoteNum = CRM_Core_DAO::singleValueQuery("SELECT count(creditnote_id) as creditnote_number FROM civicrm_contribution");
4637     $creditNoteId = NULL;
4638
4639     do {
4640       $creditNoteNum++;
4641       $creditNoteId = CRM_Utils_Array::value('credit_notes_prefix', $prefixValue) . "" . $creditNoteNum;
4642       $result = civicrm_api3('Contribution', 'getcount', array(
4643         'sequential' => 1,
4644         'creditnote_id' => $creditNoteId,
4645       ));
4646     } while ($result > 0);
4647
4648     return $creditNoteId;
4649   }
4650
4651   /**
4652    * Load related memberships.
4653    *
4654    * Note that in theory it should be possible to retrieve these from the line_item table
4655    * with the membership_payment table being deprecated. Attempting to do this here causes tests to fail
4656    * as it seems the api is not correctly linking the line items when the contribution is created in the flow
4657    * where the contribution is created in the API, followed by the membership (using the api) followed by the membership
4658    * payment. The membership payment BAO does have code to address this but it doesn't appear to be working.
4659    *
4660    * I don't know if it never worked or broke as a result of https://issues.civicrm.org/jira/browse/CRM-14918.
4661    *
4662    * @param array $ids
4663    *
4664    * @throws Exception
4665    */
4666   public function loadRelatedMembershipObjects(&$ids) {
4667     $query = "
4668       SELECT membership_id
4669       FROM   civicrm_membership_payment
4670       WHERE  contribution_id = %1 ";
4671     $params = array(1 => array($this->id, 'Integer'));
4672
4673     $dao = CRM_Core_DAO::executeQuery($query, $params);
4674     while ($dao->fetch()) {
4675       if ($dao->membership_id) {
4676         if (!is_array($ids['membership'])) {
4677           $ids['membership'] = array();
4678         }
4679         $ids['membership'][] = $dao->membership_id;
4680       }
4681     }
4682
4683     if (array_key_exists('membership', $ids) && is_array($ids['membership'])) {
4684       foreach ($ids['membership'] as $id) {
4685         if (!empty($id)) {
4686           $membership = new CRM_Member_BAO_Membership();
4687           $membership->id = $id;
4688           if (!$membership->find(TRUE)) {
4689             throw new Exception("Could not find membership record: $id");
4690           }
4691           $membership->join_date = CRM_Utils_Date::isoToMysql($membership->join_date);
4692           $membership->start_date = CRM_Utils_Date::isoToMysql($membership->start_date);
4693           $membership->end_date = CRM_Utils_Date::isoToMysql($membership->end_date);
4694           $this->_relatedObjects['membership'][$membership->membership_type_id] = $membership;
4695           $membership->free();
4696         }
4697       }
4698     }
4699   }
4700
4701   /**
4702    * This function is used to record partial payments for contribution
4703    *
4704    * @param array $contribution
4705    *
4706    * @param array $params
4707    *
4708    * @return object
4709    */
4710   public static function recordPartialPayment($contribution, $params) {
4711     $contributionStatuses = CRM_Contribute_PseudoConstant::contributionStatus(NULL, 'name');
4712     $pendingStatus = array(
4713       array_search('Pending', $contributionStatuses),
4714       array_search('In Progress', $contributionStatuses),
4715     );
4716     $statusId = array_search('Completed', $contributionStatuses);
4717     if (in_array(CRM_Utils_Array::value('contribution_status_id', $contribution), $pendingStatus)) {
4718       $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
4719       $balanceTrxnParams['to_financial_account_id'] = CRM_Contribute_PseudoConstant::financialAccountType($contribution['financial_type_id'], $relationTypeId);
4720     }
4721     elseif (!empty($params['payment_processor'])) {
4722       $balanceTrxnParams['to_financial_account_id'] = CRM_Financial_BAO_FinancialTypeAccount::getFinancialAccount($contribution['payment_processor'], 'civicrm_payment_processor', 'financial_account_id');
4723     }
4724     elseif (!empty($params['payment_instrument_id'])) {
4725       $balanceTrxnParams['to_financial_account_id'] = CRM_Financial_BAO_FinancialTypeAccount::getInstrumentFinancialAccount($contribution['payment_instrument_id']);
4726     }
4727     else {
4728       $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('financial_account_type', NULL, " AND v.name LIKE 'Asset' "));
4729       $queryParams = array(1 => array($relationTypeId, 'Integer'));
4730       $balanceTrxnParams['to_financial_account_id'] = CRM_Core_DAO::singleValueQuery("SELECT id FROM civicrm_financial_account WHERE is_default = 1 AND financial_account_type_id = %1", $queryParams);
4731     }
4732     $relationTypeId = key(CRM_Core_PseudoConstant::accountOptionValues('account_relationship', NULL, " AND v.name LIKE 'Accounts Receivable Account is' "));
4733     $fromFinancialAccountId = CRM_Contribute_PseudoConstant::financialAccountType($contribution['financial_type_id'], $relationTypeId);
4734     $balanceTrxnParams['from_financial_account_id'] = $fromFinancialAccountId;
4735     $balanceTrxnParams['total_amount'] = $params['total_amount'];
4736     $balanceTrxnParams['contribution_id'] = $params['contribution_id'];
4737     $balanceTrxnParams['trxn_date'] = !empty($params['contribution_receive_date']) ? $params['contribution_receive_date'] : date('YmdHis');
4738     $balanceTrxnParams['fee_amount'] = CRM_Utils_Array::value('fee_amount', $params);
4739     $balanceTrxnParams['net_amount'] = CRM_Utils_Array::value('total_amount', $params);
4740     $balanceTrxnParams['currency'] = $contribution['currency'];
4741     $balanceTrxnParams['trxn_id'] = CRM_Utils_Array::value('contribution_trxn_id', $params, NULL);
4742     $balanceTrxnParams['status_id'] = $statusId;
4743     $balanceTrxnParams['payment_instrument_id'] = CRM_Utils_Array::value('payment_instrument_id', $params, $contribution['payment_instrument_id']);
4744     $balanceTrxnParams['check_number'] = CRM_Utils_Array::value('check_number', $params);
4745     if ($fromFinancialAccountId != NULL &&
4746       ($statusId == array_search('Completed', $contributionStatuses) || $statusId == array_search('Partially paid', $contributionStatuses))
4747     ) {
4748       $balanceTrxnParams['is_payment'] = 1;
4749     }
4750     if (!empty($params['payment_processor'])) {
4751       $balanceTrxnParams['payment_processor_id'] = $params['payment_processor'];
4752     }
4753     return CRM_Core_BAO_FinancialTrxn::create($balanceTrxnParams);
4754   }
4755
4756   /**
4757    * Get the description (source field) for the recurring contribution.
4758    *
4759    * @param CRM_Contribute_BAO_Contribution $contribution
4760    * @param CRM_Event_DAO_Event|null $event
4761    *
4762    * @return array
4763    * @throws \CiviCRM_API3_Exception
4764    */
4765   protected static function getRecurringContributionDescription($contribution, $event) {
4766     if (!empty($contribution->contribution_page_id)) {
4767       $contributionPageTitle = civicrm_api3('ContributionPage', 'getvalue', array(
4768         'id' => $contribution->contribution_page_id,
4769         'return' => 'title',
4770       ));
4771       return ts('Online Contribution') . ': ' . $contributionPageTitle;
4772     }
4773     elseif ($event) {
4774       return ts('Online Event Registration') . ': ' . $event->title;
4775     }
4776     return 'recurring contribution';
4777   }
4778
4779   /**
4780    * Function to add payments for contribution
4781    * for Partially Paid status
4782    *
4783    * @param array $lineItems
4784    * @param array $contributions
4785    *
4786    */
4787   public static function addPayments($lineItems, $contributions) {
4788     // get financial trxn which is a payment
4789     $ftSql = "SELECT ft.id, ft.total_amount
4790       FROM civicrm_financial_trxn ft
4791       INNER JOIN civicrm_entity_financial_trxn eft ON eft.financial_trxn_id = ft.id AND eft.entity_table = 'civicrm_contribution'
4792       WHERE eft.entity_id = %1 AND ft.is_payment = 1 ORDER BY ft.id DESC LIMIT 1";
4793     $sql = "SELECT fi.id, li.price_field_value_id
4794       FROM civicrm_financial_item fi
4795       INNER JOIN civicrm_line_item li ON li.id = fi.entity_id
4796       WHERE li.contribution_id = %1";
4797
4798     foreach ($contributions as $k => $contribution) {
4799       if ($contribution->contribution_status_id != CRM_Core_OptionGroup::getValue('contribution_status', 'Partially paid', 'name')) {
4800         continue;
4801       }
4802       $ftDao = CRM_Core_DAO::executeQuery($ftSql, array(1 => array($contribution->id, 'Integer')));
4803       $ftDao->fetch();
4804       $trxnAmount = $ftDao->total_amount;
4805       $ftId = $ftDao->id;
4806
4807       // get financial item
4808       $dao = CRM_Core_DAO::executeQuery($sql, array(1 => array($contribution->id, 'Integer')));
4809       while ($dao->fetch()) {
4810         $ftIds[$dao->price_field_value_id] = $dao->id;
4811       }
4812
4813       $params = array(
4814         'entity_table' => 'civicrm_financial_item',
4815         'financial_trxn_id' => $ftId,
4816       );
4817       foreach ($lineItems as $key => $value) {
4818         $paid = $value['line_total'] * ($trxnAmount / $contribution->total_amount);
4819         // Record Entity Financial Trxn
4820         $params['amount'] = round($paid, 2);
4821         $params['entity_id'] = $ftIds[$value['price_field_value_id']];
4822
4823         civicrm_api3('EntityFinancialTrxn', 'create', $params);
4824       }
4825     }
4826   }
4827
4828   /**
4829    * Function use to store line item proportionaly in
4830    * in entity financial trxn table
4831    *
4832    * @param array $params
4833    *  array of contribution params.
4834    * @param object $trxn
4835    *  CRM_Financial_DAO_FinancialTrxn object
4836    * @param array $contribution
4837    *
4838    */
4839   public static function assignProportionalLineItems($params, $trxn, $contribution) {
4840     $lineItems = CRM_Price_BAO_LineItem::getLineItemsByContributionID($params['contribution_id']);
4841     if (!empty($lineItems)) {
4842       // get financial item
4843       $sql = "SELECT fi.id, li.price_field_value_id
4844       FROM civicrm_financial_item fi
4845       INNER JOIN civicrm_line_item li ON li.id = fi.entity_id and fi.entity_table = 'civicrm_line_item'
4846       WHERE li.contribution_id = %1";
4847       $dao = CRM_Core_DAO::executeQuery($sql, array(1 => array($params['contribution_id'], 'Integer')));
4848       while ($dao->fetch()) {
4849         $ftIds[$dao->price_field_value_id] = $dao->id;
4850       }
4851       $eftParams = array(
4852         'entity_table' => 'civicrm_financial_item',
4853         'financial_trxn_id' => $trxn->id,
4854       );
4855       foreach ($lineItems as $key => $value) {
4856         $paid = $value['line_total'] * ($params['total_amount'] / $contribution['total_amount']);
4857         // Record Entity Financial Trxn
4858         $eftParams['amount'] = round($paid, 2);
4859         $eftParams['entity_id'] = $ftIds[$value['price_field_value_id']];
4860
4861         civicrm_api3('EntityFinancialTrxn', 'create', $eftParams);
4862       }
4863     }
4864   }
4865
4866   /**
4867    * Function to check line items
4868    *
4869    * @param array $params
4870    *  array of order params.
4871    *
4872    */
4873   public static function checkLineItems(&$params) {
4874     $totalAmount = CRM_Utils_Array::value('total_amount', $params);
4875     $lineItemAmount = 0;
4876     foreach ($params['line_items'] as &$lineItems) {
4877       foreach ($lineItems['line_item'] as &$item) {
4878         if (empty($item['financial_type_id'])) {
4879           $item['financial_type_id'] = $params['financial_type_id'];
4880         }
4881         $lineItemAmount += $item['line_total'];
4882       }
4883     }
4884     if (!isset($totalAmount)) {
4885       $params['total_amount'] = $lineItemAmount;
4886     }
4887     elseif ($totalAmount != $lineItemAmount) {
4888       throw new API_Exception("Line item total doesn't match with total amount.");
4889     }
4890   }
4891
4892   /**
4893    * Get the financial account for the item associated with the new transaction.
4894    *
4895    * @param array $params
4896    * @param CRM_Financial_BAO_FinancialItem $prevFinancialItem
4897    *
4898    * @return int
4899    */
4900   public static function getFinancialAccountForStatusChangeTrxn($params, $prevFinancialItem) {
4901
4902     if (!empty($params['financial_account_id'])) {
4903       return $params['financial_account_id'];
4904     }
4905     $contributionStatus = CRM_Contribute_PseudoConstant::contributionStatus($params['contribution_status_id'], 'name');
4906     $preferredAccountsRelationships = array(
4907       'Refunded' => 'Credit/Contra Revenue Account is',
4908       'Chargeback' => 'Chargeback Account is',
4909     );
4910     if (in_array($contributionStatus, array_keys($preferredAccountsRelationships))) {
4911       $financialTypeID = !empty($params['financial_type_id']) ? $params['financial_type_id'] : $params['prevContribution']->financial_type_id;
4912       return CRM_Financial_BAO_FinancialAccount::getFinancialAccountForFinancialTypeByRelationship(
4913         $financialTypeID,
4914         $preferredAccountsRelationships[$contributionStatus]
4915       );
4916     }
4917     return $prevFinancialItem->financial_account_id;
4918   }
4919
4920 }