/drupal/sites/all/modules/civicrm/CRM/Contribute/BAO/Contribution.php

Large files files are truncated, but you can click here to view the full file

<?php

/*
 +--------------------------------------------------------------------+
 | CiviCRM version 3.4                                                |
 +--------------------------------------------------------------------+
 | Copyright CiviCRM LLC (c) 2004-2011                                |
 +--------------------------------------------------------------------+
 | This file is a part of CiviCRM.                                    |
 |                                                                    |
 | CiviCRM is free software; you can copy, modify, and distribute it  |
 | under the terms of the GNU Affero General Public License           |
 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception.   |
 |                                                                    |
 | CiviCRM is distributed in the hope that it will be useful, but     |
 | WITHOUT ANY WARRANTY; without even the implied warranty of         |
 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.               |
 | See the GNU Affero General Public License for more details.        |
 |                                                                    |
 | You should have received a copy of the GNU Affero General Public   |
 | License and the CiviCRM Licensing Exception along                  |
 | with this program; if not, contact CiviCRM LLC                     |
 | at info[AT]civicrm[DOT]org. If you have questions about the        |
 | GNU Affero General Public License or the licensing of CiviCRM,     |
 | see the CiviCRM license FAQ at http://civicrm.org/licensing        |
 +--------------------------------------------------------------------+
*/

/**
 *
 * @package CRM
 * @copyright CiviCRM LLC (c) 2004-2011
 * $Id$
 *
 */

require_once 'CRM/Utils/Money.php';
require_once 'CRM/Contribute/PseudoConstant.php';
require_once 'CRM/Contribute/DAO/Contribution.php';
require_once 'CRM/Core/BAO/CustomField.php';
require_once 'CRM/Core/BAO/CustomValue.php';

class CRM_Contribute_BAO_Contribution extends CRM_Contribute_DAO_Contribution
{
    /**
     * static field for all the contribution information that we can potentially import
     *
     * @var array
     * @static
     */
    static $_importableFields = null;

    /**
     * static field for all the contribution information that we can potentially export
     *
     * @var array
     * @static
     */
    static $_exportableFields = null;


    function __construct()
    {
        parent::__construct();
    }
    

    /**
     * takes an associative array and creates a contribution object
     *
     * the function extract all the params it needs to initialize the create a
     * contribution object. the params array could contain additional unused name/value
     * pairs
     *
     * @param array  $params (reference ) an assoc array of name/value pairs
     * @param array $ids    the array that holds all the db ids
     *
     * @return object CRM_Contribute_BAO_Contribution object
     * @access public
     * @static
     */
    static function add(&$params, &$ids) 
    {
        if ( empty($params) ) {
            return;
        } 

        $duplicates = array( );
        if ( self::checkDuplicate( $params, $duplicates,
                                   CRM_Utils_Array::value( 'contribution', $ids ) ) ) {
            $error =& CRM_Core_Error::singleton( ); 
            $d = implode( ', ', $duplicates );
            $error->push( CRM_Core_Error::DUPLICATE_CONTRIBUTION,
                          'Fatal',
                          array( $d ),
                          "Duplicate error - existing contribution record(s) have a matching Transaction ID or Invoice ID. Contribution record ID(s) are: $d" );
            return $error;
        }

        // first clean up all the money fields
        $moneyFields = array( 'total_amount',
                              'net_amount',
                              'fee_amount',
                              'non_deductible_amount' );
        //if priceset is used, no need to cleanup money
        if ( CRM_UTils_Array::value('skipCleanMoney', $params) ) {
            unset($moneyFields[0]);
        }
        
        foreach ( $moneyFields as $field ) {
            if ( isset( $params[$field] ) ) {
                $params[$field] = CRM_Utils_Rule::cleanMoney( $params[$field] );
            }
        }
        
        if ( CRM_Utils_Array::value( 'payment_instrument_id', $params ) ) {
            require_once 'CRM/Contribute/PseudoConstant.php';
            $paymentInstruments = CRM_Contribute_PseudoConstant::paymentInstrument( 'name' ); 
            if ( $params['payment_instrument_id'] != array_search( 'Check', $paymentInstruments ) ) {
                $params['check_number'] = 'null';
            }
        }
        
        require_once 'CRM/Utils/Hook.php';
        if ( CRM_Utils_Array::value( 'contribution', $ids ) ) {
            CRM_Utils_Hook::pre( 'edit', 'Contribution', $ids['contribution'], $params );
        } else {
            CRM_Utils_Hook::pre( 'create', 'Contribution', null, $params ); 
        }

        $contribution = new CRM_Contribute_BAO_Contribution();
        $contribution->copyValues($params);
        
        $contribution->id        = CRM_Utils_Array::value( 'contribution', $ids );

        // also add financial_trxn details as part of fix for CRM-4724
        $contribution->trxn_result_code  = CRM_Utils_Array::value('trxn_result_code',  $params );
        $contribution->payment_processor = CRM_Utils_Array::value('payment_processor', $params );
                                    
        require_once 'CRM/Utils/Rule.php';
        if (!CRM_Utils_Rule::currencyCode($contribution->currency)) {
            require_once 'CRM/Core/Config.php';
            $config = CRM_Core_Config::singleton();
            $contribution->currency = $config->defaultCurrency;
        }

        $result = $contribution->save();

        // reset the group contact cache for this group
        require_once 'CRM/Contact/BAO/GroupContactCache.php';
        CRM_Contact_BAO_GroupContactCache::remove( );

        if ( CRM_Utils_Array::value( 'contribution', $ids ) ) {
            CRM_Utils_Hook::post( 'edit', 'Contribution', $contribution->id, $contribution );
        } else {
            CRM_Utils_Hook::post( 'create', 'Contribution', $contribution->id, $contribution );
        }

        return $result;
    }

