$link) { if ($link['name'] == 'Edit') { unset($links[$key]); } } } } } /** * Implements hook_civicrm_pre(). * * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_pre */ function batchexportperm_civicrm_pre($op, $objectName, $id, &$params) { if ($op == 'edit' && $objectName == 'Contribution') { _batchexportperm_civicrm_check_permission($id); } if ($objectName == 'Batch' && $op == 'edit') { if (!empty($params['status_id'])) { $exportedStatusId = CRM_Core_PseudoConstant::getKey('CRM_Batch_BAO_Batch', 'status_id', 'Exported'); if ($exportedStatusId != $params['status_id']) { return NULL; } $oldStatusId = civicrm_api3('Batch', 'getvalue', [ 'return' => "status_id", 'id' => $id, ]); if ($oldStatusId != $params['status_id']) { CRM_Core_Smarty::singleton()->assign("batch_status_change_{$id}", TRUE); } } } } /** * Implements hook_civicrm_apiWrappers(). * * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_apiWrappers */ function batchexportperm_civicrm_apiWrappers(&$wrappers, $apiRequest) { if ($apiRequest['entity'] == 'Contribution' && $apiRequest['action'] == 'create') { $contibutionId = CRM_Utils_Array::value('id', $apiRequest['params']); _batchexportperm_civicrm_check_permission($contibutionId, 'exception'); } } /** * Implements hook_civicrm_preProcess(). * * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_preProcess */ function batchexportperm_civicrm_preProcess($formName, &$form) { if ($formName == 'CRM_Contribute_Form_Contribution' && $form->_action & CRM_Core_Action::UPDATE) { $contributionId = $form->_id; _batchexportperm_civicrm_check_permission($contributionId); } } /** * Check if user has permission to update contribution. * * @param int $contributionId * @param string $errorType */ function _batchexportperm_civicrm_check_permission($contributionId, $errorType = NULL) { if (empty($contributionId) || _batchexportperm_civicrm_allow_contribution_to_edit($contributionId)) { return FALSE; } $message = ts('You do not have the necessary permission to edit this contribution.'); if ($errorType == 'exception') { throw new API_Exception($message); } else { CRM_Core_Error::statusBounce($message); } } /** * Check if user has permission to update contribution. * * @param int $contributionId */ function _batchexportperm_civicrm_allow_contribution_to_edit($contributionId) { // See if the contribution has been exported. // Man, I wish API4 actually worked. $query = "SELECT ceft.entity_id " . "FROM civicrm_entity_batch ceb " . "JOIN civicrm_batch cb on ceb.batch_id = cb.id AND ceb.entity_table = 'civicrm_financial_trxn' " . "JOIN civicrm_entity_financial_trxn ceft ON ceft.entity_table = 'civicrm_contribution' AND ceb.entity_id = ceft.financial_trxn_id " . "JOIN civicrm_option_value cov on cov.value = cb.status_id AND cov.label = 'Exported' " . "JOIN civicrm_option_group cog ON cov.option_group_id = cog.id AND cog.name = 'batch_status' " . "WHERE ceft.entity_id = %1"; $params = [1 => [$contributionId, 'Integer']]; $dao = CRM_Core_DAO::executeQuery($query, $params); if ($dao->N === 0 || CRM_Core_Permission::check('edit exported contributions')) { return TRUE; } return FALSE; } /** * Implements hook_civicrm_post(). * * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_post */ function batchexportperm_civicrm_post($op, $objectName, $objectId, &$objectRef) { if ($objectName == 'Batch' && $op == 'edit') { if (CRM_Core_Smarty::singleton()->get_template_vars("batch_status_change_{$objectId}")) { _batchexportperm_civicrm_update_contribution_exporteddate($objectId); CRM_Core_Smarty::singleton()->assign("batch_status_change_{$objectId}", FALSE); } } } /** * Display batch eport info on the contribution. * * @link http://wiki.civicrm.org/confluence/display/CRMDOC/hook_civicrm_buildForm */ function batchexportperm_civicrm_buildForm($formName, $form) { if (in_array($formName, ['CRM_Contribute_Form_ContributionView', 'CRM_Contribute_Form_Contribution']) && !empty($form->_id)) { $temp = $form->_id; $temp2 = } }