moodle/enrol/authorize/config_form.php

<?php //  $Id$

if (!isset($frm->enrol_cost)) $frm->enrol_cost = '5';
if (!isset($frm->enrol_currency)) $frm->enrol_currency = 'USD';
if (!isset($frm->enrol_mailstudents)) $frm->enrol_mailstudents = '';
if (!isset($frm->enrol_mailteachers)) $frm->enrol_mailteachers = '';
if (!isset($frm->enrol_mailadmins)) $frm->enrol_mailadmins = '';

if (!isset($frm->an_login)) $frm->an_login = '';
if (!isset($frm->an_tran_key)) $frm->an_tran_key = '';
if (!isset($frm->an_password)) $frm->an_password = '';
if (!isset($frm->delete_current)) $frm->delete_current = '';
if (!isset($frm->an_referer)) $frm->an_referer = 'http://';
if (!isset($frm->an_avs)) $frm->an_avs = '';
if (!isset($frm->an_authcode)) $frm->an_authcode = '';
if (!isset($frm->an_test)) $frm->an_test = '';
if (!isset($frm->an_review)) $frm->an_review = '';
if (!isset($frm->an_capture_day)) $frm->an_capture_day = '5';
if (!isset($frm->an_emailexpired)) $frm->an_emailexpired = '2';
if (!isset($frm->an_emailexpiredteacher)) $frm->an_emailexpiredteacher = '';
if (!isset($frm->an_sorttype)) $frm->an_sorttype = 'ttl';

if (isset($CFG->an_cutoff)) {
    $cutoff = intval($CFG->an_cutoff);
    $mins = $cutoff % 60; $hrs = ($cutoff - $mins) / 60;
    $frm->an_cutoff_hour = $hrs; $frm->an_cutoff_min = $mins;
}
if (!isset($frm->an_cutoff_hour)) {
    $timezone = format_float(get_user_timezone_offset(), 1);
    $frm->an_cutoff_hour = intval($timezone);
    $frm->an_cutoff_min = (intval(round($timezone)) != intval($timezone)) ? 35 : 5;
}

if (!isset($frm->acceptmethods)) {
    $frm->acceptmethods = get_list_of_payment_methods();
    $CFG->an_acceptmethods = implode(',', $frm->acceptmethods);
}

if (!isset($frm->acceptccs)) {
    $frm->acceptccs = array_keys(get_list_of_creditcards());
    $CFG->an_acceptccs = implode(',', $frm->acceptccs);
}

if (!isset($frm->acceptechecktypes)) {
    $frm->acceptechecktypes = get_list_of_bank_account_types();
    $CFG->an_acceptechecktypes = implode(',', $frm->acceptechecktypes);
}

?>

<table cellspacing="0" cellpadding="5" border="0" align="center">

<tr valign="top">
    <td colspan="2" align="right"><a href="../enrol/authorize/index.php"><?php print_string("paymentmanagement", "enrol_authorize") ?></a></td>
</tr>

<tr valign="top"><td colspan="2"><h4><?php print_string("adminauthorizewide", "enrol_authorize") ?></h4></td></tr>