    /**
     * Given the list of params in the params array, fetch the object
     * and store the values in the values array
     *
     * @param array $params input parameters to find object
     * @param array $values output values of the object
     * @param array $ids    the array that holds all the db ids
     *
     * @return CRM_Contribute_BAO_Contribution|null the found object or null
     * @access public
     * @static
     */
    static function &getValues( &$params, &$values, &$ids ) 
    {
        if ( empty ( $params ) ) {
            return null;
        }
        $contribution = new CRM_Contribute_BAO_Contribution( );

        $contribution->copyValues( $params );

        if ( $contribution->find(true) ) {
            $ids['contribution'] = $contribution->id;

            CRM_Core_DAO::storeValues( $contribution, $values );

            return $contribution;
        }
        return null;
    }

    /**
     * takes an associative array and creates a contribution object
     *
     * @param array $params (reference ) an assoc array of name/value pairs
     * @param array $ids    the array that holds all the db ids
     *
     * @return object CRM_Contribute_BAO_Contribution object 
     * @access public
     * @static
     */
    static function &create(&$params, &$ids) 
    {
        require_once 'CRM/Utils/Money.php';
        require_once 'CRM/Utils/Date.php';
        require_once 'CRM/Contribute/PseudoConstant.php';

        // FIXME: a cludgy hack to fix the dates to MySQL format
        $dateFields = array('receive_date', 'cancel_date', 'receipt_date', 'thankyou_date');
        foreach ($dateFields as $df) {
            if (isset($params[$df])) {
                $params[$df] = CRM_Utils_Date::isoToMysql($params[$df]);
            }
        }

        if ( CRM_Utils_Array::value( 'contribution', $ids ) && 
             !CRM_Utils_Array::value( 'softID', $params ) ) {
            if ( $softID = CRM_Core_DAO::getFieldValue( 'CRM_Contribute_DAO_ContributionSoft', $ids['contribution'], 'id', 'contribution_id') ) {
                $params['softID'] = $softID;
            }
        }
        require_once 'CRM/Core/Transaction.php';
        $transaction = new CRM_Core_Transaction( );
        // delete the soft credit record if no soft credit contact ID AND no PCP is set in the form
        if ( CRM_Utils_Array::value( 'contribution', $ids ) && 
             ( !CRM_Utils_Array::value( 'soft_credit_to', $params ) &&
             !CRM_Utils_Array::value( 'pcp_made_through_id', $params ) ) &&
             CRM_Utils_Array::value( 'softID', $params ) ) {
            $softCredit = new CRM_Contribute_DAO_ContributionSoft( );
            $softCredit->id = $params['softID'];
            $softCredit->delete( );
        }
        // delete the soft credit record if no soft credit contact ID AND no PCP is set in the form
        if ( CRM_Utils_Array::value( 'contribution', $ids ) && 
             ( !CRM_Utils_Array::value( 'soft_credit_to', $params ) &&
             !CRM_Utils_Array::value( 'pcp_made_through_id', $params ) ) &&
             CRM_Utils_Array::value( 'softID', $params ) ) {
            $softCredit = new CRM_Contribute_DAO_ContributionSoft( );
            $softCredit->id = $params['softID'];
            $softCredit->delete( );
        }
        $contribution = self::add($params, $ids);

        if ( is_a( $contribution, 'CRM_Core_Error') ) {
            $transaction->rollback( );
            return $contribution;
        }

        $params['contribution_id'] = $contribution->id;

        if ( CRM_Utils_Array::value( 'custom', $params ) &&
             is_array( $params['custom'] ) ) {
            require_once 'CRM/Core/BAO/CustomValueTable.php';
            CRM_Core_BAO_CustomValueTable::store( $params['custom'], 'civicrm_contribution', $contribution->id );
        }

        $session = & CRM_Core_Session::singleton();

        if ( CRM_Utils_Array::value('note', $params) ) {
            require_once 'CRM/Core/BAO/Note.php';
           
            $noteParams = array(
                                'entity_table'  => 'civicrm_contribution',
                                'note'          => $params['note'],
                                'entity_id'     => $contribution->id,
                                'contact_id'    => $session->get('userID'),
                                'modified_date' => date('Ymd')
                                );
            if( ! $noteParams['contact_id'] ) {
                $noteParams['contact_id'] =  $params['contact_id'];
            } 
            
            CRM_Core_BAO_Note::add( $noteParams,
                                    CRM_Utils_Array::value( 'note', $ids ) );
        }

        // check if activity record exist for this contribution, if
        // not add activity
        require_once 'CRM/Activity/DAO/Activity.php';
        $activity = new CRM_Activity_DAO_Activity( );
        $activity->source_record_id = $contribution->id;
        $activity->activity_type_id = CRM_Core_OptionGroup::getValue( 'activity_type',
                                                                      'Contribution',
                                                                      'name' );
        if ( ! $activity->find( ) ) {
            require_once 'CRM/Activity/BAO/Activity.php';
            CRM_Activity_BAO_Activity::addActivity( $contribution, 'Offline' );
        }

        // Handle soft credit and / or link to personal campaign page
        if ( CRM_Utils_Array::value( 'soft_credit_to', $params ) ||
             CRM_Utils_Array::value( 'pcp_made_through_id', $params ) ) {
            $csParams = array();
            if ( $id = CRM_Utils_Array::value( 'softID', $params ) ) {
                $csParams['id'] = $params['softID'];
            }

            $csParams['pcp_display_in_roll'] = $params['pcp_display_in_roll']? 1 : 0;
            foreach ( array ('pcp_roll_nickname', 'pcp_personal_note' ) as $val ) {
                $csParams[$val] = $params[$val];
            }
            $csParams['contribution_id'] = $contribution->id;
            // If pcp_made_through_id set, we define soft_credit_to contact based on selected PCP,
            // else use passed soft_credit_to
            if ( CRM_Utils_Array::value( 'pcp_made_through_id', $params ) ) {
                $csParams['pcp_id'] = CRM_Utils_Array::value( 'pcp_made_through_id', $params );
                require_once 'CRM/Core/DAO.php';
                $csParams['contact_id'] = CRM_Core_DAO::getFieldValue( 'CRM_Contribute_DAO_PCP',
                                                                        $csParams['pcp_id'], 'contact_id' );
            } else {
                $csParams['contact_id'] = $params['soft_credit_to'];
                $csParams['pcp_id'] = '';                
            }

            // first stage: we register whole amount as credited to given person
            $csParams['amount'] = $contribution->total_amount;

            self::addSoftContribution( $csParams );
        }

        $transaction->commit( );
        
        // do not add to recent items for import, CRM-4399
        if ( !CRM_Utils_Array::value( 'skipRecentView', $params ) ) {
            require_once 'CRM/Utils/Recent.php';
            require_once 'CRM/Contribute/PseudoConstant.php';
            require_once 'CRM/Contact/BAO/Contact.php';
            $url = CRM_Utils_System::url( 'civicrm/contact/view/contribution', 
                                          "action=view&reset=1&id={$contribution->id}&cid={$contribution->contact_id}&context=home" );
            
            $contributionTypes = CRM_Contribute_PseudoConstant::contributionType();
            $title = CRM_Contact_BAO_Contact::displayName( $contribution->contact_id ) . 
                ' - (' . CRM_Utils_Money::format( $contribution->total_amount, $contribution->currency ) . ' ' . 
                ' - ' . $contributionTypes[$contribution->contribution_type_id] . ')';
            
            $recentOther = array( );
            if ( CRM_Core_Permission::checkActionPermission('CiviContribute', CRM_Core_Action::UPDATE) ) {
                $recentOther['editUrl'] = CRM_Utils_System::url( 'civicrm/contact/view/contribution', 
                                                                 "action=update&reset=1&id={$contribution->id}&cid={$contribution->contact_id}&context=home" );
            }
            
            if ( CRM_Core_Permission::checkActionPermission('CiviContribute', CRM_Core_Action::DELETE) ) {
                $recentOther['deleteUrl'] = CRM_Utils_System::url( 'civicrm/contact/view/contribution', 
                                                                   "action=delete&reset=1&id={$contribution->id}&cid={$contribution->contact_id}&context=home" );
            }

            // add the recently created Contribution
            CRM_Utils_Recent::add( $title,
                                   $url,
                                   $contribution->id,
                                   'Contribution',
                                   $contribution->contact_id,
                                   null,
                                   $recentOther
                                   );
        }
        
        return $contribution;
    }

