ding_debt.module

<?php
/**
 * @file
 * Handles display and creation/deletion of debts for users.
 */

/**
 * Implements hook_ctools_plugin_directory().
 *
 * It simply tells panels where to find the .inc files that define various
 * args, contexts, content_types. In this case the subdirectories of
 * ctools_plugin_example/panels are used.
 */
function ding_debt_ctools_plugin_directory($module, $plugin) {
  if ($module == 'ctools' && !empty($plugin)) {
    return 'plugins/' . $plugin;
  }
}

/**
 * Implements hook_ding_provider_user().
 */
function ding_debt_ding_provider_user() {
  return array(
    'debt' => array(
      'required' => TRUE,
    ),
    'payment' => array(
      'required' => TRUE,
    ),
  );
}

/**
 * Callback for successful payment transaction.
 */
function ding_debt_payment_callback($transaction) {
  $result = ding_provider_invoke_page(
    'debt',
    'payment_received',
    $transaction['payment_price'],
    $transaction['params'],
    $transaction['payment_order_id']
  );
  module_invoke_all('ding_debt_payment_received');
  return $result;
}

/**
 * Implements a drupal form, which implements a pay button and debts data.
 */
function ding_debt_debts_form($form, &$form_state, $debts = array()) {
  $header = array(
    'date' => t('Date'),
    'did' => t('Id'),
    'title' => t('Title'),
    'type' => t('Type'),
    'amount' => t('Amount'),
  );
  $options = array();
  $invoices = array();
  $default = array();
  $total_amount = 0;

  foreach ($debts as $id => $debt) {
    if (!$debt->invoice_number) {
      $note = explode('  ', $debt->note);
      // @todo Need default value for item.
      $title = !empty($note[1]) ? $note[1] : NULL;
      $total_amount += $debt->amount;
      $total_amount -= $debt->amount_paid;
      $options[$id] = array(
        'did' => $id,
        'title' => $title,
        'type' => ding_debt_get_debt_type_name($debt->type),
        'date' => $debt->date,
        'amount' => $debt->amount,
      );
      $default[$id] = $id;
    }
    else {
      $invoices[$id] = array(
        'date' => $debt->date,
        'did' => $id,
        'title' => t('Incasso'),
        'type' => ding_debt_get_debt_type_name($debt->type),
        'amount' => $debt->amount,
      );
    }
  }

  $form['select_table'] = array(
    '#type' => 'tableselect',
    '#header' => $header,
    '#options' => $options,
    '#default_value' => $default,
    '#empty' => t('No debts found'),
  );

  if ($invoices) {
    $form['invoice_table'] = array(
      '#type' => 'item',
      '#theme' => 'table',
      '#header' => $header,
      '#rows' => $invoices,
      '#empty' => t('No debts found'),
      '#description' => t("* Invoiced fees can't be paid online."),
    );
  }

  $form['debt_data'] = array(
    '#type' => 'value',
    '#value' => $debts,
  );

  $form['pay'] = array(
    '#type' => 'submit',
    '#prefix' => '<div class="pay-button">',
    '#value' => t('Pay debts'),
    '#suffix' => '</div>',
  );

  return $form;
}

/**
 * Submit handler for the form.
 */
function ding_debt_debts_form_submit($form, &$form_state) {
  $amount = 0;
  $debts = array_filter($form_state['input']['select_table']);
  foreach ($debts as $debt_id => $debt_data) {
    if (isset($form_state['input']['select_table'][$debt_id])) {
      if (!$form_state['values']['debt_data'][$debt_id]->invoice_number) {
        $amount += $form_state['values']['debt_data'][$debt_id]->amount;
        $amount -= $form_state['values']['debt_data'][$debt_id]->amount_paid;
      }
      else {
        unset($debts[$debt_id]);
      }
    }
  }
  if ($amount > 0) {
    $params = array('params' => array('debt_ids' => array_keys($debts), 'debts' => $debts));

    $url = ding_provider_invoke('payment', 'get_url', $amount, $params, 'ding_debt_payment_callback');

    if ($url) {
      $form_state['redirect'] = $url;
    }
  }
}

/**
 * Convert debt type into a human readable text.
 */
function ding_debt_get_debt_type_name($type) {
  $result = NULL;
  switch ($type) {
    case 'deleteReservationFeeDebt':
      $result = t('Detele reservation fee');
      break;

    case 'emailReminderFeeDebt':
      $result = t('Email reminder fee');
      break;

    case 'illFeeDebt':
      $result = t('Ill fee');
      break;

    case 'illReservationFeeDebt':
      $result = t('Ill reservation fee');
      break;

    case 'loanFeeDebt':
      $result = t('Loan fee');
      break;

    case 'messageFeeDebt':
      $result = t('Message fee');
      break;

    case 'overdueFeeDebt':
      $result = t('Overdue fee');
      break;

    case 'overdueFeeInvoiceDebt':
      $result = t('Overdue fee invoice');
      break;

    case 'photocopyFeeDebt':
      $result = t('Photocopy fee');
      break;

    case 'renewFeeDebt':
      $result = t('Renew fee');
      break;

    case 'replacementFeeDebt':
      $result = t('Replacement fee');
      break;

    case 'reservationFeeDebt':
      $result = t('Reservation fee');
      break;

    case 'reservationPickupFeeDebt':
      $result = t('Reservation pickup fee');
      break;

    case 'smsIllFeeDebt':
      $result = t('SMS Ill fee');
      break;

    case 'smsRecall1FeeDebt':
    case 'smsRecall2FeeDebt':
    case 'smsRecall3FeeDebt':
    case 'smsRecall4FeeDebt':
    case 'smsRecall5FeeDebt':
      $result = t('SMS recall fee');
      break;

    case 'smsReminderFeeDebt':
      $result = t('SMS Reminder fee');
      break;

    case 'smsReservationFeeDebt':
      $result = t('SMS reservation fee');
      break;

    case 'otherFeeDebt':
    default:
      $result = t('Other fee');
  }
  return $result;
}