function adminDataBase($dbAr)
{
    $z = extract($dbAr);
    //echo "<p>Database= $database</p>\n";
    $gofor = $_REQUEST['gofor'] ? $_REQUEST['gofor'] : '';
    if (!$gofor) {
        openFormA('', '', $pageref, 'POST', '', '', '');
        echo "<p><strong>Table: ";
        radioInput('admintab', 'bldinfo');
        echo "Variable information ";
        radioInput('admintab', 'persons');
        echo "Authorized users ";
        echo "</p>\n";
        closeForm('Administrator', '', '');
    } else {
        $table = $_REQUEST['admintab'] ? $_REQUEST['admintab'] : $table;
        if ($table == 'bldinfo') {
            $indx = 'vid';
            $display = "ctrlname||'_'||var AS row";
        } elseif ($table == 'persons') {
            $indx = 'pid';
            $display = 'wsuid';
        } else {
            $indx = '';
        }
        $tabl = new Listing6($database, $table, $indx, $display, array(), true);
        $tabl->updateBuildInfo('ctrlname', 99, '', 'Mode', 0, "values=manage\tsubmit");
        $tabl->updateBuildInfo('var', 12, '', 'Variable name', 0, '');
        $tabl->manageListing($pageref, array('admintab' => $table));
    }
    return 2;
}