    /**
     * Get the values for pseudoconstants for name->value and reverse.
     *
     * @param array   $defaults (reference) the default values, some of which need to be resolved.
     * @param boolean $reverse  true if we want to resolve the values in the reverse direction (value -> name)
     *
     * @return void
     * @access public
     * @static
     */
    static function resolveDefaults(&$defaults, $reverse = false)
    {
        require_once 'CRM/Contribute/PseudoConstant.php';
        self::lookupValue($defaults, 'contribution_type', CRM_Contribute_PseudoConstant::contributionType(), $reverse);
        self::lookupValue($defaults, 'payment_instrument', CRM_Contribute_PseudoConstant::paymentInstrument(), $reverse);
        self::lookupValue($defaults, 'contribution_status', CRM_Contribute_PseudoConstant::contributionStatus(), $reverse);
        self::lookupValue($defaults, 'pcp', CRM_Contribute_PseudoConstant::pcPage(), $reverse);
    }

    /**
     * This function is used to convert associative array names to values
     * and vice-versa.
     *
     * This function is used by both the web form layer and the api. Note that
     * the api needs the name => value conversion, also the view layer typically
     * requires value => name conversion
     */
    static function lookupValue(&$defaults, $property, &$lookup, $reverse)
    {
        $id = $property . '_id';

        $src = $reverse ? $property : $id;
        $dst = $reverse ? $id       : $property;

        if (!array_key_exists($src, $defaults)) {
            return false;
        }

        $look = $reverse ? array_flip($lookup) : $lookup;
        
        if(is_array($look)) {
            if (!array_key_exists($defaults[$src], $look)) {
                return false;
            }
        }
        $defaults[$dst] = $look[$defaults[$src]];
        return true;
    }

    /**
     * Takes a bunch of params that are needed to match certain criteria and
     * retrieves the relevant objects. We'll tweak this function to be more
     * full featured over a period of time. This is the inverse function of
     * create.  It also stores all the retrieved values in the default array
     *
     * @param array $params   (reference ) an assoc array of name/value pairs
     * @param array $defaults (reference ) an assoc array to hold the name / value pairs
     *                        in a hierarchical manner
     * @param array $ids      (reference) the array that holds all the db ids
     *
     * @return object CRM_Contribute_BAO_Contribution object
     * @access public
     * @static
     */
    static function retrieve( &$params, &$defaults, &$ids ) 
    {
        $contribution = CRM_Contribute_BAO_Contribution::getValues( $params, $defaults, $ids );
        return $contribution;
    }

