function showAccountType(&$clsForm, $lTableWidth, $lLabelWidth, $strLabel, &$userRec, $bNew, $bAsAdmin)
{
    //---------------------------------------------------------------------
    //
    //---------------------------------------------------------------------
    openBlock('Account', '');
    echoT('<table class="enpView" >');
    $clsForm->strStyleExtraLabel = 'vertical-align: top; padding-top: 4pt; width: ' . $lLabelWidth . 'pt;';
    //------------------------
    // Admin user?
    //------------------------
    $clsForm->strStyleExtraLabel = 'vertical-align: top; padding-top: 3pt; width: ' . $lLabelWidth . 'pt;';
    if ($bAsAdmin) {
        $strRadio = '<input type="radio" name="rdoAcctType" value="admin" ' . ($userRec->bAdmin ? 'checked' : '') . '
                  onClick="hideShowDiv(\'volPerms\', true); hideShowDiv(\'userPerms\', true);">Administrator&nbsp;&nbsp;' . '<input type="radio" name="rdoAcctType" value="user" ' . ($userRec->bStandardUser ? 'checked' : '') . '
                  onClick="hideShowDiv(\'volPerms\', true); hideShowDiv(\'userPerms\', false);">User&nbsp;&nbsp;' . '<input type="radio" name="rdoAcctType" value="vol" ' . ($userRec->bVolAccount ? 'checked' : '') . '
                  onClick="hideShowDiv(\'volPerms\', false); hideShowDiv(\'userPerms\', true);">Volunteer';
        echoT($clsForm->strLabelRow('Account Type', $strRadio, 1));
        showUserPerms($userRec, $clsForm);
        showVolPerms($userRec, $clsForm);
        /*
              $strRadio =
                 '<input type="radio" name="rdoAcctType" value="admin" '.($userRec->bAdmin        ? 'checked' : '').'
                          onClick=document.getElementById(\'volPerms\').style.color="#999";>Administrator&nbsp;&nbsp;'
                .'<input type="radio" name="rdoAcctType" value="user" ' .($userRec->bStandardUser ? 'checked' : '').'
                          onClick=document.getElementById(\'volPerms\').style.color="#999";>User&nbsp;&nbsp;'
                .'<input type="radio" name="rdoAcctType" value="vol" '  .($userRec->bVolAccount   ? 'checked' : '').'
                          onClick=document.getElementById(\'volPerms\').style.color="#000";>Volunteer';
        */
    } else {
        if ($userRec->bAdmin) {
            $strAcctType = 'Administrator';
        } elseif ($userRec->bStandardUser) {
            $strAcctType = 'User';
        } else {
            $strAcctType = 'Volunteer';
        }
        $clsForm->strStyleExtraLabel = 'vertical-align: top; padding-top: 2pt;';
        echoT($clsForm->strLabelRow('Account Type', $strAcctType, 1));
    }
    echoT('</table>');
    closeBlock();
}
function showAccountType(&$clsForm, $lTableWidth, $lLabelWidth, $strLabel, &$userRec, $bNew, $bAsAdmin)
{
    //---------------------------------------------------------------------
    //
    //---------------------------------------------------------------------
    openBlock('Account', '');
    echoT('<table class="enpView" >');
    $clsForm->strStyleExtraLabel = 'vertical-align: top; padding-top: 4pt; width: ' . $lLabelWidth . 'pt;';
    //------------------------
    // Admin user?
    //------------------------
    $clsForm->strStyleExtraLabel = 'vertical-align: top; padding-top: 4pt; width: ' . $lLabelWidth . 'pt;';
    if ($bAsAdmin) {
        $strRadioDebug = '<input type="radio" name="rdoDebug" value="true" ' . ($userRec->bDebugger ? 'checked' : '') . '
                  >Yes&nbsp;<i>(access to debug info)</i>&nbsp;' . '<input type="radio" name="rdoDebug" value="false" ' . ($userRec->bDebugger ? '' : 'checked') . '
                  >No&nbsp;<i>(recommended)</i>';
        echoT($clsForm->strLabelRow('Developer', $strRadioDebug, 1));
        $strRadio = '<input type="radio" name="rdoAcctType" value="admin" ' . ($userRec->bAdmin ? 'checked' : '') . '
                  onClick="hideShowDiv(\'volPerms\', true); hideShowDiv(\'userPerms\', true);">Administrator&nbsp;&nbsp;' . '<input type="radio" name="rdoAcctType" value="user" ' . ($userRec->bStandardUser ? 'checked' : '') . '
                  onClick="hideShowDiv(\'volPerms\', true); hideShowDiv(\'userPerms\', false);">User&nbsp;&nbsp;' . '<input type="radio" name="rdoAcctType" value="vol" ' . ($userRec->bVolAccount ? 'checked' : '') . '
                  onClick="hideShowDiv(\'volPerms\', false); hideShowDiv(\'userPerms\', true);">Volunteer';
        echoT($clsForm->strLabelRow('Account Type', $strRadio, 1));
        showUserPerms($userRec, $clsForm);
        showVolPerms($userRec, $clsForm);
    } else {
        if ($userRec->bAdmin) {
            $strAcctType = 'Administrator';
        } elseif ($userRec->bStandardUser) {
            $strAcctType = 'User';
        } else {
            $strAcctType = 'Volunteer';
        }
        $clsForm->strStyleExtraLabel = 'vertical-align: top; padding-top: 2pt;';
        echoT($clsForm->strLabelRow('Account Type', $strAcctType, 1));
    }
    echoT('</table>');
    closeBlock();
}