From: ethem <ethem>
Date: Fri, 17 Nov 2006 08:21:11 +0000 (+0000)
Subject: Business checks can be refunded. Point a flag for it. The cclastfour field will be... 
X-Git-Url: http://git.mjollnir.org/gw?a=commitdiff_plain;h=4df4b15524e4d2e257c4f7abade8cc4afb2a00a0;p=moodle.git

Business checks can be refunded. Point a flag for it. The cclastfour field will be renamed to refundinfo later. Merged from 17stable.
---

diff --git a/enrol/authorize/enrol.php b/enrol/authorize/enrol.php
index c94b6b153d..03c71e132c 100755
--- a/enrol/authorize/enrol.php
+++ b/enrol/authorize/enrol.php
@@ -312,12 +312,13 @@ class enrolment_plugin_authorize
 
         $useripno = getremoteaddr();
         $curcost = get_course_cost($course);
+        $isbusinesschecking = ($form->acctype == 'BUSINESSCHECKING');
 
         // NEW ECHECK ORDER
         $timenow = time();
         $order = new stdClass();
         $order->paymentmethod = AN_METHOD_ECHECK;
-        $order->cclastfour = 0;
+        $order->cclastfour = $isbusinesschecking ? 1 : 0;
         $order->ccname = $form->firstname . ' ' . $form->lastname;
         $order->courseid = $course->id;
         $order->userid = $USER->id;
@@ -338,7 +339,7 @@ class enrolment_plugin_authorize
         $extra->x_bank_aba_code = $form->abacode;
         $extra->x_bank_acct_num = $form->accnum;
         $extra->x_bank_acct_type = $form->acctype;
-        $extra->x_echeck_type = ($form->acctype == 'BUSINESSCHECKING') ? 'CCD' : 'WEB';
+        $extra->x_echeck_type = $isbusinesschecking ? 'CCD' : 'WEB';
         $extra->x_bank_name = $form->bankname;
         $extra->x_currency_code = $curcost['currency'];
         $extra->x_amount = $curcost['cost'];