    /**
     * combine all the importable fields from the lower levels object
     *
     * The ordering is important, since currently we do not have a weight
     * scheme. Adding weight is super important and should be done in the
     * next week or so, before this can be called complete.
     *
     * @return array array of importable Fields
     * @access public
     */
    function &importableFields( $contacType = 'Individual', $status = true ) 
    {
        if ( ! self::$_importableFields ) {
            if ( ! self::$_importableFields ) {
                self::$_importableFields = array();
            }

            if (!$status) {
                $fields = array( '' => array( 'title' => ts('- do not import -') ) );
            } else {
                $fields = array( '' => array( 'title' => ts('- Contribution Fields -') ) );
            }

            require_once 'CRM/Core/DAO/Note.php';
            $note          = CRM_Core_DAO_Note::import( );
            $tmpFields     = CRM_Contribute_DAO_Contribution::import( );
            unset($tmpFields['option_value']);
            require_once 'CRM/Core/OptionValue.php';
            $optionFields = CRM_Core_OptionValue::getFields($mode ='contribute' );
            require_once 'CRM/Contact/BAO/Contact.php';
            $contactFields = CRM_Contact_BAO_Contact::importableFields( $contacType, null );
            
            // Using new Dedupe rule.
            $ruleParams = array(
                                'contact_type' => $contacType,
                                'level' => 'Strict'
                                );
            require_once 'CRM/Dedupe/BAO/Rule.php';
            $fieldsArray = CRM_Dedupe_BAO_Rule::dedupeRuleFields($ruleParams);
            $tmpConatctField = array();
            if( is_array($fieldsArray) ) {
                foreach ( $fieldsArray as $value) {
                    //skip if there is no dupe rule
                    if ( $value == 'none' ) {
                        continue;
                    }
                    $customFieldId = CRM_Core_DAO::getFieldValue( 'CRM_Core_DAO_CustomField',
                                                                  $value,
                                                                  'id',
                                                                  'column_name' );
                    $value =  $customFieldId ? 'custom_'.$customFieldId : $value;
                    $tmpConatctField[trim($value)] = $contactFields[trim($value)];
                    if (!$status) {
                        $title = $tmpConatctField[trim($value)]['title']. ' '. ts('(match to contact)') ;
                    } else {
                        $title = $tmpConatctField[trim($value)]['title'];
                    }
                    $tmpConatctField[trim($value)]['title'] = $title;

                }
            }

            $tmpConatctField['external_identifier'] = $contactFields['external_identifier'];
            $tmpConatctField['external_identifier']['title'] = $contactFields['external_identifier']['title'] . ' '. ts('(match to contact)') ;
            $tmpFields['contribution_contact_id']['title']   = $tmpFields['contribution_contact_id']['title'] . ' '. ts('(match to contact)') ;
            $fields = array_merge($fields, $tmpConatctField);
            $fields = array_merge($fields, $tmpFields);
            $fields = array_merge($fields, $note);
            $fields = array_merge($fields, $optionFields);
            require_once 'CRM/Contribute/DAO/ContributionType.php';
            $fields = array_merge($fields, CRM_Contribute_DAO_ContributionType::export( ) );
            $fields = array_merge($fields, CRM_Core_BAO_CustomField::getFieldsForImport('Contribution'));
            self::$_importableFields = $fields;
        }
        return self::$_importableFields;
    }

    function &exportableFields( ) 
    {
        if ( ! self::$_exportableFields ) {
            if ( ! self::$_exportableFields ) {
                self::$_exportableFields = array();
            }
            require_once 'CRM/Core/OptionValue.php';
            require_once 'CRM/Contribute/DAO/Product.php';
            require_once 'CRM/Contribute/DAO/ContributionProduct.php';
            require_once 'CRM/Contribute/DAO/ContributionType.php';
            
            $impFields          = CRM_Contribute_DAO_Contribution::export( );
            $expFieldProduct    = CRM_Contribute_DAO_Product::export( );
            $expFieldsContrib   = CRM_Contribute_DAO_ContributionProduct::export( );
            $typeField          = CRM_Contribute_DAO_ContributionType::export( );
            $optionField        = CRM_Core_OptionValue::getFields($mode ='contribute' );
            $contributionStatus = array( 'contribution_status' => array( 'title'     => 'Contribution Status',
                                                                         'name'      => 'contribution_status',
                                                                         'data_type' => CRM_Utils_Type::T_STRING ) );
            
            $contributionNote   = array( 'contribution_note' => array( 'title'     => ts('Contribution Note'),
                                                                       'name'      => 'contribution_note',
                                                                       'data_type' => CRM_Utils_Type::T_TEXT ) );
            
            $contributionRecurId = array( 'contribution_recur_id' => array ( 'title' => ts('Recurring Contributions ID'),
                                                                             'name'  => 'contribution_recur_id',
                                                                             'where' => 'civicrm_contribution.contribution_recur_id',
                                                                             'data_type' => CRM_Utils_Type::T_INT ) );
            
            $campaign = array( 'contribution_campaign' => array( 'title' => ts( 'Campaign Title' ) ) );
            
            $fields = array_merge( $impFields, $typeField, $contributionStatus, $optionField, $expFieldProduct,
                                   $expFieldsContrib, $contributionNote, $contributionRecurId, $campaign, 
                                   CRM_Core_BAO_CustomField::getFieldsForImport('Contribution') );
            
            self::$_exportableFields = $fields;
        }
        return self::$_exportableFields;
    }

    function getTotalAmountAndCount( $status = null, $startDate = null, $endDate = null ) 
    {
        
        $where = array( );
        switch ( $status ) {
        case 'Valid':
            $where[] = 'contribution_status_id = 1';
            break;

        case 'Cancelled':
            $where[] = 'contribution_status_id = 3';
            break;
        }

        if ( $startDate ) {
            $where[] = "receive_date >= '" . CRM_Utils_Type::escape( $startDate, 'Timestamp' ) . "'";
        }
        if ( $endDate ) {
            $where[] = "receive_date <= '" . CRM_Utils_Type::escape( $endDate, 'Timestamp' ) . "'";
        }

        $whereCond = implode( ' AND ', $where );

        $query = "
    SELECT  sum( total_amount ) as total_amount, 
            count( civicrm_contribution.id ) as total_count, 
            currency
      FROM  civicrm_contribution
INNER JOIN  civicrm_contact contact ON ( contact.id = civicrm_contribution.contact_id ) 
     WHERE  $whereCond 
       AND  ( is_test = 0 OR is_test IS NULL )
       AND  contact.is_deleted = 0
  GROUP BY  currency
";

        $dao = CRM_Core_DAO::executeQuery( $query, CRM_Core_DAO::$_nullArray );
        $amount = array( );
        $count  = 0;
        require_once 'CRM/Utils/Money.php';
        while ( $dao->fetch( ) ) {
            $count    += $dao->total_count;
            $amount[]  = CRM_Utils_Money::format( $dao->total_amount, $dao->currency );
        }
        if ( $count ) {
            return array( 'amount' => implode( ', ', $amount ),
                          'count'  => $count );
        }
        return null;
    }