<tr valign="top">
    <td align="right">enrol_cost:</td>
    <td><input type="text" size="5" name="enrol_cost" value="<?php p($frm->enrol_cost) ?>" /><br />
        <?php print_string("costdefault") ?>. <?php print_string("costdefaultdesc", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">enrol_currency:</td>
    <td><?php choose_from_menu(get_list_of_currencies(), "enrol_currency", $frm->enrol_currency, "","", "") ?><br />
        <?php print_string("currency") ?>
    </td>
</tr>

<?php if (substr($CFG->wwwroot, 0, 5) !== 'https') { /* https && loginhttps */ ?>
<tr valign="top">
    <td align="right">loginhttps:</td>
    <td><?php
          echo (empty($CFG->loginhttps) ? "<font color=\"red\"><b>off</b></font>" : "<font color=\"green\">on</font>");
          $a->url = "$CFG->wwwroot/$CFG->admin/settings.php?section=httpsecurity";
          echo '<br />'; print_string("logindesc", "enrol_authorize", $a);
        ?>
    </td>
</tr>
<?php } /* end: https && loginhttps */ ?>

<tr valign="top"><td colspan="2"><h4><?php print_string("adminauthorizesettings", "enrol_authorize") ?></h4></td></tr>

<tr valign="top">
    <td align="right">an_login:</td>
    <td><input type="text" name="an_login" value="<?php p($frm->an_login) ?>" /><br />
        <?php print_string("anlogin", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">#&nbsp;#&nbsp;</td>
    <td><?php print_string("chooseone", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_tran_key:</td>
    <td><input type="text" name="an_tran_key" value="<?php p($frm->an_tran_key) ?>" /><sup>#1</sup><br />
        <?php print_string("antrankey", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_password:</td>
    <td><input type="text" name="an_password" value="" /><sup>#2</sup><br />
        <?php print_string("anpassword", "enrol_authorize") ?><br />(<?php print_string("leavetokeep") ?>)</td>
</tr>

<tr valign="top">
    <td align="right">delete_current:</td>
    <td><?php print_checkbox('delete_current', '1', !empty($frm->delete_current)) ?> <br />
        <?php print_string("deletecheck", "moodle", get_string('oldpassword')) ?><br /><br /></td>
</tr>

<tr valign="top">
    <td align="right">an_referer:</td>
    <td><input type="text" name="an_referer" value="<?php p($frm->an_referer) ?>" /><br />
        <?php print_string("anreferer", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_cutoff:</td>
    <td><?php print_time_selector("an_cutoff_hour","an_cutoff_min",make_timestamp(2000,1,1,$frm->an_cutoff_hour,$frm->an_cutoff_min),5); ?><br />
        <?php print_string("cutofftime", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_avs:</td>
    <td><?php print_checkbox('an_avs', '1', !empty($frm->an_avs)) ?><br />
        <?php print_string("adminavs", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_authcode:</td>
    <td><?php print_checkbox('an_authcode', '1', !empty($frm->an_authcode)) ?>
        <?php helpbutton('authcode', '', 'enrol/authorize'); ?><br />
        <?php print_string("adminauthcode", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_test:</td>
    <td><?php print_checkbox('an_test', '1', !empty($frm->an_test)) ?><br />
        <?php print_string("antestmode", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">accepts:</td>
    <td><?php print_string("adminaccepts", "enrol_authorize") ?><br /><br /><?php
    $paymentmethodsenabled = get_list_of_payment_methods();
    $allpaymentmethods = get_list_of_payment_methods(true);
    foreach ($allpaymentmethods as $key) {
        if ($key == AN_METHOD_CC) {
            print_checkbox('acceptmethods[]', AN_METHOD_CC, in_array(AN_METHOD_CC, $paymentmethodsenabled), get_string('method'.AN_METHOD_CC,'enrol_authorize'));
            echo("<blockquote>");
            $acceptedccs = array_keys(get_list_of_creditcards());
            $allccs = get_list_of_creditcards(true);
            foreach ($allccs as $key => $val) {
                print_checkbox('acceptccs[]', $key, in_array($key, $acceptedccs), $val); echo "<br />\n";
            }
            echo("</blockquote>");
        }
        elseif ($key == AN_METHOD_ECHECK) {
            print_checkbox('acceptmethods[]', AN_METHOD_ECHECK, in_array(AN_METHOD_ECHECK, $paymentmethodsenabled), get_string('method'.AN_METHOD_ECHECK,'enrol_authorize'));
            echo("<blockquote>");
            $echecktypesenabled = get_list_of_bank_account_types();
            $allechecktypes = get_list_of_bank_account_types(true);
            foreach ($allechecktypes as $key) {
                print_checkbox('acceptechecktypes[]', $key, in_array($key, $echecktypesenabled), get_string('echeck'.strtolower($key),'enrol_authorize')); echo "<br />\n";
            }
            echo("</blockquote>");
        }
    }
    ?><br /></td>
</tr>

<tr valign="top"><td colspan="2"><h4><?php print_string("adminauthorizeccapture", "enrol_authorize") ?>
                                     <?php helpbutton('orderreview', '', 'enrol/authorize'); ?>
                                 </h4></td></tr>

<tr valign="top">
    <td align="right">an_review:</td>
    <td><?php print_checkbox('an_review', '1', !empty($frm->an_review)) ?>
        <?php helpbutton('review', get_string('adminhelpreviewtitle', 'enrol_authorize'), 'enrol/authorize'); ?><br />
        <?php print_string("adminreview", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_capture_day:</td>
    <td><input type="text" name="an_capture_day" size="2" maxlength="2" value="<?php p($frm->an_capture_day) ?>" />
        <?php helpbutton('captureday', get_string('adminhelpcapturetitle', 'enrol_authorize'), 'enrol/authorize'); ?><br />
        <?php print_string("reviewday", "enrol_authorize", $frm->an_capture_day) ?></td>
</tr>

<tr valign="top"><td colspan="2"><h4><?php print_string("adminauthorizeemail", "enrol_authorize") ?></h4></td></tr>

<tr valign="top">
    <td align="right">an_emailexpired:</td>
    <td><input type="text" name="an_emailexpired" size="1" maxlength="1" value="<?php p($frm->an_emailexpired) ?>" /><br />
        <?php print_string("adminemailexpired", "enrol_authorize", $frm->an_emailexpired) ?><br />
        <?php print_string("adminemailexpsetting", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_emailexpiredteacher:</td>
    <td><?php print_checkbox('an_emailexpiredteacher', '1', !empty($frm->an_emailexpiredteacher)) ?><br />
        <?php print_string("adminemailexpiredteacher", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">an_sorttype:</td>
    <td><?php
    $sorts = array('ttl' => get_string('adminemailexpiredsortsum', 'enrol_authorize'),
                   'cnt' => get_string('adminemailexpiredsortcount', 'enrol_authorize'));
    choose_from_menu($sorts, "an_sorttype", $frm->an_sorttype, "","", "") ?><br />
    <?php print_string("adminemailexpiredsort", "enrol_authorize") ?></td>
</tr>

<tr valign="top">
    <td align="right">enrol_mailstudents:</td>
    <td><?php print_checkbox('enrol_mailstudents', '1', !empty($frm->enrol_mailstudents)) ?><br />
        <?php print_string("mailstudents") ?></td>
</tr>

<tr valign="top">
    <td align="right">enrol_mailteachers:</td>
    <td><?php print_checkbox('enrol_mailteachers', '1', !empty($frm->enrol_mailteachers)) ?><br />
        <?php print_string("mailteachers") ?></td>
</tr>

<tr valign="top">
    <td align="right">enrol_mailadmins:</td>
    <td><?php print_checkbox('enrol_mailadmins', '1', !empty($frm->enrol_mailadmins)) ?><br />
        <?php print_string("mailadmins") ?></td>
</tr>

</table>