    /**                                                           
     * Delete the indirect records associated with this contribution first
     * 
     * @return $results no of deleted Contribution on success, false otherwise
     * @access public 
     * @static 
     */ 
    static function deleteContribution( $id ) 
    {
        require_once 'CRM/Utils/Hook.php';
        CRM_Utils_Hook::pre( 'delete', 'Contribution', $id, CRM_Core_DAO::$_nullArray );

        require_once 'CRM/Core/Transaction.php';
        $transaction = new CRM_Core_Transaction( );
        
        $results = null;
        //delete activity record
        require_once 'CRM/Activity/BAO/Activity.php';
        $params = array( 'source_record_id' => $id,
                         'activity_type_id' => 6 );// activity type id for contribution

        CRM_Activity_BAO_Activity::deleteActivity( $params );
        
        //delete billing address if exists for this contribution.
        self::deleteAddress( $id ); 
        
        //update pledge and pledge payment, CRM-3961
        require_once 'CRM/Pledge/BAO/Payment.php';
        CRM_Pledge_BAO_Payment::resetPledgePayment( $id );
        
        // remove entry from civicrm_price_set_entity, CRM-5095
        require_once 'CRM/Price/BAO/Set.php';
        if ( CRM_Price_BAO_Set::getFor( 'civicrm_contribution', $id ) ) {
            CRM_Price_BAO_Set::removeFrom( 'civicrm_contribution', $id );
        }
        // cleanup line items.
        require_once 'CRM/Price/BAO/Field.php';
        require_once 'CRM/Event/BAO/ParticipantPayment.php';
        $participantId = CRM_Core_DAO::getFieldValue( 'CRM_Event_DAO_ParticipantPayment', $id, 'participant_id' , 'contribution_id');

        // delete any related entity_financial_trxn and financial_trxn records.
        require_once 'CRM/Core/BAO/FinancialTrxn.php';
        CRM_Core_BAO_FinancialTrxn::deleteFinancialTrxn($id, 'civicrm_contribution');
        
        if ( $participantId ) { 
            require_once 'CRM/Price/BAO/LineItem.php';
            CRM_Price_BAO_LineItem::deleteLineItems( $participantId, 'civicrm_participant' );
        } else {
            require_once 'CRM/Price/BAO/LineItem.php';
            CRM_Price_BAO_LineItem::deleteLineItems( $id, 'civicrm_contribution' );
        }
        
        //delete note.
        require_once 'CRM/Core/BAO/Note.php';
        $note = CRM_Core_BAO_Note::getNote( $id, 'civicrm_contribution' );
        $noteId = key( $note );
        if ( $noteId ) {
            CRM_Core_BAO_Note::del( $noteId, false );
        }
        
        $dao     = new CRM_Contribute_DAO_Contribution( );
        $dao->id = $id;
             
        $results = $dao->delete( );
        
        $transaction->commit( );

        CRM_Utils_Hook::post( 'delete', 'Contribution', $dao->id, $dao );
 
        // delete the recently created Contribution
        require_once 'CRM/Utils/Recent.php';
        $contributionRecent = array(
                                    'id'   => $id,
                                    'type' => 'Contribution'
                                    );
        CRM_Utils_Recent::del( $contributionRecent );
        
        return $results;
    }
    
    /**
     * Check if there is a contribution with the same trxn_id or invoice_id
     *
     * @param array  $params (reference ) an assoc array of name/value pairs
     * @param array  $duplicates (reference ) store ids of duplicate contribs
     *
     * @return boolean true if duplicate, false otherwise
     * @access public
     * static
     */
    static function checkDuplicate( $input, &$duplicates, $id = null ) 
    {
        if ( ! $id ) {
            $id         = CRM_Utils_Array::value( 'id'        , $input );
        }
        $trxn_id    = CRM_Utils_Array::value( 'trxn_id'   , $input );
        $invoice_id = CRM_Utils_Array::value( 'invoice_id', $input );

        $clause = array( );
        $input = array( );

        if ( $trxn_id ) {
            $clause[]  = "trxn_id = %1";
            $input[1]  = array( $trxn_id, 'String' );
        }

        if ( $invoice_id ) {
            $clause[]  = "invoice_id = %2";
            $input[2]  = array( $invoice_id, 'String' );
        }

        if ( empty( $clause ) ) {
            return false;
        }

        $clause = implode( ' OR ', $clause );
        if ( $id ) {
            $clause   = "( $clause ) AND id != %3";
            $input[3] = array( $id, 'Integer' );
        }
        
        $query = "SELECT id FROM civicrm_contribution WHERE $clause";
        $dao =& CRM_Core_DAO::executeQuery( $query, $input );
        $result = false;
        while ( $dao->fetch( ) ) {
            $duplicates[] = $dao->id;
            $result = true;
        }
        return $result;
    }
    
    /**
     * takes an associative array and creates a contribution_product object
     *
     * the function extract all the params it needs to initialize the create a
     * contribution_product object. the params array could contain additional unused name/value
     * pairs
     *
     * @param array  $params (reference ) an assoc array of name/value pairs
     *
     * @return object CRM_Contribute_BAO_ContributionProduct object
     * @access public
     * @static
     */
    static function addPremium ( &$params ) 
    {

        require_once 'CRM/Contribute/DAO/ContributionProduct.php';
        $contributionProduct = new CRM_Contribute_DAO_ContributionProduct();
        $contributionProduct->copyValues($params);
        return $contributionProduct->save();
    }

    /**
     * Function to get list of contribution fields for profile
     * For now we only allow custom contribution fields to be in
     * profile
     *
     * @return return the list of contribution fields
     * @static
     * @access public
     */
    static function getContributionFields( ) 
    {
        $contributionFields =& CRM_Contribute_DAO_Contribution::export( );
        require_once 'CRM/Core/OptionValue.php';
        $contributionFields = array_merge( $contributionFields, CRM_Core_OptionValue::getFields($mode ='contribute' ) );
        require_once 'CRM/Contribute/DAO/ContributionType.php';
        $contributionFields = array_merge( $contributionFields, CRM_Contribute_DAO_ContributionType::export( ) );
        
        foreach ($contributionFields as $key => $var) {
            if ($key == 'contribution_contact_id') {
                continue;
            } else if ( $key == 'contribution_campaign_id' ) {
                $var['title'] = ts( 'Campaign' );
            }
            $fields[$key] = $var;
        }

        $fields = array_merge($fields, CRM_Core_BAO_CustomField::getFieldsForImport('Contribution'));
        return $fields;
    }

    static function getCurrentandGoalAmount( $pageID ) 
    {
        $query = "
SELECT p.goal_amount as goal, sum( c.total_amount ) as total
  FROM civicrm_contribution_page p,
       civicrm_contribution      c
 WHERE p.id = c.contribution_page_id
   AND p.id = %1
   AND c.cancel_date is null
GROUP BY p.id
";

        $config = CRM_Core_Config::singleton( );
        $params = array( 1 => array( $pageID, 'Integer' ) );
        $dao =& CRM_Core_DAO::executeQuery( $query, $params );
        
        if ( $dao->fetch( ) ) {
            return array( $dao->goal, $dao->total );
        } else {
            return array( null, null );
        }
    }

    /**
     * Function to create is honor of
     * 
     * @param array $params  associated array of fields (by reference)
     * @param int   $honorId honor Id
     *
     * @return contact id
     */
    function createHonorContact( &$params, $honorId = null ) 
    {
        $honorParams = array( 'first_name'    => $params['honor_first_name'],
                              'last_name'     => $params['honor_last_name'], 
                              'prefix_id'     => $params['honor_prefix_id'],
                              'email-Primary' => $params['honor_email'] );
        if ( !$honorId ) {
            require_once 'CRM/Core/BAO/UFGroup.php';
            $honorParams['email'] = $params['honor_email'];

            require_once 'CRM/Dedupe/Finder.php';
            $dedupeParams = CRM_Dedupe_Finder::formatParams($honorParams, 'Individual');
            $dedupeParams['check_permission'] = false;
            $ids = CRM_Dedupe_Finder::dupesByParams($dedupeParams, 'Individual');

            // if we find more than one contact, use the first one
            $honorId  = CRM_Utils_Array::value( 0, $ids );
        }
         
        $contact =& CRM_Contact_BAO_Contact::createProfileContact( $honorParams,
                                                                   CRM_Core_DAO::$_nullArray,
                                                                   $honorId );
        return $contact;
    }
    
    /**
     * Function to get list of contribution In Honor of contact Ids
     *
     * @param int $honorId In Honor of Contact ID
     *
     * @return return the list of contribution fields
     * 
     * @access public
     * @static
     */
    static function getHonorContacts( $honorId )
    {
        $params=array( );
        require_once 'CRM/Contribute/DAO/Contribution.php';
        $honorDAO = new CRM_Contribute_DAO_Contribution();
        $honorDAO->honor_contact_id =  $honorId;
        $honorDAO->find( );

        require_once 'CRM/Contribute/PseudoConstant.php';
        $status = CRM_Contribute_Pseudoconstant::contributionStatus($honorDAO->contribution_status_id);
        $type   = CRM_Contribute_Pseudoconstant::contributionType();
        
        while( $honorDAO->fetch( ) ) {
            $params[$honorDAO->id]['honorId']      = $honorDAO->contact_id;            
            $params[$honorDAO->id]['display_name'] = CRM_Core_DAO::getFieldValue( 'CRM_Contact_DAO_Contact', $honorDAO->contact_id, 'display_name' );
            $params[$honorDAO->id]['type']         = $type[$honorDAO->contribution_type_id];
            $params[$honorDAO->id]['type_id']      = $honorDAO->contribution_type_id;
            $params[$honorDAO->id]['amount']       = CRM_Utils_Money::format( $honorDAO->total_amount , $honorDAO->currency );
            $params[$honorDAO->id]['source']       = $honorDAO->source;
            $params[$honorDAO->id]['receive_date'] = $honorDAO->receive_date;
            $params[$honorDAO->id]['contribution_status']= CRM_Utils_Array::value($honorDAO->contribution_status_id, $status);
        }

        return $params;
    }

    /**
     * function to get the sort name of a contact for a particular contribution
     *
     * @param  int    $id      id of the contribution
     *
     * @return null|string     sort name of the contact if found
     * @static
     * @access public
     */
    static function sortName( $id ) 
    {
        $id = CRM_Utils_Type::escape( $id, 'Integer' );

        $query = "
SELECT civicrm_contact.sort_name
FROM   civicrm_contribution, civicrm_contact
WHERE  civicrm_contribution.contact_id = civicrm_contact.id
  AND  civicrm_contribution.id = {$id}
";
        return CRM_Core_DAO::singleValueQuery( $query, CRM_Core_DAO::$_nullArray );
    }

    static function annual( $contactID ) {
        if ( is_array( $contactID ) ) {
            $contactIDs = implode( ',', $contactID );
        } else {
            $contactIDs = $contactID;
        }

        $config = CRM_Core_Config::singleton( );
        $startDate = $endDate = null;

        $currentMonth = date( 'm' );
        $currentDay   = date( 'd' );
        if ( (int ) $config->fiscalYearStart['M']  > $currentMonth ||
             ( (int ) $config->fiscalYearStart['M'] == $currentMonth &&
               (int ) $config->fiscalYearStart['d'] > $currentDay ) ) {
            $year     = date( 'Y' ) - 1;
        } else {
            $year     = date( 'Y' );
        }
        $nextYear = $year + 1;

        if ( $config->fiscalYearStart ) {
            if ( $config->fiscalYearStart['M'] < 10 ) {
                $config->fiscalYearStart['M'] = '0' . $config->fiscalYearStart['M'];
            }
            if ( $config->fiscalYearStart['d'] < 10 ) {
                $config->fiscalYearStart['d'] = '0' . $config->fiscalYearStart['d'];
            }
            $monthDay = $config->fiscalYearStart['M'] . $config->fiscalYearStart['d'];
        } else {
            $monthDay = '0101';
        }
        $startDate = "$year$monthDay";
        $endDate   = "$nextYear$monthDay";

        $query = "
SELECT count(*) as count,
       sum(total_amount) as amount,
       avg(total_amount) as average,
       currency
  FROM civicrm_contribution b
 WHERE b.contact_id IN ( $contactIDs )
   AND b.contribution_status_id = 1
   AND b.is_test = 0
   AND b.receive_date >= $startDate
   AND b.receive_date <  $endDate
GROUP BY currency
";
        $dao =& CRM_Core_DAO::executeQuery( $query, CRM_Core_DAO::$_nullArray );
        $count = 0;
        $amount = $average = array( );
        require_once 'CRM/Utils/Money.php';
        while ( $dao->fetch( ) ) {
            if ( $dao->count > 0 && $dao->amount > 0) {
                $count += $dao->count;
                $amount[]  = CRM_Utils_Money::format( $dao->amount , $dao->currency );
                $average[] = CRM_Utils_Money::format( $dao->average, $dao->currency );
            }
        }
        if ( $count > 0 ) {
            return array( $count,
                          implode( ',&nbsp;', $amount  ),
                          implode( ',&nbsp;', $average ) );
        }
        return array( 0, 0, 0 );
    }

    /**
     * Check if there is a contribution with the params passed in.
     * Used for trxn_id,invoice_id and contribution_id
     *
     * @param array  $params (reference ) an assoc array of name/value pairs
     *
     * @return array contribution id if success else NULL
     * @access public
     * static
     */
    static function checkDuplicateIds( $params ) 
    {
        $dao = new CRM_Contribute_DAO_Contribution();
        
        $clause = array( );
        $input = array( );
        foreach ( $params as $k=>$v ) {
            if( $v ) {
                $clause[]  = "$k = '$v'";                
            } 
        }
        $clause = implode( ' AND ', $clause );
        $query = "SELECT id FROM civicrm_contribution WHERE $clause";
        $dao =& CRM_Core_DAO::executeQuery( $query, $input );
       
        while ( $dao->fetch( ) ) {
            $result = $dao->id;
            return $result;            
        }
        return NULL;        
    }

    /**
     * Function to get the contribution details for component export
     *
     * @param int     $exportMode export mode
     * @param string  $componentIds  component ids
     *
     * @return array associated array
     *
     * @static
     * @access public
     */
    static function getContributionDetails( $exportMode, $componentIds )
    {
        require_once 'CRM/Export/Form/Select.php';

        $paymentDetails = array( );
        $componentClause = ' IN ( ' . implode( ',', $componentIds ) . ' ) ';
        
        if ( $exportMode == CRM_Export_Form_Select::EVENT_EXPORT ) {
            $componentSelect = " civicrm_participant_payment.participant_id id"; 
            $additionalClause = "
INNER JOIN civicrm_participant_payment ON (civicrm_contribution.id = civicrm_participant_payment.contribution_id
AND civicrm_participant_payment.participant_id {$componentClause} )
";
        } else if ( $exportMode == CRM_Export_Form_Select::MEMBER_EXPORT ) {
            $componentSelect = " civicrm_membership_payment.membership_id id"; 
            $additionalClause = "
INNER JOIN civicrm_membership_payment ON (civicrm_contribution.id = civicrm_membership_payment.contribution_id
AND civicrm_membership_payment.membership_id {$componentClause} )
";
        } else if ( $exportMode == CRM_Export_Form_Select::PLEDGE_EXPORT ) {
            $componentSelect = " civicrm_pledge_payment.id id"; 
            $additionalClause = "
INNER JOIN civicrm_pledge_payment ON (civicrm_contribution.id = civicrm_pledge_payment.contribution_id
AND civicrm_pledge_payment.pledge_id {$componentClause} )
";
        }
        
        $query = " SELECT total_amount, contribution_status.name as status_id, contribution_status.label as status, payment_instrument.name as payment_instrument, receive_date,
                          trxn_id, {$componentSelect}
FROM civicrm_contribution 
LEFT JOIN civicrm_option_group option_group_payment_instrument ON ( option_group_payment_instrument.name = 'payment_instrument')
LEFT JOIN civicrm_option_value payment_instrument ON (civicrm_contribution.payment_instrument_id = payment_instrument.value
     AND option_group_payment_instrument.id = payment_instrument.option_group_id )
LEFT JOIN civicrm_option_group option_group_contribution_status ON (option_group_contribution_status.name = 'contribution_status')
LEFT JOIN civicrm_option_value contribution_status ON (civicrm_contribution.contribution_status_id = contribution_status.value 
                               AND option_group_contribution_status.id = contribution_status.option_group_id )
{$additionalClause}
";

        $dao =& CRM_Core_DAO::executeQuery( $query, CRM_Core_DAO::$_nullArray );

        while ( $dao->fetch() ) {
            $paymentDetails[$dao->id] = array ( 'total_amount'        => $dao->total_amount,
                                                'contribution_status' => $dao->status,
                                                'receive_date'        => $dao->receive_date,
                                                'pay_instru'          => $dao->payment_instrument,
                                                'trxn_id'             => $dao->trxn_id );
        }

        return $paymentDetails;
    }

    /**
     *  Function to create address associated with contribution record.
     *  @param array $params an associated array 
     *  @param int   $billingID $billingLocationTypeID  
     *
     *  @return address id
     *  @static
     */
    static function createAddress( &$params, $billingLocationTypeID ) 
    {
        $billingFields = array( 'street_address',
                                'city',
                                'state_province_id',
                                'postal_code',
                                'country_id'
                                );

        //build address array 
        $addressParams = array( );
        $addressParams['location_type_id'] = $billingLocationTypeID;
        $addressParams['is_billing'] = 1;
        $addressParams['address_name'] = "{$params['billing_first_name']}" . CRM_Core_DAO::VALUE_SEPARATOR . "{$params['billing_middle_name']}" . CRM_Core_DAO::VALUE_SEPARATOR . "{$params['billing_last_name']}";
        
        foreach ( $billingFields as $value ) {
            $addressParams[$value] = $params["billing_{$value}-{$billingLocationTypeID}"];
        }

        require_once 'CRM/Core/BAO/Address.php';
        $address = CRM_Core_BAO_Address::add( $addressParams, false );

        return $address->id;
    }
    
    /**
     *  Function to create soft contributon with contribution record.
     *  @param array $params an associated array 
     *
     *  @return soft contribution id
     *  @static
     */
    static function addSoftContribution( $params ) 
    { 
        require_once 'CRM/Contribute/DAO/ContributionSoft.php';
        $softContribution = new CRM_Contribute_DAO_ContributionSoft();
        $softContribution->copyValues($params);

    	// set currency for CRM-1496
    	if ( ! isset( $softContribution->currency ) ) {
    	  $config =& CRM_Core_Config::singleton( );
    	  $softContribution->currency = $config->defaultCurrency;
    	}

        return $softContribution->save();
    } 
    
    
    /**
     *  Function to retrieve soft contributon for contribution record.
     *  @param array $params an associated array 
     *
     *  @return soft contribution id
     *  @static
     */
    static function getSoftContribution( $params, $all = false )
    { 
        require_once 'CRM/Contribute/DAO/ContributionSoft.php';

        $cs = new CRM_Contribute_DAO_ContributionSoft( );
        $cs->copyValues( $params );
        $softContribution = array();
        if ( $cs->find(true) ) {
            if ( $all ){
                foreach ( array ('pcp_id','pcp_display_in_roll', 'pcp_roll_nickname', 'pcp_personal_note' ) as $key=>$val ) {
                    $softContribution[$val] = $cs->$val;
                }
            }
            $softContribution['soft_credit_to'] = $cs->contact_id;
            $softContribution['soft_credit_id'] = $cs->id;
        }
        return $softContribution;
    }
    
    /**
     *  Function to retrieve the list of soft contributons for given contact.
     *  @param int $contact_id contact id 
     *
     *  @return array
     *  @static
     */
    static function getSoftContributionList( $contact_id, $isTest = 0 )
    { 
        $query = "SELECT ccs.id, ccs.amount as amount,
                         ccs.contribution_id, 
                         ccs.pcp_id,
                         ccs.pcp_display_in_roll,
                         ccs.pcp_roll_nickname,
                         ccs.pcp_personal_note,
                         cc.receive_date,
                         cc.contact_id as contributor_id,
                         cc.contribution_status_id as contribution_status_id,
                         cp.title as pcp_title,
                         cc.currency,
                         contact.display_name,
                         cct.name as contributionType
                  FROM civicrm_contribution_soft ccs
                       LEFT JOIN civicrm_contribution cc
                              ON ccs.contribution_id = cc.id
                       LEFT JOIN civicrm_pcp cp 
                              ON ccs.pcp_id = cp.id
                       LEFT JOIN civicrm_contact contact
                              ON ccs.contribution_id = cc.id AND
                                 cc.contact_id = contact.id 
                       LEFT JOIN civicrm_contribution_type cct
                              ON cc.contribution_type_id = cct.id
                  WHERE cc.is_test = {$isTest} AND ccs.contact_id = " . $contact_id;
       
        $cs = CRM_Core_DAO::executeQuery( $query, CRM_Core_DAO::$_nullArray );
        require_once 'CRM/Contribute/PseudoConstant.php';
        $contributionStatus = CRM_Contribute_Pseudoconstant::contributionStatus( );
        $result = array();
        while( $cs->fetch( ) ) {
            $result[$cs->id]['amount']            = $cs->amount;
            $result[$cs->id]['currency']          = $cs->currency;
            $result[$cs->id]['contributor_id']    = $cs->contributor_id;
            $result[$cs->id]['contribution_id']   = $cs->contribution_id;
            $result[$cs->id]['contributor_name']  = $cs->display_name;
            $result[$cs->id]['contribution_type'] = $cs->contributionType;
            $result[$cs->id]['receive_date']      = $cs->receive_date;
            $result[$cs->id]['pcp_id']            = $cs->pcp_id;
            $result[$cs->id]['pcp_title']         = $cs->pcp_title;
            $result[$cs->id]['pcp_display_in_roll'] = $cs->pcp_display_in_roll;
            $result[$cs->id]['pcp_roll_nickname'] = $cs-…

Large files files are truncated, but you can click here to view the full file